1 /*********************************************************************
 
   3  * Filename:      w83977af_ir.c
 
   5  * Description:   FIR driver for the Winbond W83977AF Super I/O chip
 
   6  * Status:        Experimental.
 
   7  * Author:        Paul VanderSpek
 
   8  * Created at:    Wed Nov  4 11:46:16 1998
 
   9  * Modified at:   Fri Jan 28 12:10:59 2000
 
  10  * Modified by:   Dag Brattli <dagb@cs.uit.no>
 
  12  *     Copyright (c) 1998-2000 Dag Brattli <dagb@cs.uit.no>
 
  13  *     Copyright (c) 1998-1999 Rebel.com
 
  15  *     This program is free software; you can redistribute it and/or 
 
  16  *     modify it under the terms of the GNU General Public License as 
 
  17  *     published by the Free Software Foundation; either version 2 of 
 
  18  *     the License, or (at your option) any later version.
 
  20  *     Neither Paul VanderSpek nor Rebel.com admit liability nor provide
 
  21  *     warranty for any of this software. This material is provided "AS-IS"
 
  24  *     If you find bugs in this file, its very likely that the same bug
 
  25  *     will also be in pc87108.c since the implementations are quite
 
  28  *     Notice that all functions that needs to access the chip in _any_
 
  29  *     way, must save BSR register on entry, and restore it on exit. 
 
  30  *     It is _very_ important to follow this policy!
 
  34  *         bank = inb( iobase+BSR);
 
  36  *         do_your_stuff_here();
 
  38  *         outb( bank, iobase+BSR);
 
  40  ********************************************************************/
 
  42 #include <linux/module.h>
 
  43 #include <linux/kernel.h>
 
  44 #include <linux/types.h>
 
  45 #include <linux/skbuff.h>
 
  46 #include <linux/netdevice.h>
 
  47 #include <linux/ioport.h>
 
  48 #include <linux/delay.h>
 
  49 #include <linux/slab.h>
 
  50 #include <linux/init.h>
 
  51 #include <linux/rtnetlink.h>
 
  52 #include <linux/dma-mapping.h>
 
  56 #include <asm/byteorder.h>
 
  58 #include <net/irda/irda.h>
 
  59 #include <net/irda/wrapper.h>
 
  60 #include <net/irda/irda_device.h>
 
  62 #include "w83977af_ir.h"
 
  64 #ifdef  CONFIG_ARCH_NETWINDER            /* Adjust to NetWinder differences */
 
  65 #undef  CONFIG_NETWINDER_TX_DMA_PROBLEMS /* Not needed */
 
  66 #define CONFIG_NETWINDER_RX_DMA_PROBLEMS /* Must have this one! */
 
  68 #undef  CONFIG_USE_INTERNAL_TIMER  /* Just cannot make that timer work */
 
  69 #define CONFIG_USE_W977_PNP        /* Currently needed */
 
  70 #define PIO_MAX_SPEED       115200 
 
  72 static char *driver_name = "w83977af_ir";
 
  73 static int  qos_mtt_bits = 0x07;   /* 1 ms or more */
 
  75 #define CHIP_IO_EXTENT 8
 
  77 static unsigned int io[] = { 0x180, ~0, ~0, ~0 };
 
  78 #ifdef CONFIG_ARCH_NETWINDER             /* Adjust to NetWinder differences */
 
  79 static unsigned int irq[] = { 6, 0, 0, 0 };
 
  81 static unsigned int irq[] = { 11, 0, 0, 0 };
 
  83 static unsigned int dma[] = { 1, 0, 0, 0 };
 
  84 static unsigned int efbase[] = { W977_EFIO_BASE, W977_EFIO2_BASE };
 
  85 static unsigned int efio = W977_EFIO_BASE;
 
  87 static struct w83977af_ir *dev_self[] = { NULL, NULL, NULL, NULL};
 
  90 static int  w83977af_open(int i, unsigned int iobase, unsigned int irq, 
 
  92 static int  w83977af_close(struct w83977af_ir *self);
 
  93 static int  w83977af_probe(int iobase, int irq, int dma);
 
  94 static int  w83977af_dma_receive(struct w83977af_ir *self); 
 
  95 static int  w83977af_dma_receive_complete(struct w83977af_ir *self);
 
  96 static int  w83977af_hard_xmit(struct sk_buff *skb, struct net_device *dev);
 
  97 static int  w83977af_pio_write(int iobase, __u8 *buf, int len, int fifo_size);
 
  98 static void w83977af_dma_write(struct w83977af_ir *self, int iobase);
 
  99 static void w83977af_change_speed(struct w83977af_ir *self, __u32 speed);
 
 100 static int  w83977af_is_receiving(struct w83977af_ir *self);
 
 102 static int  w83977af_net_open(struct net_device *dev);
 
 103 static int  w83977af_net_close(struct net_device *dev);
 
 104 static int  w83977af_net_ioctl(struct net_device *dev, struct ifreq *rq, int cmd);
 
 105 static struct net_device_stats *w83977af_net_get_stats(struct net_device *dev);
 
 108  * Function w83977af_init ()
 
 110  *    Initialize chip. Just try to find out how many chips we are dealing with
 
 113 static int __init w83977af_init(void)
 
 117         IRDA_DEBUG(0, "%s()\n", __FUNCTION__ );
 
 119         for (i=0; (io[i] < 2000) && (i < ARRAY_SIZE(dev_self)); i++) {
 
 120                 if (w83977af_open(i, io[i], irq[i], dma[i]) == 0)
 
 127  * Function w83977af_cleanup ()
 
 129  *    Close all configured chips
 
 132 static void __exit w83977af_cleanup(void)
 
 136         IRDA_DEBUG(4, "%s()\n", __FUNCTION__ );
 
 138         for (i=0; i < ARRAY_SIZE(dev_self); i++) {
 
 140                         w83977af_close(dev_self[i]);
 
 145  * Function w83977af_open (iobase, irq)
 
 147  *    Open driver instance
 
 150 int w83977af_open(int i, unsigned int iobase, unsigned int irq, 
 
 153         struct net_device *dev;
 
 154         struct w83977af_ir *self;
 
 157         IRDA_DEBUG(0, "%s()\n", __FUNCTION__ );
 
 159         /* Lock the port that we need */
 
 160         if (!request_region(iobase, CHIP_IO_EXTENT, driver_name)) {
 
 161                 IRDA_DEBUG(0, "%s(), can't get iobase of 0x%03x\n",
 
 162                       __FUNCTION__ , iobase);
 
 166         if (w83977af_probe(iobase, irq, dma) == -1) {
 
 171          *  Allocate new instance of the driver
 
 173         dev = alloc_irdadev(sizeof(struct w83977af_ir));
 
 175                 printk( KERN_ERR "IrDA: Can't allocate memory for "
 
 176                         "IrDA control block!\n");
 
 182         spin_lock_init(&self->lock);
 
 186         self->io.fir_base   = iobase;
 
 188         self->io.fir_ext   = CHIP_IO_EXTENT;
 
 190         self->io.fifo_size = 32;
 
 192         /* Initialize QoS for this device */
 
 193         irda_init_max_qos_capabilies(&self->qos);
 
 195         /* The only value we must override it the baudrate */
 
 197         /* FIXME: The HP HDLS-1100 does not support 1152000! */
 
 198         self->qos.baud_rate.bits = IR_9600|IR_19200|IR_38400|IR_57600|
 
 199                 IR_115200|IR_576000|IR_1152000|(IR_4000000 << 8);
 
 201         /* The HP HDLS-1100 needs 1 ms according to the specs */
 
 202         self->qos.min_turn_time.bits = qos_mtt_bits;
 
 203         irda_qos_bits_to_value(&self->qos);
 
 205         /* Max DMA buffer size needed = (data_size + 6) * (window_size) + 6; */
 
 206         self->rx_buff.truesize = 14384; 
 
 207         self->tx_buff.truesize = 4000;
 
 209         /* Allocate memory if needed */
 
 211                 dma_alloc_coherent(NULL, self->rx_buff.truesize,
 
 212                                    &self->rx_buff_dma, GFP_KERNEL);
 
 213         if (self->rx_buff.head == NULL) {
 
 218         memset(self->rx_buff.head, 0, self->rx_buff.truesize);
 
 221                 dma_alloc_coherent(NULL, self->tx_buff.truesize,
 
 222                                    &self->tx_buff_dma, GFP_KERNEL);
 
 223         if (self->tx_buff.head == NULL) {
 
 227         memset(self->tx_buff.head, 0, self->tx_buff.truesize);
 
 229         self->rx_buff.in_frame = FALSE;
 
 230         self->rx_buff.state = OUTSIDE_FRAME;
 
 231         self->tx_buff.data = self->tx_buff.head;
 
 232         self->rx_buff.data = self->rx_buff.head;
 
 235         /* Override the network functions we need to use */
 
 236         dev->hard_start_xmit = w83977af_hard_xmit;
 
 237         dev->open            = w83977af_net_open;
 
 238         dev->stop            = w83977af_net_close;
 
 239         dev->do_ioctl        = w83977af_net_ioctl;
 
 240         dev->get_stats       = w83977af_net_get_stats;
 
 242         err = register_netdev(dev);
 
 244                 IRDA_ERROR("%s(), register_netdevice() failed!\n", __FUNCTION__);
 
 247         IRDA_MESSAGE("IrDA: Registered device %s\n", dev->name);
 
 249         /* Need to store self somewhere */
 
 254         dma_free_coherent(NULL, self->tx_buff.truesize,
 
 255                           self->tx_buff.head, self->tx_buff_dma);
 
 257         dma_free_coherent(NULL, self->rx_buff.truesize,
 
 258                           self->rx_buff.head, self->rx_buff_dma);
 
 262         release_region(iobase, CHIP_IO_EXTENT);
 
 267  * Function w83977af_close (self)
 
 269  *    Close driver instance
 
 272 static int w83977af_close(struct w83977af_ir *self)
 
 276         IRDA_DEBUG(0, "%s()\n", __FUNCTION__ );
 
 278         iobase = self->io.fir_base;
 
 280 #ifdef CONFIG_USE_W977_PNP
 
 281         /* enter PnP configuration mode */
 
 282         w977_efm_enter(efio);
 
 284         w977_select_device(W977_DEVICE_IR, efio);
 
 286         /* Deactivate device */
 
 287         w977_write_reg(0x30, 0x00, efio);
 
 290 #endif /* CONFIG_USE_W977_PNP */
 
 292         /* Remove netdevice */
 
 293         unregister_netdev(self->netdev);
 
 295         /* Release the PORT that this driver is using */
 
 296         IRDA_DEBUG(0 , "%s(), Releasing Region %03x\n", 
 
 297               __FUNCTION__ , self->io.fir_base);
 
 298         release_region(self->io.fir_base, self->io.fir_ext);
 
 300         if (self->tx_buff.head)
 
 301                 dma_free_coherent(NULL, self->tx_buff.truesize,
 
 302                                   self->tx_buff.head, self->tx_buff_dma);
 
 304         if (self->rx_buff.head)
 
 305                 dma_free_coherent(NULL, self->rx_buff.truesize,
 
 306                                   self->rx_buff.head, self->rx_buff_dma);
 
 308         free_netdev(self->netdev);
 
 313 int w83977af_probe( int iobase, int irq, int dma)
 
 318         for (i=0; i < 2; i++) {
 
 319                 IRDA_DEBUG( 0, "%s()\n", __FUNCTION__ );
 
 320 #ifdef CONFIG_USE_W977_PNP
 
 321                 /* Enter PnP configuration mode */
 
 322                 w977_efm_enter(efbase[i]);
 
 324                 w977_select_device(W977_DEVICE_IR, efbase[i]);
 
 326                 /* Configure PnP port, IRQ, and DMA channel */
 
 327                 w977_write_reg(0x60, (iobase >> 8) & 0xff, efbase[i]);
 
 328                 w977_write_reg(0x61, (iobase) & 0xff, efbase[i]);
 
 330                 w977_write_reg(0x70, irq, efbase[i]);
 
 331 #ifdef CONFIG_ARCH_NETWINDER
 
 332                 /* Netwinder uses 1 higher than Linux */
 
 333                 w977_write_reg(0x74, dma+1, efbase[i]);
 
 335                 w977_write_reg(0x74, dma, efbase[i]);   
 
 336 #endif /*CONFIG_ARCH_NETWINDER */
 
 337                 w977_write_reg(0x75, 0x04, efbase[i]);  /* Disable Tx DMA */
 
 339                 /* Set append hardware CRC, enable IR bank selection */ 
 
 340                 w977_write_reg(0xf0, APEDCRC|ENBNKSEL, efbase[i]);
 
 342                 /* Activate device */
 
 343                 w977_write_reg(0x30, 0x01, efbase[i]);
 
 345                 w977_efm_exit(efbase[i]);
 
 346 #endif /* CONFIG_USE_W977_PNP */
 
 347                 /* Disable Advanced mode */
 
 348                 switch_bank(iobase, SET2);
 
 349                 outb(iobase+2, 0x00);  
 
 351                 /* Turn on UART (global) interrupts */
 
 352                 switch_bank(iobase, SET0);
 
 353                 outb(HCR_EN_IRQ, iobase+HCR);
 
 355                 /* Switch to advanced mode */
 
 356                 switch_bank(iobase, SET2);
 
 357                 outb(inb(iobase+ADCR1) | ADCR1_ADV_SL, iobase+ADCR1);
 
 359                 /* Set default IR-mode */
 
 360                 switch_bank(iobase, SET0);
 
 361                 outb(HCR_SIR, iobase+HCR);
 
 363                 /* Read the Advanced IR ID */
 
 364                 switch_bank(iobase, SET3);
 
 365                 version = inb(iobase+AUID);
 
 368                 if (0x10 == (version & 0xf0)) {
 
 371                         /* Set FIFO size to 32 */
 
 372                         switch_bank(iobase, SET2);
 
 373                         outb(ADCR2_RXFS32|ADCR2_TXFS32, iobase+ADCR2);  
 
 375                         /* Set FIFO threshold to TX17, RX16 */
 
 376                         switch_bank(iobase, SET0);      
 
 377                         outb(UFR_RXTL|UFR_TXTL|UFR_TXF_RST|UFR_RXF_RST|
 
 378                              UFR_EN_FIFO,iobase+UFR);
 
 380                         /* Receiver frame length */
 
 381                         switch_bank(iobase, SET4);
 
 382                         outb(2048 & 0xff, iobase+6);
 
 383                         outb((2048 >> 8) & 0x1f, iobase+7);
 
 386                          * Init HP HSDL-1100 transceiver. 
 
 388                          * Set IRX_MSL since we have 2 * receive paths IRRX, 
 
 389                          * and IRRXH. Clear IRSL0D since we want IRSL0 * to 
 
 390                          * be a input pin used for IRRXH 
 
 392                          *   IRRX  pin 37 connected to receiver 
 
 393                          *   IRTX  pin 38 connected to transmitter
 
 394                          *   FIRRX pin 39 connected to receiver      (IRSL0) 
 
 395                          *   CIRRX pin 40 connected to pin 37
 
 397                         switch_bank(iobase, SET7);
 
 398                         outb(0x40, iobase+7);
 
 400                         IRDA_MESSAGE("W83977AF (IR) driver loaded. "
 
 401                                      "Version: 0x%02x\n", version);
 
 405                         /* Try next extented function register address */
 
 406                         IRDA_DEBUG( 0, "%s(), Wrong chip version", __FUNCTION__ );
 
 412 void w83977af_change_speed(struct w83977af_ir *self, __u32 speed)
 
 414         int ir_mode = HCR_SIR;
 
 418         iobase = self->io.fir_base;
 
 420         /* Update accounting for new speed */
 
 421         self->io.speed = speed;
 
 423         /* Save current bank */
 
 424         set = inb(iobase+SSR);
 
 426         /* Disable interrupts */
 
 427         switch_bank(iobase, SET0);
 
 431         switch_bank(iobase, SET2);
 
 432         outb(0x00, iobase+ABHL);
 
 435         case 9600:   outb(0x0c, iobase+ABLL); break;
 
 436         case 19200:  outb(0x06, iobase+ABLL); break;
 
 437         case 38400:  outb(0x03, iobase+ABLL); break;
 
 438         case 57600:  outb(0x02, iobase+ABLL); break;
 
 439         case 115200: outb(0x01, iobase+ABLL); break;
 
 441                 ir_mode = HCR_MIR_576;
 
 442                 IRDA_DEBUG(0, "%s(), handling baud of 576000\n", __FUNCTION__ );
 
 445                 ir_mode = HCR_MIR_1152;
 
 446                 IRDA_DEBUG(0, "%s(), handling baud of 1152000\n", __FUNCTION__ );
 
 450                 IRDA_DEBUG(0, "%s(), handling baud of 4000000\n", __FUNCTION__ );
 
 454                 IRDA_DEBUG(0, "%s(), unknown baud rate of %d\n", __FUNCTION__ , speed);
 
 459         switch_bank(iobase, SET0);
 
 460         outb(ir_mode, iobase+HCR);
 
 462         /* set FIFO size to 32 */
 
 463         switch_bank(iobase, SET2);
 
 464         outb(ADCR2_RXFS32|ADCR2_TXFS32, iobase+ADCR2);  
 
 466         /* set FIFO threshold to TX17, RX16 */
 
 467         switch_bank(iobase, SET0);
 
 468         outb(0x00, iobase+UFR);        /* Reset */
 
 469         outb(UFR_EN_FIFO, iobase+UFR); /* First we must enable FIFO */
 
 470         outb(0xa7, iobase+UFR);
 
 472         netif_wake_queue(self->netdev);
 
 474         /* Enable some interrupts so we can receive frames */
 
 475         switch_bank(iobase, SET0);
 
 476         if (speed > PIO_MAX_SPEED) {
 
 477                 outb(ICR_EFSFI, iobase+ICR);
 
 478                 w83977af_dma_receive(self);
 
 480                 outb(ICR_ERBRI, iobase+ICR);
 
 483         outb(set, iobase+SSR);
 
 487  * Function w83977af_hard_xmit (skb, dev)
 
 489  *    Sets up a DMA transfer to send the current frame.
 
 492 int w83977af_hard_xmit(struct sk_buff *skb, struct net_device *dev)
 
 494         struct w83977af_ir *self;
 
 500         self = (struct w83977af_ir *) dev->priv;
 
 502         iobase = self->io.fir_base;
 
 504         IRDA_DEBUG(4, "%s(%ld), skb->len=%d\n", __FUNCTION__ , jiffies, 
 
 507         /* Lock transmit buffer */
 
 508         netif_stop_queue(dev);
 
 510         /* Check if we need to change the speed */
 
 511         speed = irda_get_next_speed(skb);
 
 512         if ((speed != self->io.speed) && (speed != -1)) {
 
 513                 /* Check for empty frame */
 
 515                         w83977af_change_speed(self, speed); 
 
 516                         dev->trans_start = jiffies;
 
 520                         self->new_speed = speed;
 
 523         /* Save current set */
 
 524         set = inb(iobase+SSR);
 
 526         /* Decide if we should use PIO or DMA transfer */
 
 527         if (self->io.speed > PIO_MAX_SPEED) {
 
 528                 self->tx_buff.data = self->tx_buff.head;
 
 529                 skb_copy_from_linear_data(skb, self->tx_buff.data, skb->len);
 
 530                 self->tx_buff.len = skb->len;
 
 532                 mtt = irda_get_mtt(skb);
 
 533 #ifdef CONFIG_USE_INTERNAL_TIMER
 
 535                         /* Adjust for timer resolution */
 
 539                         switch_bank(iobase, SET4);
 
 540                         outb(mtt & 0xff, iobase+TMRL);
 
 541                         outb((mtt >> 8) & 0x0f, iobase+TMRH);
 
 544                         outb(IR_MSL_EN_TMR, iobase+IR_MSL);
 
 545                         self->io.direction = IO_XMIT;
 
 547                         /* Enable timer interrupt */
 
 548                         switch_bank(iobase, SET0);
 
 549                         outb(ICR_ETMRI, iobase+ICR);
 
 552                         IRDA_DEBUG(4, "%s(%ld), mtt=%d\n", __FUNCTION__ , jiffies, mtt);
 
 556                         /* Enable DMA interrupt */
 
 557                         switch_bank(iobase, SET0);
 
 558                         outb(ICR_EDMAI, iobase+ICR);
 
 559                         w83977af_dma_write(self, iobase);
 
 560 #ifdef CONFIG_USE_INTERNAL_TIMER
 
 564                 self->tx_buff.data = self->tx_buff.head;
 
 565                 self->tx_buff.len = async_wrap_skb(skb, self->tx_buff.data, 
 
 566                                                    self->tx_buff.truesize);
 
 568                 /* Add interrupt on tx low level (will fire immediately) */
 
 569                 switch_bank(iobase, SET0);
 
 570                 outb(ICR_ETXTHI, iobase+ICR);
 
 572         dev->trans_start = jiffies;
 
 575         /* Restore set register */
 
 576         outb(set, iobase+SSR);
 
 582  * Function w83977af_dma_write (self, iobase)
 
 584  *    Send frame using DMA
 
 587 static void w83977af_dma_write(struct w83977af_ir *self, int iobase)
 
 590 #ifdef CONFIG_NETWINDER_TX_DMA_PROBLEMS
 
 594         IRDA_DEBUG(4, "%s(), len=%d\n", __FUNCTION__ , self->tx_buff.len);
 
 596         /* Save current set */
 
 597         set = inb(iobase+SSR);
 
 600         switch_bank(iobase, SET0);
 
 601         outb(inb(iobase+HCR) & ~HCR_EN_DMA, iobase+HCR);
 
 603         /* Choose transmit DMA channel  */ 
 
 604         switch_bank(iobase, SET2);
 
 605         outb(ADCR1_D_CHSW|/*ADCR1_DMA_F|*/ADCR1_ADV_SL, iobase+ADCR1);
 
 606 #ifdef CONFIG_NETWINDER_TX_DMA_PROBLEMS
 
 607         spin_lock_irqsave(&self->lock, flags);
 
 609         disable_dma(self->io.dma);
 
 610         clear_dma_ff(self->io.dma);
 
 611         set_dma_mode(self->io.dma, DMA_MODE_READ);
 
 612         set_dma_addr(self->io.dma, self->tx_buff_dma);
 
 613         set_dma_count(self->io.dma, self->tx_buff.len);
 
 615         irda_setup_dma(self->io.dma, self->tx_buff_dma, self->tx_buff.len,
 
 618         self->io.direction = IO_XMIT;
 
 621         switch_bank(iobase, SET0);
 
 622 #ifdef CONFIG_NETWINDER_TX_DMA_PROBLEMS
 
 623         hcr = inb(iobase+HCR);
 
 624         outb(hcr | HCR_EN_DMA, iobase+HCR);
 
 625         enable_dma(self->io.dma);
 
 626         spin_unlock_irqrestore(&self->lock, flags);
 
 628         outb(inb(iobase+HCR) | HCR_EN_DMA | HCR_TX_WT, iobase+HCR);
 
 631         /* Restore set register */
 
 632         outb(set, iobase+SSR);
 
 636  * Function w83977af_pio_write (iobase, buf, len, fifo_size)
 
 641 static int w83977af_pio_write(int iobase, __u8 *buf, int len, int fifo_size)
 
 646         IRDA_DEBUG(4, "%s()\n", __FUNCTION__ );
 
 648         /* Save current bank */
 
 649         set = inb(iobase+SSR);
 
 651         switch_bank(iobase, SET0);
 
 652         if (!(inb_p(iobase+USR) & USR_TSRE)) {
 
 654                            "%s(), warning, FIFO not empty yet!\n", __FUNCTION__  );
 
 657                 IRDA_DEBUG(4, "%s(), %d bytes left in tx fifo\n", 
 
 658                            __FUNCTION__ , fifo_size);
 
 661         /* Fill FIFO with current frame */
 
 662         while ((fifo_size-- > 0) && (actual < len)) {
 
 663                 /* Transmit next byte */
 
 664                 outb(buf[actual++], iobase+TBR);
 
 667         IRDA_DEBUG(4, "%s(), fifo_size %d ; %d sent of %d\n", 
 
 668                    __FUNCTION__ , fifo_size, actual, len);
 
 671         outb(set, iobase+SSR);
 
 677  * Function w83977af_dma_xmit_complete (self)
 
 679  *    The transfer of a frame in finished. So do the necessary things
 
 683 static void w83977af_dma_xmit_complete(struct w83977af_ir *self)
 
 688         IRDA_DEBUG(4, "%s(%ld)\n", __FUNCTION__ , jiffies);
 
 690         IRDA_ASSERT(self != NULL, return;);
 
 692         iobase = self->io.fir_base;
 
 694         /* Save current set */
 
 695         set = inb(iobase+SSR);
 
 698         switch_bank(iobase, SET0);
 
 699         outb(inb(iobase+HCR) & ~HCR_EN_DMA, iobase+HCR);
 
 701         /* Check for underrrun! */
 
 702         if (inb(iobase+AUDR) & AUDR_UNDR) {
 
 703                 IRDA_DEBUG(0, "%s(), Transmit underrun!\n", __FUNCTION__ );
 
 705                 self->stats.tx_errors++;
 
 706                 self->stats.tx_fifo_errors++;
 
 708                 /* Clear bit, by writing 1 to it */
 
 709                 outb(AUDR_UNDR, iobase+AUDR);
 
 711                 self->stats.tx_packets++;
 
 714         if (self->new_speed) {
 
 715                 w83977af_change_speed(self, self->new_speed);
 
 719         /* Unlock tx_buff and request another frame */
 
 720         /* Tell the network layer, that we want more frames */
 
 721         netif_wake_queue(self->netdev);
 
 724         outb(set, iobase+SSR);
 
 728  * Function w83977af_dma_receive (self)
 
 730  *    Get ready for receiving a frame. The device will initiate a DMA
 
 731  *    if it starts to receive a frame.
 
 734 int w83977af_dma_receive(struct w83977af_ir *self) 
 
 738 #ifdef CONFIG_NETWINDER_RX_DMA_PROBLEMS
 
 742         IRDA_ASSERT(self != NULL, return -1;);
 
 744         IRDA_DEBUG(4, "%s\n", __FUNCTION__ );
 
 746         iobase= self->io.fir_base;
 
 748         /* Save current set */
 
 749         set = inb(iobase+SSR);
 
 752         switch_bank(iobase, SET0);
 
 753         outb(inb(iobase+HCR) & ~HCR_EN_DMA, iobase+HCR);
 
 755         /* Choose DMA Rx, DMA Fairness, and Advanced mode */
 
 756         switch_bank(iobase, SET2);
 
 757         outb((inb(iobase+ADCR1) & ~ADCR1_D_CHSW)/*|ADCR1_DMA_F*/|ADCR1_ADV_SL,
 
 760         self->io.direction = IO_RECV;
 
 761         self->rx_buff.data = self->rx_buff.head;
 
 763 #ifdef CONFIG_NETWINDER_RX_DMA_PROBLEMS
 
 764         spin_lock_irqsave(&self->lock, flags);
 
 766         disable_dma(self->io.dma);
 
 767         clear_dma_ff(self->io.dma);
 
 768         set_dma_mode(self->io.dma, DMA_MODE_READ);
 
 769         set_dma_addr(self->io.dma, self->rx_buff_dma);
 
 770         set_dma_count(self->io.dma, self->rx_buff.truesize);
 
 772         irda_setup_dma(self->io.dma, self->rx_buff_dma, self->rx_buff.truesize,
 
 776          * Reset Rx FIFO. This will also flush the ST_FIFO, it's very 
 
 777          * important that we don't reset the Tx FIFO since it might not
 
 778          * be finished transmitting yet
 
 780         switch_bank(iobase, SET0);
 
 781         outb(UFR_RXTL|UFR_TXTL|UFR_RXF_RST|UFR_EN_FIFO, iobase+UFR);
 
 782         self->st_fifo.len = self->st_fifo.tail = self->st_fifo.head = 0;
 
 785         switch_bank(iobase, SET0);
 
 786 #ifdef CONFIG_NETWINDER_RX_DMA_PROBLEMS
 
 787         hcr = inb(iobase+HCR);
 
 788         outb(hcr | HCR_EN_DMA, iobase+HCR);
 
 789         enable_dma(self->io.dma);
 
 790         spin_unlock_irqrestore(&self->lock, flags);
 
 792         outb(inb(iobase+HCR) | HCR_EN_DMA, iobase+HCR);
 
 795         outb(set, iobase+SSR);
 
 801  * Function w83977af_receive_complete (self)
 
 803  *    Finished with receiving a frame
 
 806 int w83977af_dma_receive_complete(struct w83977af_ir *self)
 
 809         struct st_fifo *st_fifo;
 
 815         IRDA_DEBUG(4, "%s\n", __FUNCTION__ );
 
 817         st_fifo = &self->st_fifo;
 
 819         iobase = self->io.fir_base;
 
 821         /* Save current set */
 
 822         set = inb(iobase+SSR);
 
 824         iobase = self->io.fir_base;
 
 826         /* Read status FIFO */
 
 827         switch_bank(iobase, SET5);
 
 828         while ((status = inb(iobase+FS_FO)) & FS_FO_FSFDR) {
 
 829                 st_fifo->entries[st_fifo->tail].status = status;
 
 831                 st_fifo->entries[st_fifo->tail].len  = inb(iobase+RFLFL);
 
 832                 st_fifo->entries[st_fifo->tail].len |= inb(iobase+RFLFH) << 8;
 
 838         while (st_fifo->len) {
 
 839                 /* Get first entry */
 
 840                 status = st_fifo->entries[st_fifo->head].status;
 
 841                 len    = st_fifo->entries[st_fifo->head].len;
 
 845                 /* Check for errors */
 
 846                 if (status & FS_FO_ERR_MSK) {
 
 847                         if (status & FS_FO_LST_FR) {
 
 848                                 /* Add number of lost frames to stats */
 
 849                                 self->stats.rx_errors += len;   
 
 852                                 self->stats.rx_errors++;
 
 854                                 self->rx_buff.data += len;
 
 856                                 if (status & FS_FO_MX_LEX)
 
 857                                         self->stats.rx_length_errors++;
 
 859                                 if (status & FS_FO_PHY_ERR) 
 
 860                                         self->stats.rx_frame_errors++;
 
 862                                 if (status & FS_FO_CRC_ERR) 
 
 863                                         self->stats.rx_crc_errors++;
 
 865                         /* The errors below can be reported in both cases */
 
 866                         if (status & FS_FO_RX_OV)
 
 867                                 self->stats.rx_fifo_errors++;
 
 869                         if (status & FS_FO_FSF_OV)
 
 870                                 self->stats.rx_fifo_errors++;
 
 873                         /* Check if we have transferred all data to memory */
 
 874                         switch_bank(iobase, SET0);
 
 875                         if (inb(iobase+USR) & USR_RDR) {
 
 876 #ifdef CONFIG_USE_INTERNAL_TIMER
 
 877                                 /* Put this entry back in fifo */
 
 880                                 st_fifo->entries[st_fifo->head].status = status;
 
 881                                 st_fifo->entries[st_fifo->head].len = len;
 
 883                                 /* Restore set register */
 
 884                                 outb(set, iobase+SSR);
 
 886                                 return FALSE;   /* I'll be back! */
 
 888                                 udelay(80); /* Should be enough!? */
 
 892                         skb = dev_alloc_skb(len+1);
 
 895                                        "%s(), memory squeeze, dropping frame.\n", __FUNCTION__);
 
 896                                 /* Restore set register */
 
 897                                 outb(set, iobase+SSR);
 
 902                         /*  Align to 20 bytes */
 
 905                         /* Copy frame without CRC */
 
 906                         if (self->io.speed < 4000000) {
 
 908                                 skb_copy_to_linear_data(skb,
 
 913                                 skb_copy_to_linear_data(skb,
 
 918                         /* Move to next frame */
 
 919                         self->rx_buff.data += len;
 
 920                         self->stats.rx_packets++;
 
 922                         skb->dev = self->netdev;
 
 923                         skb_reset_mac_header(skb);
 
 924                         skb->protocol = htons(ETH_P_IRDA);
 
 926                         self->netdev->last_rx = jiffies;
 
 929         /* Restore set register */
 
 930         outb(set, iobase+SSR);
 
 936  * Function pc87108_pio_receive (self)
 
 938  *    Receive all data in receiver FIFO
 
 941 static void w83977af_pio_receive(struct w83977af_ir *self) 
 
 946         IRDA_DEBUG(4, "%s()\n", __FUNCTION__ );
 
 948         IRDA_ASSERT(self != NULL, return;);
 
 950         iobase = self->io.fir_base;
 
 952         /*  Receive all characters in Rx FIFO */
 
 954                 byte = inb(iobase+RBR);
 
 955                 async_unwrap_char(self->netdev, &self->stats, &self->rx_buff, 
 
 957         } while (inb(iobase+USR) & USR_RDR); /* Data available */       
 
 961  * Function w83977af_sir_interrupt (self, eir)
 
 963  *    Handle SIR interrupt
 
 966 static __u8 w83977af_sir_interrupt(struct w83977af_ir *self, int isr)
 
 973         IRDA_DEBUG(4, "%s(), isr=%#x\n", __FUNCTION__ , isr);
 
 975         iobase = self->io.fir_base;
 
 976         /* Transmit FIFO low on data */
 
 977         if (isr & ISR_TXTH_I) {
 
 978                 /* Write data left in transmit buffer */
 
 979                 actual = w83977af_pio_write(self->io.fir_base, 
 
 984                 self->tx_buff.data += actual;
 
 985                 self->tx_buff.len  -= actual;
 
 987                 self->io.direction = IO_XMIT;
 
 989                 /* Check if finished */
 
 990                 if (self->tx_buff.len > 0) {
 
 991                         new_icr |= ICR_ETXTHI;
 
 993                         set = inb(iobase+SSR);
 
 994                         switch_bank(iobase, SET0);
 
 995                         outb(AUDR_SFEND, iobase+AUDR);
 
 996                         outb(set, iobase+SSR); 
 
 998                         self->stats.tx_packets++;
 
1000                         /* Feed me more packets */
 
1001                         netif_wake_queue(self->netdev);
 
1002                         new_icr |= ICR_ETBREI;
 
1005         /* Check if transmission has completed */
 
1006         if (isr & ISR_TXEMP_I) {                
 
1007                 /* Check if we need to change the speed? */
 
1008                 if (self->new_speed) {
 
1010                                    "%s(), Changing speed!\n", __FUNCTION__ );
 
1011                         w83977af_change_speed(self, self->new_speed);
 
1012                         self->new_speed = 0;
 
1015                 /* Turn around and get ready to receive some data */
 
1016                 self->io.direction = IO_RECV;
 
1017                 new_icr |= ICR_ERBRI;
 
1020         /* Rx FIFO threshold or timeout */
 
1021         if (isr & ISR_RXTH_I) {
 
1022                 w83977af_pio_receive(self);
 
1024                 /* Keep receiving */
 
1025                 new_icr |= ICR_ERBRI;
 
1031  * Function pc87108_fir_interrupt (self, eir)
 
1033  *    Handle MIR/FIR interrupt
 
1036 static __u8 w83977af_fir_interrupt(struct w83977af_ir *self, int isr)
 
1042         iobase = self->io.fir_base;
 
1043         set = inb(iobase+SSR);
 
1045         /* End of frame detected in FIFO */
 
1046         if (isr & (ISR_FEND_I|ISR_FSF_I)) {
 
1047                 if (w83977af_dma_receive_complete(self)) {
 
1049                         /* Wait for next status FIFO interrupt */
 
1050                         new_icr |= ICR_EFSFI;
 
1052                         /* DMA not finished yet */
 
1054                         /* Set timer value, resolution 1 ms */
 
1055                         switch_bank(iobase, SET4);
 
1056                         outb(0x01, iobase+TMRL); /* 1 ms */
 
1057                         outb(0x00, iobase+TMRH);
 
1060                         outb(IR_MSL_EN_TMR, iobase+IR_MSL);
 
1062                         new_icr |= ICR_ETMRI;
 
1065         /* Timer finished */
 
1066         if (isr & ISR_TMR_I) {
 
1068                 switch_bank(iobase, SET4);
 
1069                 outb(0, iobase+IR_MSL);
 
1071                 /* Clear timer event */
 
1072                 /* switch_bank(iobase, SET0); */
 
1073 /*              outb(ASCR_CTE, iobase+ASCR); */
 
1075                 /* Check if this is a TX timer interrupt */
 
1076                 if (self->io.direction == IO_XMIT) {
 
1077                         w83977af_dma_write(self, iobase);
 
1079                         new_icr |= ICR_EDMAI;
 
1081                         /* Check if DMA has now finished */
 
1082                         w83977af_dma_receive_complete(self);
 
1084                         new_icr |= ICR_EFSFI;
 
1087         /* Finished with DMA */
 
1088         if (isr & ISR_DMA_I) {
 
1089                 w83977af_dma_xmit_complete(self);
 
1091                 /* Check if there are more frames to be transmitted */
 
1092                 /* if (irda_device_txqueue_empty(self)) { */
 
1094                 /* Prepare for receive 
 
1096                  * ** Netwinder Tx DMA likes that we do this anyway **
 
1098                 w83977af_dma_receive(self);
 
1099                 new_icr = ICR_EFSFI;
 
1104         outb(set, iobase+SSR);
 
1110  * Function w83977af_interrupt (irq, dev_id, regs)
 
1112  *    An interrupt from the chip has arrived. Time to do some work
 
1115 static irqreturn_t w83977af_interrupt(int irq, void *dev_id)
 
1117         struct net_device *dev = dev_id;
 
1118         struct w83977af_ir *self;
 
1124         iobase = self->io.fir_base;
 
1126         /* Save current bank */
 
1127         set = inb(iobase+SSR);
 
1128         switch_bank(iobase, SET0);
 
1130         icr = inb(iobase+ICR); 
 
1131         isr = inb(iobase+ISR) & icr; /* Mask out the interesting ones */ 
 
1133         outb(0, iobase+ICR); /* Disable interrupts */
 
1136                 /* Dispatch interrupt handler for the current speed */
 
1137                 if (self->io.speed > PIO_MAX_SPEED )
 
1138                         icr = w83977af_fir_interrupt(self, isr);
 
1140                         icr = w83977af_sir_interrupt(self, isr);
 
1143         outb(icr, iobase+ICR);    /* Restore (new) interrupts */
 
1144         outb(set, iobase+SSR);    /* Restore bank register */
 
1145         return IRQ_RETVAL(isr);
 
1149  * Function w83977af_is_receiving (self)
 
1151  *    Return TRUE is we are currently receiving a frame
 
1154 static int w83977af_is_receiving(struct w83977af_ir *self)
 
1160         IRDA_ASSERT(self != NULL, return FALSE;);
 
1162         if (self->io.speed > 115200) {
 
1163                 iobase = self->io.fir_base;
 
1165                 /* Check if rx FIFO is not empty */
 
1166                 set = inb(iobase+SSR);
 
1167                 switch_bank(iobase, SET2);
 
1168                 if ((inb(iobase+RXFDTH) & 0x3f) != 0) {
 
1169                         /* We are receiving something */
 
1172                 outb(set, iobase+SSR);
 
1174                 status = (self->rx_buff.state != OUTSIDE_FRAME);
 
1180  * Function w83977af_net_open (dev)
 
1185 static int w83977af_net_open(struct net_device *dev)
 
1187         struct w83977af_ir *self;
 
1192         IRDA_DEBUG(0, "%s()\n", __FUNCTION__ );
 
1194         IRDA_ASSERT(dev != NULL, return -1;);
 
1195         self = (struct w83977af_ir *) dev->priv;
 
1197         IRDA_ASSERT(self != NULL, return 0;);
 
1199         iobase = self->io.fir_base;
 
1201         if (request_irq(self->io.irq, w83977af_interrupt, 0, dev->name, 
 
1206          * Always allocate the DMA channel after the IRQ,
 
1207          * and clean up on failure.
 
1209         if (request_dma(self->io.dma, dev->name)) {
 
1210                 free_irq(self->io.irq, self);
 
1214         /* Save current set */
 
1215         set = inb(iobase+SSR);
 
1217         /* Enable some interrupts so we can receive frames again */
 
1218         switch_bank(iobase, SET0);
 
1219         if (self->io.speed > 115200) {
 
1220                 outb(ICR_EFSFI, iobase+ICR);
 
1221                 w83977af_dma_receive(self);
 
1223                 outb(ICR_ERBRI, iobase+ICR);
 
1225         /* Restore bank register */
 
1226         outb(set, iobase+SSR);
 
1228         /* Ready to play! */
 
1229         netif_start_queue(dev);
 
1231         /* Give self a hardware name */
 
1232         sprintf(hwname, "w83977af @ 0x%03x", self->io.fir_base);
 
1235          * Open new IrLAP layer instance, now that everything should be
 
1236          * initialized properly 
 
1238         self->irlap = irlap_open(dev, &self->qos, hwname);
 
1244  * Function w83977af_net_close (dev)
 
1249 static int w83977af_net_close(struct net_device *dev)
 
1251         struct w83977af_ir *self;
 
1255         IRDA_DEBUG(0, "%s()\n", __FUNCTION__ );
 
1257         IRDA_ASSERT(dev != NULL, return -1;);
 
1259         self = (struct w83977af_ir *) dev->priv;
 
1261         IRDA_ASSERT(self != NULL, return 0;);
 
1263         iobase = self->io.fir_base;
 
1266         netif_stop_queue(dev);
 
1268         /* Stop and remove instance of IrLAP */
 
1270                 irlap_close(self->irlap);
 
1273         disable_dma(self->io.dma);
 
1275         /* Save current set */
 
1276         set = inb(iobase+SSR);
 
1278         /* Disable interrupts */
 
1279         switch_bank(iobase, SET0);
 
1280         outb(0, iobase+ICR); 
 
1282         free_irq(self->io.irq, dev);
 
1283         free_dma(self->io.dma);
 
1285         /* Restore bank register */
 
1286         outb(set, iobase+SSR);
 
1292  * Function w83977af_net_ioctl (dev, rq, cmd)
 
1294  *    Process IOCTL commands for this device
 
1297 static int w83977af_net_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
 
1299         struct if_irda_req *irq = (struct if_irda_req *) rq;
 
1300         struct w83977af_ir *self;
 
1301         unsigned long flags;
 
1304         IRDA_ASSERT(dev != NULL, return -1;);
 
1308         IRDA_ASSERT(self != NULL, return -1;);
 
1310         IRDA_DEBUG(2, "%s(), %s, (cmd=0x%X)\n", __FUNCTION__ , dev->name, cmd);
 
1312         spin_lock_irqsave(&self->lock, flags);
 
1315         case SIOCSBANDWIDTH: /* Set bandwidth */
 
1316                 if (!capable(CAP_NET_ADMIN)) {
 
1320                 w83977af_change_speed(self, irq->ifr_baudrate);
 
1322         case SIOCSMEDIABUSY: /* Set media busy */
 
1323                 if (!capable(CAP_NET_ADMIN)) {
 
1327                 irda_device_set_media_busy(self->netdev, TRUE);
 
1329         case SIOCGRECEIVING: /* Check if we are receiving right now */
 
1330                 irq->ifr_receiving = w83977af_is_receiving(self);
 
1336         spin_unlock_irqrestore(&self->lock, flags);
 
1340 static struct net_device_stats *w83977af_net_get_stats(struct net_device *dev)
 
1342         struct w83977af_ir *self = (struct w83977af_ir *) dev->priv;
 
1344         return &self->stats;
 
1347 MODULE_AUTHOR("Dag Brattli <dagb@cs.uit.no>");
 
1348 MODULE_DESCRIPTION("Winbond W83977AF IrDA Device Driver");
 
1349 MODULE_LICENSE("GPL");
 
1352 module_param(qos_mtt_bits, int, 0);
 
1353 MODULE_PARM_DESC(qos_mtt_bits, "Mimimum Turn Time");
 
1354 module_param_array(io, int, NULL, 0);
 
1355 MODULE_PARM_DESC(io, "Base I/O addresses");
 
1356 module_param_array(irq, int, NULL, 0);
 
1357 MODULE_PARM_DESC(irq, "IRQ lines");
 
1360  * Function init_module (void)
 
1365 module_init(w83977af_init);
 
1368  * Function cleanup_module (void)
 
1373 module_exit(w83977af_cleanup);