drivers/net/dl2k.c

   1 /*  D-Link DL2000-based Gigabit Ethernet Adapter Linux driver */
   2 /*
   3     Copyright (c) 2001, 2002 by D-Link Corporation
   4     Written by Edward Peng.<edward_peng@dlink.com.tw>
   5     Created 03-May-2001, base on Linux' sundance.c.
   6
   7     This program is free software; you can redistribute it and/or modify
   8     it under the terms of the GNU General Public License as published by
   9     the Free Software Foundation; either version 2 of the License, or
  10     (at your option) any later version.
  11 */
  12 /*
  13     Rev         Date            Description
  14     ==========================================================================
  15     0.01        2001/05/03      Created DL2000-based linux driver
  16     0.02        2001/05/21      Added VLAN and hardware checksum support.
  17     1.00        2001/06/26      Added jumbo frame support.
  18     1.01        2001/08/21      Added two parameters, rx_coalesce and rx_timeout.
  19     1.02        2001/10/08      Supported fiber media.
  20                                 Added flow control parameters.
  21     1.03        2001/10/12      Changed the default media to 1000mbps_fd for
  22                                 the fiber devices.
  23     1.04        2001/11/08      Fixed Tx stopped when tx very busy.
  24     1.05        2001/11/22      Fixed Tx stopped when unidirectional tx busy.
  25     1.06        2001/12/13      Fixed disconnect bug at 10Mbps mode.
  26                                 Fixed tx_full flag incorrect.
  27                                 Added tx_coalesce paramter.
  28     1.07        2002/01/03      Fixed miscount of RX frame error.
  29     1.08        2002/01/17      Fixed the multicast bug.
  30     1.09        2002/03/07      Move rx-poll-now to re-fill loop.
  31                                 Added rio_timer() to watch rx buffers.
  32     1.10        2002/04/16      Fixed miscount of carrier error.
  33     1.11        2002/05/23      Added ISR schedule scheme
  34                                 Fixed miscount of rx frame error for DGE-550SX.
  35                                 Fixed VLAN bug.
  36     1.12        2002/06/13      Lock tx_coalesce=1 on 10/100Mbps mode.
  37     1.13        2002/08/13      1. Fix disconnection (many tx:carrier/rx:frame
  38                                    errs) with some mainboards.
  39                                 2. Use definition "DRV_NAME" "DRV_VERSION"
  40                                    "DRV_RELDATE" for flexibility.
  41     1.14        2002/08/14      Support ethtool.
  42     1.15        2002/08/27      Changed the default media to Auto-Negotiation
  43                                 for the fiber devices.
  44     1.16        2002/09/04      More power down time for fiber devices auto-
  45                                 negotiation.
  46                                 Fix disconnect bug after ifup and ifdown.
  47     1.17        2002/10/03      Fix RMON statistics overflow.
  48                                 Always use I/O mapping to access eeprom,
  49                                 avoid system freezing with some chipsets.
  50
  51 */
  52 #define DRV_NAME        "D-Link DL2000-based linux driver"
  53 #define DRV_VERSION     "v1.17a"
  54 #define DRV_RELDATE     "2002/10/04"
  55 #include "dl2k.h"
  56
  57 static char version[] __devinitdata =
  58       KERN_INFO DRV_NAME " " DRV_VERSION " " DRV_RELDATE "\n";
  59 #define MAX_UNITS 8
  60 static int mtu[MAX_UNITS];
  61 static int vlan[MAX_UNITS];
  62 static int jumbo[MAX_UNITS];
  63 static char *media[MAX_UNITS];
  64 static int tx_flow=-1;
  65 static int rx_flow=-1;
  66 static int copy_thresh;
  67 static int rx_coalesce=10;      /* Rx frame count each interrupt */
  68 static int rx_timeout=200;      /* Rx DMA wait time in 640ns increments */
  69 static int tx_coalesce=16;      /* HW xmit count each TxDMAComplete */
  70
  71
  72 MODULE_AUTHOR ("Edward Peng");
  73 MODULE_DESCRIPTION ("D-Link DL2000-based Gigabit Ethernet Adapter");
  74 MODULE_LICENSE("GPL");
  75 MODULE_PARM (mtu, "1-" __MODULE_STRING (MAX_UNITS) "i");
  76 MODULE_PARM (media, "1-" __MODULE_STRING (MAX_UNITS) "s");
  77 MODULE_PARM (vlan, "1-" __MODULE_STRING (MAX_UNITS) "i");
  78 MODULE_PARM (jumbo, "1-" __MODULE_STRING (MAX_UNITS) "i");
  79 MODULE_PARM (tx_flow, "i");
  80 MODULE_PARM (rx_flow, "i");
  81 MODULE_PARM (copy_thresh, "i");
  82 MODULE_PARM (rx_coalesce, "i"); /* Rx frame count each interrupt */
  83 MODULE_PARM (rx_timeout, "i");  /* Rx DMA wait time in 64ns increments */
  84 MODULE_PARM (tx_coalesce, "i"); /* HW xmit count each TxDMAComplete */
  85
  86
  87 /* Enable the default interrupts */
  88 #define DEFAULT_INTR (RxDMAComplete | HostError | IntRequested | TxDMAComplete| \
  89        UpdateStats | LinkEvent)
  90 #define EnableInt() \
  91 writew(DEFAULT_INTR, ioaddr + IntEnable)
  92
  93 static int max_intrloop = 50;
  94 static int multicast_filter_limit = 0x40;
  95
  96 static int rio_open (struct net_device *dev);
  97 static void rio_timer (unsigned long data);
  98 static void rio_tx_timeout (struct net_device *dev);
  99 static void alloc_list (struct net_device *dev);
 100 static int start_xmit (struct sk_buff *skb, struct net_device *dev);
 101 static void rio_interrupt (int irq, void *dev_instance, struct pt_regs *regs);
 102 static void rio_free_tx (struct net_device *dev, int irq);
 103 static void tx_error (struct net_device *dev, int tx_status);
 104 static int receive_packet (struct net_device *dev);
 105 static void rio_error (struct net_device *dev, int int_status);
 106 static int change_mtu (struct net_device *dev, int new_mtu);
 107 static void set_multicast (struct net_device *dev);
 108 static struct net_device_stats *get_stats (struct net_device *dev);
 109 static int clear_stats (struct net_device *dev);
 110 static int rio_ethtool_ioctl (struct net_device *dev, void *useraddr);
 111 static int rio_ioctl (struct net_device *dev, struct ifreq *rq, int cmd);
 112 static int rio_close (struct net_device *dev);
 113 static int find_miiphy (struct net_device *dev);
 114 static int parse_eeprom (struct net_device *dev);
 115 static int read_eeprom (long ioaddr, int eep_addr);
 116 static int mii_wait_link (struct net_device *dev, int wait);
 117 static int mii_set_media (struct net_device *dev);
 118 static int mii_get_media (struct net_device *dev);
 119 static int mii_set_media_pcs (struct net_device *dev);
 120 static int mii_get_media_pcs (struct net_device *dev);
 121 static int mii_read (struct net_device *dev, int phy_addr, int reg_num);
 122 static int mii_write (struct net_device *dev, int phy_addr, int reg_num,
 123                       u16 data);
 124
 125 static int __devinit
 126 rio_probe1 (struct pci_dev *pdev, const struct pci_device_id *ent)
 127 {
 128         struct net_device *dev;
 129         struct netdev_private *np;
 130         static int card_idx;
 131         int chip_idx = ent->driver_data;
 132         int err, irq;
 133         long ioaddr;
 134         static int version_printed;
 135         void *ring_space;
 136         dma_addr_t ring_dma;
 137
 138         if (!version_printed++)
 139                 printk ("%s", version);
 140
 141         err = pci_enable_device (pdev);
 142         if (err)
 143                 return err;
 144
 145         irq = pdev->irq;
 146         err = pci_request_regions (pdev, "dl2k");
 147         if (err)
 148                 goto err_out_disable;
 149
 150         pci_set_master (pdev);
 151         dev = alloc_etherdev (sizeof (*np));
 152         if (!dev) {
 153                 err = -ENOMEM;
 154                 goto err_out_res;
 155         }
 156         SET_MODULE_OWNER (dev);
 157
 158 #ifdef MEM_MAPPING
 159         ioaddr = pci_resource_start (pdev, 1);
 160         ioaddr = (long) ioremap (ioaddr, RIO_IO_SIZE);
 161         if (!ioaddr) {
 162                 err = -ENOMEM;
 163                 goto err_out_dev;
 164         }
 165 #else
 166         ioaddr = pci_resource_start (pdev, 0);
 167 #endif
 168         dev->base_addr = ioaddr;
 169         dev->irq = irq;
 170         np = dev->priv;
 171         np->chip_id = chip_idx;
 172         np->pdev = pdev;
 173         spin_lock_init (&np->tx_lock);
 174         spin_lock_init (&np->rx_lock);
 175
 176         /* Parse manual configuration */
 177         np->an_enable = 1;
 178         np->tx_coalesce = 1;
 179         if (card_idx < MAX_UNITS) {
 180                 if (media[card_idx] != NULL) {
 181                         np->an_enable = 0;
 182                         if (strcmp (media[card_idx], "auto") == 0 ||
 183                             strcmp (media[card_idx], "autosense") == 0 ||
 184                             strcmp (media[card_idx], "0") == 0 ) {
 185                                 np->an_enable = 2;
 186                         } else if (strcmp (media[card_idx], "100mbps_fd") == 0 ||
 187                             strcmp (media[card_idx], "4") == 0) {
 188                                 np->speed = 100;
 189                                 np->full_duplex = 1;
 190                         } else if (strcmp (media[card_idx], "100mbps_hd") == 0
 191                                    || strcmp (media[card_idx], "3") == 0) {
 192                                 np->speed = 100;
 193                                 np->full_duplex = 0;
 194                         } else if (strcmp (media[card_idx], "10mbps_fd") == 0 ||
 195                                    strcmp (media[card_idx], "2") == 0) {
 196                                 np->speed = 10;
 197                                 np->full_duplex = 1;
 198                         } else if (strcmp (media[card_idx], "10mbps_hd") == 0 ||
 199                                    strcmp (media[card_idx], "1") == 0) {
 200                                 np->speed = 10;
 201                                 np->full_duplex = 0;
 202                         } else if (strcmp (media[card_idx], "1000mbps_fd") == 0 ||
 203                                  strcmp (media[card_idx], "6") == 0) {
 204                                 np->speed=1000;
 205                                 np->full_duplex=1;
 206                         } else if (strcmp (media[card_idx], "1000mbps_hd") == 0 ||
 207                                  strcmp (media[card_idx], "5") == 0) {
 208                                 np->speed = 1000;
 209                                 np->full_duplex = 0;
 210                         } else {
 211                                 np->an_enable = 1;
 212                         }
 213                 }
 214                 if (jumbo[card_idx] != 0) {
 215                         np->jumbo = 1;
 216                         dev->mtu = MAX_JUMBO;
 217                 } else {
 218                         np->jumbo = 0;
 219                         if (mtu[card_idx] > 0 && mtu[card_idx] < PACKET_SIZE)
 220                                 dev->mtu = mtu[card_idx];
 221                 }
 222                 np->vlan = (vlan[card_idx] > 0 && vlan[card_idx] < 4096) ?
 223                     vlan[card_idx] : 0;
 224                 if (rx_coalesce > 0 && rx_timeout > 0) {
 225                         np->rx_coalesce = rx_coalesce;
 226                         np->rx_timeout = rx_timeout;
 227                         np->coalesce = 1;
 228                 }
 229                 np->tx_flow = (tx_flow == 0) ? 0 : 1;
 230                 np->rx_flow = (rx_flow == 0) ? 0 : 1;
 231
 232                 if (tx_coalesce < 1)
 233                         tx_coalesce = 1;
 234                 else if (tx_coalesce > TX_RING_SIZE-1)
 235                         tx_coalesce = TX_RING_SIZE - 1;
 236         }
 237         dev->open = &rio_open;
 238         dev->hard_start_xmit = &start_xmit;
 239         dev->stop = &rio_close;
 240         dev->get_stats = &get_stats;
 241         dev->set_multicast_list = &set_multicast;
 242         dev->do_ioctl = &rio_ioctl;
 243         dev->tx_timeout = &rio_tx_timeout;
 244         dev->watchdog_timeo = TX_TIMEOUT;
 245         dev->change_mtu = &change_mtu;
 246 #if 0
 247         dev->features = NETIF_F_IP_CSUM;
 248 #endif
 249         pci_set_drvdata (pdev, dev);
 250
 251         ring_space = pci_alloc_consistent (pdev, TX_TOTAL_SIZE, &ring_dma);
 252         if (!ring_space)
 253                 goto err_out_iounmap;
 254         np->tx_ring = (struct netdev_desc *) ring_space;
 255         np->tx_ring_dma = ring_dma;
 256
 257         ring_space = pci_alloc_consistent (pdev, RX_TOTAL_SIZE, &ring_dma);
 258         if (!ring_space)
 259                 goto err_out_unmap_tx;
 260         np->rx_ring = (struct netdev_desc *) ring_space;
 261         np->rx_ring_dma = ring_dma;
 262
 263         /* Parse eeprom data */
 264         parse_eeprom (dev);
 265
 266         /* Find PHY address */
 267         err = find_miiphy (dev);
 268         if (err)
 269                 goto err_out_unmap_rx;
 270
 271         /* Fiber device? */
 272         np->phy_media = (readw(ioaddr + ASICCtrl) & PhyMedia) ? 1 : 0;
 273         np->link_status = 0;
 274         /* Set media and reset PHY */
 275         if (np->phy_media) {
 276                 /* default Auto-Negotiation for fiber deivices */
 277                 if (np->an_enable == 2) {
 278                         np->an_enable = 1;
 279                 }
 280                 mii_set_media_pcs (dev);
 281         } else {
 282                 /* Auto-Negotiation is mandatory for 1000BASE-T,
 283                    IEEE 802.3ab Annex 28D page 14 */
 284                 if (np->speed == 1000)
 285                         np->an_enable = 1;
 286                 mii_set_media (dev);
 287         }
 288         pci_read_config_byte(pdev, PCI_REVISION_ID, &np->pci_rev_id);
 289
 290         err = register_netdev (dev);
 291         if (err)
 292                 goto err_out_unmap_rx;
 293
 294         card_idx++;
 295
 296         printk (KERN_INFO "%s: %s, %02x:%02x:%02x:%02x:%02x:%02x, IRQ %d\n",
 297                 dev->name, np->name,
 298                 dev->dev_addr[0], dev->dev_addr[1], dev->dev_addr[2],
 299                 dev->dev_addr[3], dev->dev_addr[4], dev->dev_addr[5], irq);
 300         if (tx_coalesce > 1)
 301                 printk(KERN_INFO "tx_coalesce:\t%d packets\n",
 302                                 tx_coalesce);
 303         if (np->coalesce)
 304                 printk(KERN_INFO "rx_coalesce:\t%d packets\n"
 305                        KERN_INFO "rx_timeout: \t%d ns\n",
 306                                 np->rx_coalesce, np->rx_timeout*640);
 307         if (np->vlan)
 308                 printk(KERN_INFO "vlan(id):\t%d\n", np->vlan);
 309         return 0;
 310
 311       err_out_unmap_rx:
 312         pci_free_consistent (pdev, RX_TOTAL_SIZE, np->rx_ring, np->rx_ring_dma);
 313       err_out_unmap_tx:
 314         pci_free_consistent (pdev, TX_TOTAL_SIZE, np->tx_ring, np->tx_ring_dma);
 315       err_out_iounmap:
 316 #ifdef MEM_MAPPING
 317         iounmap ((void *) ioaddr);
 318
 319       err_out_dev:
 320 #endif
 321         kfree (dev);
 322
 323       err_out_res:
 324         pci_release_regions (pdev);
 325
 326       err_out_disable:
 327         pci_disable_device (pdev);
 328         return err;
 329 }
 330
 331 int
 332 find_miiphy (struct net_device *dev)
 333 {
 334         int i, phy_found = 0;
 335         struct netdev_private *np;
 336         long ioaddr;
 337         np = dev->priv;
 338         ioaddr = dev->base_addr;
 339         np->phy_addr = 1;
 340
 341         for (i = 31; i >= 0; i--) {
 342                 int mii_status = mii_read (dev, i, 1);
 343                 if (mii_status != 0xffff && mii_status != 0x0000) {
 344                         np->phy_addr = i;
 345                         phy_found++;
 346                 }
 347         }
 348         if (!phy_found) {
 349                 printk (KERN_ERR "%s: No MII PHY found!\n", dev->name);
 350                 return -ENODEV;
 351         }
 352         return 0;
 353 }
 354
 355 int
 356 parse_eeprom (struct net_device *dev)
 357 {
 358         int i, j;
 359         long ioaddr = dev->base_addr;
 360         u8 sromdata[256];
 361         u8 *psib;
 362         u32 crc;
 363         PSROM_t psrom = (PSROM_t) sromdata;
 364         struct netdev_private *np = dev->priv;
 365
 366         int cid, next;
 367
 368 #ifdef  MEM_MAPPING
 369         ioaddr = pci_resource_start (np->pdev, 0);
 370 #endif
 371         /* Read eeprom */
 372         for (i = 0; i < 128; i++) {
 373                 ((u16 *) sromdata)[i] = le16_to_cpu (read_eeprom (ioaddr, i));
 374         }
 375 #ifdef  MEM_MAPPING
 376         ioaddr = dev->base_addr;
 377 #endif
 378         /* Check CRC */
 379         crc = ~ether_crc_le (256 - 4, sromdata);
 380         if (psrom->crc != crc) {
 381                 printk (KERN_ERR "%s: EEPROM data CRC error.\n", dev->name);
 382                 return -1;
 383         }
 384
 385         /* Set MAC address */
 386         for (i = 0; i < 6; i++)
 387                 dev->dev_addr[i] = psrom->mac_addr[i];
 388
 389         /* Parse Software Infomation Block */
 390         i = 0x30;
 391         psib = (u8 *) sromdata;
 392         do {
 393                 cid = psib[i++];
 394                 next = psib[i++];
 395                 if ((cid == 0 && next == 0) || (cid == 0xff && next == 0xff)) {
 396                         printk (KERN_ERR "Cell data error\n");
 397                         return -1;
 398                 }
 399                 switch (cid) {
 400                 case 0: /* Format version */
 401                         break;
 402                 case 1: /* End of cell */
 403                         return 0;
 404                 case 2: /* Duplex Polarity */
 405                         np->duplex_polarity = psib[i];
 406                         writeb (readb (ioaddr + PhyCtrl) | psib[i],
 407                                 ioaddr + PhyCtrl);
 408                         break;
 409                 case 3: /* Wake Polarity */
 410                         np->wake_polarity = psib[i];
 411                         break;
 412                 case 9: /* Adapter description */
 413                         j = (next - i > 255) ? 255 : next - i;
 414                         memcpy (np->name, &(psib[i]), j);
 415                         break;
 416                 case 4:
 417                 case 5:
 418                 case 6:
 419                 case 7:
 420                 case 8: /* Reversed */
 421                         break;
 422                 default:        /* Unknown cell */
 423                         return -1;
 424                 }
 425                 i = next;
 426         } while (1);
 427
 428         return 0;
 429 }
 430
 431 static int
 432 rio_open (struct net_device *dev)
 433 {
 434         struct netdev_private *np = dev->priv;
 435         long ioaddr = dev->base_addr;
 436         int i;
 437         u16 macctrl;
 438
 439         i = request_irq (dev->irq, &rio_interrupt, SA_SHIRQ, dev->name, dev);
 440         if (i)
 441                 return i;
 442
 443         /* Reset all logic functions */
 444         writew (GlobalReset | DMAReset | FIFOReset | NetworkReset | HostReset,
 445                 ioaddr + ASICCtrl + 2);
 446         mdelay(10);
 447
 448         /* DebugCtrl bit 4, 5, 9 must set */
 449         writel (readl (ioaddr + DebugCtrl) | 0x0230, ioaddr + DebugCtrl);
 450
 451         /* Jumbo frame */
 452         if (np->jumbo != 0)
 453                 writew (MAX_JUMBO+14, ioaddr + MaxFrameSize);
 454
 455         alloc_list (dev);
 456
 457         /* Get station address */
 458         for (i = 0; i < 6; i++)
 459                 writeb (dev->dev_addr[i], ioaddr + StationAddr0 + i);
 460
 461         set_multicast (dev);
 462         if (np->coalesce) {
 463                 writel (np->rx_coalesce | np->rx_timeout << 16,
 464                         ioaddr + RxDMAIntCtrl);
 465         }
 466         /* Set RIO to poll every N*320nsec. */
 467         writeb (0x20, ioaddr + RxDMAPollPeriod);
 468         writeb (0xff, ioaddr + TxDMAPollPeriod);
 469         writeb (0x30, ioaddr + RxDMABurstThresh);
 470         writeb (0x30, ioaddr + RxDMAUrgentThresh);
 471         writel (0x0007ffff, ioaddr + RmonStatMask);
 472         /* clear statistics */
 473         clear_stats (dev);
 474
 475         /* VLAN supported */
 476         if (np->vlan) {
 477                 /* priority field in RxDMAIntCtrl  */
 478                 writel (readl(ioaddr + RxDMAIntCtrl) | 0x7 << 10,
 479                         ioaddr + RxDMAIntCtrl);
 480                 /* VLANId */
 481                 writew (np->vlan, ioaddr + VLANId);
 482                 /* Length/Type should be 0x8100 */
 483                 writel (0x8100 << 16 | np->vlan, ioaddr + VLANTag);
 484                 /* Enable AutoVLANuntagging, but disable AutoVLANtagging.
 485                    VLAN information tagged by TFC' VID, CFI fields. */
 486                 writel (readl (ioaddr + MACCtrl) | AutoVLANuntagging,
 487                         ioaddr + MACCtrl);
 488         }
 489
 490         init_timer (&np->timer);
 491         np->timer.expires = jiffies + 1*HZ;
 492         np->timer.data = (unsigned long) dev;
 493         np->timer.function = &rio_timer;
 494         add_timer (&np->timer);
 495
 496         /* Start Tx/Rx */
 497         writel (readl (ioaddr + MACCtrl) | StatsEnable | RxEnable | TxEnable,
 498                         ioaddr + MACCtrl);
 499
 500         macctrl = 0;
 501         macctrl |= (np->vlan) ? AutoVLANuntagging : 0;
 502         macctrl |= (np->full_duplex) ? DuplexSelect : 0;
 503         macctrl |= (np->tx_flow) ? TxFlowControlEnable : 0;
 504         macctrl |= (np->rx_flow) ? RxFlowControlEnable : 0;
 505         writew(macctrl, ioaddr + MACCtrl);
 506
 507         netif_start_queue (dev);
 508
 509         /* Enable default interrupts */
 510         EnableInt ();
 511         return 0;
 512 }
 513
 514 static void
 515 rio_timer (unsigned long data)
 516 {
 517         struct net_device *dev = (struct net_device *)data;
 518         struct netdev_private *np = dev->priv;
 519         unsigned int entry;
 520         int next_tick = 1*HZ;
 521         unsigned long flags;
 522
 523         spin_lock_irqsave(&np->rx_lock, flags);
 524         /* Recover rx ring exhausted error */
 525         if (np->cur_rx - np->old_rx >= RX_RING_SIZE) {
 526                 printk(KERN_INFO "Try to recover rx ring exhausted...\n");
 527                 /* Re-allocate skbuffs to fill the descriptor ring */
 528                 for (; np->cur_rx - np->old_rx > 0; np->old_rx++) {
 529                         struct sk_buff *skb;
 530                         entry = np->old_rx % RX_RING_SIZE;
 531                         /* Dropped packets don't need to re-allocate */
 532                         if (np->rx_skbuff[entry] == NULL) {
 533                                 skb = dev_alloc_skb (np->rx_buf_sz);
 534                                 if (skb == NULL) {
 535                                         np->rx_ring[entry].fraginfo = 0;
 536                                         printk (KERN_INFO
 537                                                 "%s: Still unable to re-allocate Rx skbuff.#%d\n",
 538                                                 dev->name, entry);
 539                                         break;
 540                                 }
 541                                 np->rx_skbuff[entry] = skb;
 542                                 skb->dev = dev;
 543                                 /* 16 byte align the IP header */
 544                                 skb_reserve (skb, 2);
 545                                 np->rx_ring[entry].fraginfo =
 546                                     cpu_to_le64 (pci_map_single
 547                                          (np->pdev, skb->tail, np->rx_buf_sz,
 548                                           PCI_DMA_FROMDEVICE));
 549                         }
 550                         np->rx_ring[entry].fraginfo |=
 551                             cpu_to_le64 (np->rx_buf_sz) << 48;
 552                         np->rx_ring[entry].status = 0;
 553                 } /* end for */
 554         } /* end if */
 555         spin_unlock_irqrestore (&np->rx_lock, flags);
 556         np->timer.expires = jiffies + next_tick;
 557         add_timer(&np->timer);
 558 }
 559
 560 static void
 561 rio_tx_timeout (struct net_device *dev)
 562 {
 563         long ioaddr = dev->base_addr;
 564
 565         printk (KERN_INFO "%s: Tx timed out (%4.4x), is buffer full?\n",
 566                 dev->name, readl (ioaddr + TxStatus));
 567         rio_free_tx(dev, 0);
 568         dev->if_port = 0;
 569         dev->trans_start = jiffies;
 570 }
 571
 572  /* allocate and initialize Tx and Rx descriptors */
 573 static void
 574 alloc_list (struct net_device *dev)
 575 {
 576         struct netdev_private *np = dev->priv;
 577         int i;
 578
 579         np->cur_rx = np->cur_tx = 0;
 580         np->old_rx = np->old_tx = 0;
 581         np->rx_buf_sz = (dev->mtu <= 1500 ? PACKET_SIZE : dev->mtu + 32);
 582
 583         /* Initialize Tx descriptors, TFDListPtr leaves in start_xmit(). */
 584         for (i = 0; i < TX_RING_SIZE; i++) {
 585                 np->tx_skbuff[i] = 0;
 586                 np->tx_ring[i].status = cpu_to_le64 (TFDDone);
 587                 np->tx_ring[i].next_desc = cpu_to_le64 (np->tx_ring_dma +
 588                                               ((i+1)%TX_RING_SIZE) *
 589                                               sizeof (struct netdev_desc));
 590         }
 591
 592         /* Initialize Rx descriptors */
 593         for (i = 0; i < RX_RING_SIZE; i++) {
 594                 np->rx_ring[i].next_desc = cpu_to_le64 (np->rx_ring_dma +
 595                                                 ((i + 1) % RX_RING_SIZE) *
 596                                                 sizeof (struct netdev_desc));
 597                 np->rx_ring[i].status = 0;
 598                 np->rx_ring[i].fraginfo = 0;
 599                 np->rx_skbuff[i] = 0;
 600         }
 601
 602         /* Allocate the rx buffers */
 603         for (i = 0; i < RX_RING_SIZE; i++) {
 604                 /* Allocated fixed size of skbuff */
 605                 struct sk_buff *skb = dev_alloc_skb (np->rx_buf_sz);
 606                 np->rx_skbuff[i] = skb;
 607                 if (skb == NULL) {
 608                         printk (KERN_ERR
 609                                 "%s: alloc_list: allocate Rx buffer error! ",
 610                                 dev->name);
 611                         break;
 612                 }
 613                 skb->dev = dev; /* Mark as being used by this device. */
 614                 skb_reserve (skb, 2);   /* 16 byte align the IP header. */
 615                 /* Rubicon now supports 40 bits of addressing space. */
 616                 np->rx_ring[i].fraginfo =
 617                     cpu_to_le64 ( pci_map_single (
 618                                   np->pdev, skb->tail, np->rx_buf_sz,
 619                                   PCI_DMA_FROMDEVICE));
 620                 np->rx_ring[i].fraginfo |= cpu_to_le64 (np->rx_buf_sz) << 48;
 621         }
 622
 623         /* Set RFDListPtr */
 624         writel (cpu_to_le32 (np->rx_ring_dma), dev->base_addr + RFDListPtr0);
 625         writel (0, dev->base_addr + RFDListPtr1);
 626
 627         return;
 628 }
 629
 630 static int
 631 start_xmit (struct sk_buff *skb, struct net_device *dev)
 632 {
 633         struct netdev_private *np = dev->priv;
 634         struct netdev_desc *txdesc;
 635         unsigned entry;
 636         u32 ioaddr;
 637         u64 tfc_vlan_tag = 0;
 638
 639         if (np->link_status == 0) {     /* Link Down */
 640                 dev_kfree_skb(skb);
 641                 return 0;
 642         }
 643         ioaddr = dev->base_addr;
 644         entry = np->cur_tx % TX_RING_SIZE;
 645         np->tx_skbuff[entry] = skb;
 646         txdesc = &np->tx_ring[entry];
 647
 648 #if 0
 649         if (skb->ip_summed == CHECKSUM_HW) {
 650                 txdesc->status |=
 651                     cpu_to_le64 (TCPChecksumEnable | UDPChecksumEnable |
 652                                  IPChecksumEnable);
 653         }
 654 #endif
 655         if (np->vlan) {
 656                 tfc_vlan_tag =
 657                     cpu_to_le64 (VLANTagInsert) |
 658                     (cpu_to_le64 (np->vlan) << 32) |
 659                     (cpu_to_le64 (skb->priority) << 45);
 660         }
 661         txdesc->fraginfo = cpu_to_le64 (pci_map_single (np->pdev, skb->data,
 662                                                         skb->len,
 663                                                         PCI_DMA_TODEVICE));
 664         txdesc->fraginfo |= cpu_to_le64 (skb->len) << 48;
 665
 666         /* DL2K bug: DMA fails to get next descriptor ptr in 10Mbps mode
 667          * Work around: Always use 1 descriptor in 10Mbps mode */
 668         if (entry % np->tx_coalesce == 0 || np->speed == 10)
 669                 txdesc->status = cpu_to_le64 (entry | tfc_vlan_tag |
 670                                               WordAlignDisable |
 671                                               TxDMAIndicate |
 672                                               (1 << FragCountShift));
 673         else
 674                 txdesc->status = cpu_to_le64 (entry | tfc_vlan_tag |
 675                                               WordAlignDisable |
 676                                               (1 << FragCountShift));
 677
 678         /* TxDMAPollNow */
 679         writel (readl (ioaddr + DMACtrl) | 0x00001000, ioaddr + DMACtrl);
 680         /* Schedule ISR */
 681         writel(10000, ioaddr + CountDown);
 682         np->cur_tx = (np->cur_tx + 1) % TX_RING_SIZE;
 683         if ((np->cur_tx - np->old_tx + TX_RING_SIZE) % TX_RING_SIZE
 684                         < TX_QUEUE_LEN - 1 && np->speed != 10) {
 685                 /* do nothing */
 686         } else if (!netif_queue_stopped(dev)) {
 687                 netif_stop_queue (dev);
 688         }
 689
 690         /* The first TFDListPtr */
 691         if (readl (dev->base_addr + TFDListPtr0) == 0) {
 692                 writel (np->tx_ring_dma + entry * sizeof (struct netdev_desc),
 693                         dev->base_addr + TFDListPtr0);
 694                 writel (0, dev->base_addr + TFDListPtr1);
 695         }
 696
 697         /* NETDEV WATCHDOG timer */
 698         dev->trans_start = jiffies;
 699         return 0;
 700 }
 701
 702 static void
 703 rio_interrupt (int irq, void *dev_instance, struct pt_regs *rgs)
 704 {
 705         struct net_device *dev = dev_instance;
 706         struct netdev_private *np;
 707         unsigned int_status;
 708         long ioaddr;
 709         int cnt = max_intrloop;
 710
 711         ioaddr = dev->base_addr;
 712         np = dev->priv;
 713         while (1) {
 714                 int_status = readw (ioaddr + IntStatus);
 715                 writew (int_status, ioaddr + IntStatus);
 716                 int_status &= DEFAULT_INTR;
 717                 if (int_status == 0 || --cnt < 0)
 718                         break;
 719                 /* Processing received packets */
 720                 if (int_status & RxDMAComplete)
 721                         receive_packet (dev);
 722                 /* TxDMAComplete interrupt */
 723                 if ((int_status & (TxDMAComplete|IntRequested))) {
 724                         int tx_status;
 725                         tx_status = readl (ioaddr + TxStatus);
 726                         if (tx_status & 0x01)
 727                                 tx_error (dev, tx_status);
 728                         /* Free used tx skbuffs */
 729                         rio_free_tx (dev, 1);
 730                 }
 731
 732                 /* Handle uncommon events */
 733                 if (int_status &
 734                     (HostError | LinkEvent | UpdateStats))
 735                         rio_error (dev, int_status);
 736         }
 737         if (np->cur_tx != np->old_tx)
 738                 writel (100, ioaddr + CountDown);
 739 }
 740
 741 static void
 742 rio_free_tx (struct net_device *dev, int irq)
 743 {
 744         struct netdev_private *np = (struct netdev_private *) dev->priv;
 745         int entry = np->old_tx % TX_RING_SIZE;
 746         int tx_use = 0;
 747         long flag = 0;
 748
 749         if (irq)
 750                 spin_lock(&np->tx_lock);
 751         else
 752                 spin_lock_irqsave(&np->tx_lock, flag);
 753
 754         /* Free used tx skbuffs */
 755         while (entry != np->cur_tx) {
 756                 struct sk_buff *skb;
 757
 758                 if (!(np->tx_ring[entry].status & TFDDone))
 759                         break;
 760                 skb = np->tx_skbuff[entry];
 761                 pci_unmap_single (np->pdev,
 762                                   np->tx_ring[entry].fraginfo,
 763                                   skb->len, PCI_DMA_TODEVICE);
 764                 if (irq)
 765                         dev_kfree_skb_irq (skb);
 766                 else
 767                         dev_kfree_skb (skb);
 768
 769                 np->tx_skbuff[entry] = 0;
 770                 entry = (entry + 1) % TX_RING_SIZE;
 771                 tx_use++;
 772         }
 773         if (irq)
 774                 spin_unlock(&np->tx_lock);
 775         else
 776                 spin_unlock_irqrestore(&np->tx_lock, flag);
 777         np->old_tx = entry;
 778
 779         /* If the ring is no longer full, clear tx_full and
 780            call netif_wake_queue() */
 781
 782         if (netif_queue_stopped(dev) &&
 783             ((np->cur_tx - np->old_tx + TX_RING_SIZE) % TX_RING_SIZE
 784             < TX_QUEUE_LEN - 1 || np->speed == 10)) {
 785                 netif_wake_queue (dev);
 786         }
 787 }
 788
 789 static void
 790 tx_error (struct net_device *dev, int tx_status)
 791 {
 792         struct netdev_private *np;
 793         long ioaddr = dev->base_addr;
 794         int frame_id;
 795         int i;
 796
 797         np = dev->priv;
 798
 799         frame_id = (tx_status & 0xffff0000);
 800         printk (KERN_ERR "%s: Transmit error, TxStatus %4.4x, FrameId %d.\n",
 801                 dev->name, tx_status, frame_id);
 802         np->stats.tx_errors++;
 803         /* Ttransmit Underrun */
 804         if (tx_status & 0x10) {
 805                 np->stats.tx_fifo_errors++;
 806                 writew (readw (ioaddr + TxStartThresh) + 0x10,
 807                         ioaddr + TxStartThresh);
 808                 /* Transmit Underrun need to set TxReset, DMARest, FIFOReset */
 809                 writew (TxReset | DMAReset | FIFOReset | NetworkReset,
 810                         ioaddr + ASICCtrl + 2);
 811                 /* Wait for ResetBusy bit clear */
 812                 for (i = 50; i > 0; i--) {
 813                         if ((readw (ioaddr + ASICCtrl + 2) & ResetBusy) == 0)
 814                                 break;
 815                         mdelay (1);
 816                 }
 817                 rio_free_tx (dev, 1);
 818                 /* Reset TFDListPtr */
 819                 writel (np->tx_ring_dma +
 820                         np->old_tx * sizeof (struct netdev_desc),
 821                         dev->base_addr + TFDListPtr0);
 822                 writel (0, dev->base_addr + TFDListPtr1);
 823
 824                 /* Let TxStartThresh stay default value */
 825         }
 826         /* Late Collision */
 827         if (tx_status & 0x04) {
 828                 np->stats.tx_fifo_errors++;
 829                 /* TxReset and clear FIFO */
 830                 writew (TxReset | FIFOReset, ioaddr + ASICCtrl + 2);
 831                 /* Wait reset done */
 832                 for (i = 50; i > 0; i--) {
 833                         if ((readw (ioaddr + ASICCtrl + 2) & ResetBusy) == 0)
 834                                 break;
 835                         mdelay (1);
 836                 }
 837                 /* Let TxStartThresh stay default value */
 838         }
 839         /* Maximum Collisions */
 840 #ifdef ETHER_STATS
 841         if (tx_status & 0x08)
 842                 np->stats.collisions16++;
 843 #else
 844         if (tx_status & 0x08)
 845                 np->stats.collisions++;
 846 #endif
 847         /* Restart the Tx */
 848         writel (readw (dev->base_addr + MACCtrl) | TxEnable, ioaddr + MACCtrl);
 849 }
 850
 851 static int
 852 receive_packet (struct net_device *dev)
 853 {
 854         struct netdev_private *np = (struct netdev_private *) dev->priv;
 855         int entry = np->cur_rx % RX_RING_SIZE;
 856         int cnt = 30;
 857
 858         /* If RFDDone, FrameStart and FrameEnd set, there is a new packet in. */
 859         while (1) {
 860                 struct netdev_desc *desc = &np->rx_ring[entry];
 861                 int pkt_len;
 862                 u64 frame_status;
 863
 864                 if (!(desc->status & RFDDone) ||
 865                     !(desc->status & FrameStart) || !(desc->status & FrameEnd))
 866                         break;
 867
 868                 /* Chip omits the CRC. */
 869                 pkt_len = le64_to_cpu (desc->status & 0xffff);
 870                 frame_status = le64_to_cpu (desc->status);
 871                 if (--cnt < 0)
 872                         break;
 873                 pci_dma_sync_single (np->pdev, desc->fraginfo, np->rx_buf_sz,
 874                                      PCI_DMA_FROMDEVICE);
 875                 /* Update rx error statistics, drop packet. */
 876                 if (frame_status & RFS_Errors) {
 877                         np->stats.rx_errors++;
 878                         if (frame_status & (RxRuntFrame | RxLengthError))
 879                                 np->stats.rx_length_errors++;
 880                         if (frame_status & RxFCSError)
 881                                 np->stats.rx_crc_errors++;
 882                         if (frame_status & RxAlignmentError && np->speed != 1000)
 883                                 np->stats.rx_frame_errors++;
 884                         if (frame_status & RxFIFOOverrun)
 885                                 np->stats.rx_fifo_errors++;
 886                 } else {
 887                         struct sk_buff *skb;
 888
 889                         /* Small skbuffs for short packets */
 890                         if (pkt_len > copy_thresh) {
 891                                 pci_unmap_single (np->pdev, desc->fraginfo,
 892                                                   np->rx_buf_sz,
 893                                                   PCI_DMA_FROMDEVICE);
 894                                 skb_put (skb = np->rx_skbuff[entry], pkt_len);
 895                                 np->rx_skbuff[entry] = NULL;
 896                         } else if ((skb = dev_alloc_skb (pkt_len + 2)) != NULL) {
 897                                 skb->dev = dev;
 898                                 /* 16 byte align the IP header */
 899                                 skb_reserve (skb, 2);
 900                                 eth_copy_and_sum (skb,
 901                                                   np->rx_skbuff[entry]->tail,
 902                                                   pkt_len, 0);
 903                                 skb_put (skb, pkt_len);
 904                         }
 905                         skb->protocol = eth_type_trans (skb, dev);
 906 #if 0
 907                         /* Checksum done by hw, but csum value unavailable. */
 908                         if (np->pci_rev_id >= 0x0c &&
 909                                 !(frame_status & (TCPError | UDPError | IPError))) {
 910                                 skb->ip_summed = CHECKSUM_UNNECESSARY;
 911                         }
 912 #endif
 913                         netif_rx (skb);
 914                         dev->last_rx = jiffies;
 915                 }
 916                 entry = (entry + 1) % RX_RING_SIZE;
 917         }
 918         spin_lock(&np->rx_lock);
 919         np->cur_rx = entry;
 920         /* Re-allocate skbuffs to fill the descriptor ring */
 921         entry = np->old_rx;
 922         while (entry != np->cur_rx) {
 923                 struct sk_buff *skb;
 924                 /* Dropped packets don't need to re-allocate */
 925                 if (np->rx_skbuff[entry] == NULL) {
 926                         skb = dev_alloc_skb (np->rx_buf_sz);
 927                         if (skb == NULL) {
 928                                 np->rx_ring[entry].fraginfo = 0;
 929                                 printk (KERN_INFO
 930                                         "%s: receive_packet: "
 931                                         "Unable to re-allocate Rx skbuff.#%d\n",
 932                                         dev->name, entry);
 933                                 break;
 934                         }
 935                         np->rx_skbuff[entry] = skb;
 936                         skb->dev = dev;
 937                         /* 16 byte align the IP header */
 938                         skb_reserve (skb, 2);
 939                         np->rx_ring[entry].fraginfo =
 940                             cpu_to_le64 (pci_map_single
 941                                          (np->pdev, skb->tail, np->rx_buf_sz,
 942                                           PCI_DMA_FROMDEVICE));
 943                 }
 944                 np->rx_ring[entry].fraginfo |=
 945                     cpu_to_le64 (np->rx_buf_sz) << 48;
 946                 np->rx_ring[entry].status = 0;
 947                 entry = (entry + 1) % RX_RING_SIZE;
 948         }
 949         np->old_rx = entry;
 950         spin_unlock(&np->rx_lock);
 951         return 0;
 952 }
 953
 954 static void
 955 rio_error (struct net_device *dev, int int_status)
 956 {
 957         long ioaddr = dev->base_addr;
 958         struct netdev_private *np = dev->priv;
 959         u16 macctrl;
 960
 961         /* Link change event */
 962         if (int_status & LinkEvent) {
 963                 if (mii_wait_link (dev, 10) == 0) {
 964                         printk (KERN_INFO "%s: Link up\n", dev->name);
 965                         if (np->phy_media)
 966                                 mii_get_media_pcs (dev);
 967                         else
 968                                 mii_get_media (dev);
 969                         if (np->speed == 1000)
 970                                 np->tx_coalesce = tx_coalesce;
 971                         else
 972                                 np->tx_coalesce = 1;
 973                         macctrl = 0;
 974                         macctrl |= (np->vlan) ? AutoVLANuntagging : 0;
 975                         macctrl |= (np->full_duplex) ? DuplexSelect : 0;
 976                         macctrl |= (np->tx_flow) ?
 977                                 TxFlowControlEnable : 0;
 978                         macctrl |= (np->rx_flow) ?
 979                                 RxFlowControlEnable : 0;
 980                         writew(macctrl, ioaddr + MACCtrl);
 981                         np->link_status = 1;
 982                         netif_carrier_on(dev);
 983                 } else {
 984                         printk (KERN_INFO "%s: Link off\n", dev->name);
 985                         np->link_status = 0;
 986                         netif_carrier_off(dev);
 987                 }
 988         }
 989
 990         /* UpdateStats statistics registers */
 991         if (int_status & UpdateStats) {
 992                 get_stats (dev);
 993         }
 994
 995         /* PCI Error, a catastronphic error related to the bus interface
 996            occurs, set GlobalReset and HostReset to reset. */
 997         if (int_status & HostError) {
 998                 printk (KERN_ERR "%s: HostError! IntStatus %4.4x.\n",
 999                         dev->name, int_status);
1000                 writew (GlobalReset | HostReset, ioaddr + ASICCtrl + 2);
1001                 mdelay (500);
1002         }
1003 }
1004
1005 static struct net_device_stats *
1006 get_stats (struct net_device *dev)
1007 {
1008         long ioaddr = dev->base_addr;
1009         struct netdev_private *np = dev->priv;
1010 #ifdef MEM_MAPPING
1011         int i;
1012 #endif
1013         unsigned int stat_reg;
1014
1015         /* All statistics registers need to be acknowledged,
1016            else statistic overflow could cause problems */
1017
1018         np->stats.rx_packets += readl (ioaddr + FramesRcvOk);
1019         np->stats.tx_packets += readl (ioaddr + FramesXmtOk);
1020         np->stats.rx_bytes += readl (ioaddr + OctetRcvOk);
1021         np->stats.tx_bytes += readl (ioaddr + OctetXmtOk);
1022
1023         np->stats.multicast = readl (ioaddr + McstFramesRcvdOk);
1024         np->stats.collisions += readl (ioaddr + SingleColFrames)
1025                              +  readl (ioaddr + MultiColFrames);
1026
1027         /* detailed tx errors */
1028         stat_reg = readw (ioaddr + FramesAbortXSColls);
1029         np->stats.tx_aborted_errors += stat_reg;
1030         np->stats.tx_errors += stat_reg;
1031
1032         stat_reg = readw (ioaddr + CarrierSenseErrors);
1033         np->stats.tx_carrier_errors += stat_reg;
1034         np->stats.tx_errors += stat_reg;
1035
1036         /* Clear all other statistic register. */
1037         readl (ioaddr + McstOctetXmtOk);
1038         readw (ioaddr + BcstFramesXmtdOk);
1039         readl (ioaddr + McstFramesXmtdOk);
1040         readw (ioaddr + BcstFramesRcvdOk);
1041         readw (ioaddr + MacControlFramesRcvd);
1042         readw (ioaddr + FrameTooLongErrors);
1043         readw (ioaddr + InRangeLengthErrors);
1044         readw (ioaddr + FramesCheckSeqErrors);
1045         readw (ioaddr + FramesLostRxErrors);
1046         readl (ioaddr + McstOctetXmtOk);
1047         readl (ioaddr + BcstOctetXmtOk);
1048         readl (ioaddr + McstFramesXmtdOk);
1049         readl (ioaddr + FramesWDeferredXmt);
1050         readl (ioaddr + LateCollisions);
1051         readw (ioaddr + BcstFramesXmtdOk);
1052         readw (ioaddr + MacControlFramesXmtd);
1053         readw (ioaddr + FramesWEXDeferal);
1054
1055 #ifdef MEM_MAPPING
1056         for (i = 0x100; i <= 0x150; i += 4)
1057                 readl (ioaddr + i);
1058 #endif
1059         readw (ioaddr + TxJumboFrames);
1060         readw (ioaddr + RxJumboFrames);
1061         readw (ioaddr + TCPCheckSumErrors);
1062         readw (ioaddr + UDPCheckSumErrors);
1063         readw (ioaddr + IPCheckSumErrors);
1064         return &np->stats;
1065 }
1066
1067 static int
1068 clear_stats (struct net_device *dev)
1069 {
1070         long ioaddr = dev->base_addr;
1071 #ifdef MEM_MAPPING
1072         int i;
1073 #endif
1074
1075         /* All statistics registers need to be acknowledged,
1076            else statistic overflow could cause problems */
1077         readl (ioaddr + FramesRcvOk);
1078         readl (ioaddr + FramesXmtOk);
1079         readl (ioaddr + OctetRcvOk);
1080         readl (ioaddr + OctetXmtOk);
1081
1082         readl (ioaddr + McstFramesRcvdOk);
1083         readl (ioaddr + SingleColFrames);
1084         readl (ioaddr + MultiColFrames);
1085         readl (ioaddr + LateCollisions);
1086         /* detailed rx errors */
1087         readw (ioaddr + FrameTooLongErrors);
1088         readw (ioaddr + InRangeLengthErrors);
1089         readw (ioaddr + FramesCheckSeqErrors);
1090         readw (ioaddr + FramesLostRxErrors);
1091
1092         /* detailed tx errors */
1093         readw (ioaddr + FramesAbortXSColls);
1094         readw (ioaddr + CarrierSenseErrors);
1095
1096         /* Clear all other statistic register. */
1097         readl (ioaddr + McstOctetXmtOk);
1098         readw (ioaddr + BcstFramesXmtdOk);
1099         readl (ioaddr + McstFramesXmtdOk);
1100         readw (ioaddr + BcstFramesRcvdOk);
1101         readw (ioaddr + MacControlFramesRcvd);
1102         readl (ioaddr + McstOctetXmtOk);
1103         readl (ioaddr + BcstOctetXmtOk);
1104         readl (ioaddr + McstFramesXmtdOk);
1105         readl (ioaddr + FramesWDeferredXmt);
1106         readw (ioaddr + BcstFramesXmtdOk);
1107         readw (ioaddr + MacControlFramesXmtd);
1108         readw (ioaddr + FramesWEXDeferal);
1109 #ifdef MEM_MAPPING
1110         for (i = 0x100; i <= 0x150; i += 4)
1111                 readl (ioaddr + i);
1112 #endif
1113         readw (ioaddr + TxJumboFrames);
1114         readw (ioaddr + RxJumboFrames);
1115         readw (ioaddr + TCPCheckSumErrors);
1116         readw (ioaddr + UDPCheckSumErrors);
1117         readw (ioaddr + IPCheckSumErrors);
1118         return 0;
1119 }
1120
1121
1122 int
1123 change_mtu (struct net_device *dev, int new_mtu)
1124 {
1125         struct netdev_private *np = dev->priv;
1126         int max = (np->jumbo) ? MAX_JUMBO : 1536;
1127
1128         if ((new_mtu < 68) || (new_mtu > max)) {
1129                 return -EINVAL;
1130         }
1131
1132         dev->mtu = new_mtu;
1133
1134         return 0;
1135 }
1136
1137 static void
1138 set_multicast (struct net_device *dev)
1139 {
1140         long ioaddr = dev->base_addr;
1141         u32 hash_table[2];
1142         u16 rx_mode = 0;
1143         int i;
1144         int bit;
1145         int index, crc;
1146         struct dev_mc_list *mclist;
1147         struct netdev_private *np = dev->priv;
1148
1149         hash_table[0] = hash_table[1] = 0;
1150         /* RxFlowcontrol DA: 01-80-C2-00-00-01. Hash index=0x39 */
1151         hash_table[1] |= cpu_to_le32(0x02000000);
1152         if (dev->flags & IFF_PROMISC) {
1153                 /* Receive all frames promiscuously. */
1154                 rx_mode = ReceiveAllFrames;
1155         } else if ((dev->flags & IFF_ALLMULTI) ||
1156                         (dev->mc_count > multicast_filter_limit)) {
1157                 /* Receive broadcast and multicast frames */
1158                 rx_mode = ReceiveBroadcast | ReceiveMulticast | ReceiveUnicast;
1159         } else if (dev->mc_count > 0) {
1160                 /* Receive broadcast frames and multicast frames filtering
1161                    by Hashtable */
1162                 rx_mode =
1163                     ReceiveBroadcast | ReceiveMulticastHash | ReceiveUnicast;
1164                 for (i=0, mclist = dev->mc_list; mclist && i < dev->mc_count;
1165                                 i++, mclist=mclist->next)
1166                 {
1167                         crc = ether_crc_le (ETH_ALEN, mclist->dmi_addr);
1168                         /* The inverted high significant 6 bits of CRC are
1169                            used as an index to hashtable */
1170                         for (index=0, bit=0; bit < 6; bit++) {
1171                                 if (test_bit(31-bit, &crc)) {
1172                                          set_bit(bit, &index);
1173                                 }
1174                         }
1175                         hash_table[index / 32] |= (1 << (index % 32));
1176                 }
1177         } else {
1178                 rx_mode = ReceiveBroadcast | ReceiveUnicast;
1179         }
1180         if (np->vlan) {
1181                 /* ReceiveVLANMatch field in ReceiveMode */
1182                 rx_mode |= ReceiveVLANMatch;
1183         }
1184
1185         writel (hash_table[0], ioaddr + HashTable0);
1186         writel (hash_table[1], ioaddr + HashTable1);
1187         writew (rx_mode, ioaddr + ReceiveMode);
1188 }
1189
1190 static int
1191 rio_ethtool_ioctl (struct net_device *dev, void *useraddr)
1192 {
1193         struct netdev_private *np = dev->priv;
1194         u32 ethcmd;
1195
1196         if (copy_from_user (&ethcmd, useraddr, sizeof (ethcmd)))
1197                 return -EFAULT;
1198         switch (ethcmd) {
1199                 case ETHTOOL_GDRVINFO: {
1200                         struct ethtool_drvinfo info = { ETHTOOL_GDRVINFO };
1201                         strcpy(info.driver, "DL2K");
1202                         strcpy(info.version, DRV_VERSION);
1203                         strcpy(info.bus_info, np->pdev->slot_name);
1204                         memset(&info.fw_version, 0, sizeof(info.fw_version));
1205                         if (copy_to_user(useraddr, &info, sizeof(info)))
1206                                 return -EFAULT;
1207                         return 0;
1208                 }
1209
1210                 case ETHTOOL_GSET: {
1211                         struct ethtool_cmd cmd = { ETHTOOL_GSET };
1212                         if (np->phy_media) {
1213                                 /* fiber device */
1214                                 cmd.supported = SUPPORTED_Autoneg |
1215                                                         SUPPORTED_FIBRE;
1216                                 cmd.advertising= ADVERTISED_Autoneg |
1217                                                         ADVERTISED_FIBRE;
1218                                 cmd.port = PORT_FIBRE;
1219                                 cmd.transceiver = XCVR_INTERNAL;
1220                         } else {
1221                                 /* copper device */
1222                                 cmd.supported = SUPPORTED_10baseT_Half |
1223                                         SUPPORTED_10baseT_Full | SUPPORTED_100baseT_Half
1224                                         | SUPPORTED_100baseT_Full | SUPPORTED_1000baseT_Full |
1225                                         SUPPORTED_Autoneg | SUPPORTED_MII;
1226                                 cmd.advertising = ADVERTISED_10baseT_Half |
1227                                         ADVERTISED_10baseT_Full | ADVERTISED_100baseT_Half |
1228                                         ADVERTISED_100baseT_Full | ADVERTISED_1000baseT_Full|
1229                                         ADVERTISED_Autoneg | ADVERTISED_MII;
1230                                 cmd.port = PORT_MII;
1231                                 cmd.transceiver = XCVR_INTERNAL;
1232                         }
1233                         if ( np->link_status ) {
1234                                 cmd.speed = np->speed;
1235                                 cmd.duplex = np->full_duplex ?
1236                                                     DUPLEX_FULL : DUPLEX_HALF;
1237                         } else {
1238                                 cmd.speed = -1;
1239                                 cmd.duplex = -1;
1240                         }
1241                         if ( np->an_enable)
1242                                 cmd.autoneg = AUTONEG_ENABLE;
1243                         else
1244                                 cmd.autoneg = AUTONEG_DISABLE;
1245
1246                         cmd.phy_address = np->phy_addr;
1247
1248                         if (copy_to_user(useraddr, &cmd,
1249                                         sizeof(cmd)))
1250                                 return -EFAULT;
1251                         return 0;
1252                 }
1253                 case ETHTOOL_SSET: {
1254                         struct ethtool_cmd cmd;
1255                         if (copy_from_user(&cmd, useraddr, sizeof(cmd)))
1256                                 return -EFAULT;
1257                         netif_carrier_off(dev);
1258                         if (cmd.autoneg == AUTONEG_ENABLE) {
1259                                 if (np->an_enable)
1260                                         return 0;
1261                                 else {
1262                                         np->an_enable = 1;
1263                                         mii_set_media(dev);
1264                                         return 0;
1265                                 }
1266                         } else {
1267                                 np->an_enable = 0;
1268                                 if (np->speed == 1000){
1269                                         cmd.speed = SPEED_100;
1270                                         cmd.duplex = DUPLEX_FULL;
1271                                         printk("Warning!! Can't disable Auto negotiation in 1000Mbps, change to Manul 100Mbps, Full duplex.\n");
1272                                         }
1273                                 switch(cmd.speed + cmd.duplex){
1274
1275                                 case SPEED_10 + DUPLEX_HALF:
1276                                         np->speed = 10;
1277                                         np->full_duplex = 0;
1278                                         break;
1279
1280                                 case SPEED_10 + DUPLEX_FULL:
1281                                         np->speed = 10;
1282                                         np->full_duplex = 1;
1283                                         break;
1284                                 case SPEED_100 + DUPLEX_HALF:
1285                                         np->speed = 100;
1286                                         np->full_duplex = 0;
1287                                         break;
1288                                 case SPEED_100 + DUPLEX_FULL:
1289                                         np->speed = 100;
1290                                         np->full_duplex = 1;
1291                                         break;
1292                                 case SPEED_1000 + DUPLEX_HALF:/* not supported */
1293                                 case SPEED_1000 + DUPLEX_FULL:/* not supported */
1294                                 default:
1295                                         return -EINVAL;
1296                                 }
1297                                 mii_set_media(dev);
1298                         }
1299                 return 0;
1300                 }
1301 #ifdef ETHTOOL_GLINK
1302                 case ETHTOOL_GLINK:{
1303                 struct ethtool_value link = { ETHTOOL_GLINK };
1304                 link.data = np->link_status;
1305                 if (copy_to_user(useraddr, &link, sizeof(link)))
1306                         return -EFAULT;
1307                 return 0;
1308                 }
1309 #endif
1310                 default:
1311                 return -EOPNOTSUPP;
1312         }
1313 }
1314
1315
1316 static int
1317 rio_ioctl (struct net_device *dev, struct ifreq *rq, int cmd)
1318 {
1319         int phy_addr;
1320         struct netdev_private *np = dev->priv;
1321         struct mii_data *miidata = (struct mii_data *) &rq->ifr_data;
1322
1323         struct netdev_desc *desc;
1324         int i;
1325
1326         phy_addr = np->phy_addr;
1327         switch (cmd) {
1328         case SIOCETHTOOL:
1329                 return rio_ethtool_ioctl (dev, (void *) rq->ifr_data);
1330         case SIOCDEVPRIVATE:
1331                 break;
1332
1333         case SIOCDEVPRIVATE + 1:
1334                 miidata->out_value = mii_read (dev, phy_addr, miidata->reg_num);
1335                 break;
1336         case SIOCDEVPRIVATE + 2:
1337                 mii_write (dev, phy_addr, miidata->reg_num, miidata->in_value);
1338                 break;
1339         case SIOCDEVPRIVATE + 3:
1340                 break;
1341         case SIOCDEVPRIVATE + 4:
1342                 break;
1343         case SIOCDEVPRIVATE + 5:
1344                 netif_stop_queue (dev);
1345                 break;
1346         case SIOCDEVPRIVATE + 6:
1347                 netif_wake_queue (dev);
1348                 break;
1349         case SIOCDEVPRIVATE + 7:
1350                 printk
1351                     ("tx_full=%x cur_tx=%lx old_tx=%lx cur_rx=%lx old_rx=%lx\n",
1352                      netif_queue_stopped(dev), np->cur_tx, np->old_tx, np->cur_rx,
1353                      np->old_rx);
1354                 break;
1355         case SIOCDEVPRIVATE + 8:
1356                 printk("TX ring:\n");
1357                 for (i = 0; i < TX_RING_SIZE; i++) {
1358                         desc = &np->tx_ring[i];
1359                         printk
1360                             ("%02x:cur:%08x next:%08x status:%08x frag1:%08x frag0:%08x",
1361                              i,
1362                              (u32) (np->tx_ring_dma + i * sizeof (*desc)),
1363                              (u32) desc->next_desc,
1364                              (u32) desc->status, (u32) (desc->fraginfo >> 32),
1365                              (u32) desc->fraginfo);
1366                         printk ("\n");
1367                 }
1368                 printk ("\n");
1369                 break;
1370
1371         default:
1372                 return -EOPNOTSUPP;
1373         }
1374         return 0;
1375 }
1376
1377 #define EEP_READ 0x0200
1378 #define EEP_BUSY 0x8000
1379 /* Read the EEPROM word */
1380 /* We use I/O instruction to read/write eeprom to avoid fail on some machines */
1381 int
1382 read_eeprom (long ioaddr, int eep_addr)
1383 {
1384         int i = 1000;
1385         outw (EEP_READ | (eep_addr & 0xff), ioaddr + EepromCtrl);
1386         while (i-- > 0) {
1387                 if (!(inw (ioaddr + EepromCtrl) & EEP_BUSY)) {
1388                         return inw (ioaddr + EepromData);
1389                 }
1390         }
1391         return 0;
1392 }
1393
1394 enum phy_ctrl_bits {
1395         MII_READ = 0x00, MII_CLK = 0x01, MII_DATA1 = 0x02, MII_WRITE = 0x04,
1396         MII_DUPLEX = 0x08,
1397 };
1398
1399 #define mii_delay() readb(ioaddr)
1400 static void
1401 mii_sendbit (struct net_device *dev, u32 data)
1402 {
1403         long ioaddr = dev->base_addr + PhyCtrl;
1404         data = (data) ? MII_DATA1 : 0;
1405         data |= MII_WRITE;
1406         data |= (readb (ioaddr) & 0xf8) | MII_WRITE;
1407         writeb (data, ioaddr);
1408         mii_delay ();
1409         writeb (data | MII_CLK, ioaddr);
1410         mii_delay ();
1411 }
1412
1413 static int
1414 mii_getbit (struct net_device *dev)
1415 {
1416         long ioaddr = dev->base_addr + PhyCtrl;
1417         u8 data;
1418
1419         data = (readb (ioaddr) & 0xf8) | MII_READ;
1420         writeb (data, ioaddr);
1421         mii_delay ();
1422         writeb (data | MII_CLK, ioaddr);
1423         mii_delay ();
1424         return ((readb (ioaddr) >> 1) & 1);
1425 }
1426
1427 static void
1428 mii_send_bits (struct net_device *dev, u32 data, int len)
1429 {
1430         int i;
1431         for (i = len - 1; i >= 0; i--) {
1432                 mii_sendbit (dev, data & (1 << i));
1433         }
1434 }
1435
1436 static int
1437 mii_read (struct net_device *dev, int phy_addr, int reg_num)
1438 {
1439         u32 cmd;
1440         int i;
1441         u32 retval = 0;
1442
1443         /* Preamble */
1444         mii_send_bits (dev, 0xffffffff, 32);
1445         /* ST(2), OP(2), ADDR(5), REG#(5), TA(2), Data(16) total 32 bits */
1446         /* ST,OP = 0110'b for read operation */
1447         cmd = (0x06 << 10 | phy_addr << 5 | reg_num);
1448         mii_send_bits (dev, cmd, 14);
1449         /* Turnaround */
1450         if (mii_getbit (dev))
1451                 goto err_out;
1452         /* Read data */
1453         for (i = 0; i < 16; i++) {
1454                 retval |= mii_getbit (dev);
1455                 retval <<= 1;
1456         }
1457         /* End cycle */
1458         mii_getbit (dev);
1459         return (retval >> 1) & 0xffff;
1460
1461       err_out:
1462         return 0;
1463 }
1464 static int
1465 mii_write (struct net_device *dev, int phy_addr, int reg_num, u16 data)
1466 {
1467         u32 cmd;
1468
1469         /* Preamble */
1470         mii_send_bits (dev, 0xffffffff, 32);
1471         /* ST(2), OP(2), ADDR(5), REG#(5), TA(2), Data(16) total 32 bits */
1472         /* ST,OP,AAAAA,RRRRR,TA = 0101xxxxxxxxxx10'b = 0x5002 for write */
1473         cmd = (0x5002 << 16) | (phy_addr << 23) | (reg_num << 18) | data;
1474         mii_send_bits (dev, cmd, 32);
1475         /* End cycle */
1476         mii_getbit (dev);
1477         return 0;
1478 }
1479 static int
1480 mii_wait_link (struct net_device *dev, int wait)
1481 {
1482         BMSR_t bmsr;
1483         int phy_addr;
1484         struct netdev_private *np;
1485
1486         np = dev->priv;
1487         phy_addr = np->phy_addr;
1488
1489         do {
1490                 bmsr.image = mii_read (dev, phy_addr, MII_BMSR);
1491                 if (bmsr.bits.link_status)
1492                         return 0;
1493                 mdelay (1);
1494         } while (--wait > 0);
1495         return -1;
1496 }
1497 static int
1498 mii_get_media (struct net_device *dev)
1499 {
1500         ANAR_t negotiate;
1501         BMSR_t bmsr;
1502         BMCR_t bmcr;
1503         MSCR_t mscr;
1504         MSSR_t mssr;
1505         int phy_addr;
1506         struct netdev_private *np;
1507
1508         np = dev->priv;
1509         phy_addr = np->phy_addr;
1510
1511         bmsr.image = mii_read (dev, phy_addr, MII_BMSR);
1512         if (np->an_enable) {
1513                 if (!bmsr.bits.an_complete) {
1514                         /* Auto-Negotiation not completed */
1515                         return -1;
1516                 }
1517                 negotiate.image = mii_read (dev, phy_addr, MII_ANAR) &
1518                         mii_read (dev, phy_addr, MII_ANLPAR);
1519                 mscr.image = mii_read (dev, phy_addr, MII_MSCR);
1520                 mssr.image = mii_read (dev, phy_addr, MII_MSSR);
1521                 if (mscr.bits.media_1000BT_FD & mssr.bits.lp_1000BT_FD) {
1522                         np->speed = 1000;
1523                         np->full_duplex = 1;
1524                         printk (KERN_INFO "Auto 1000 Mbps, Full duplex\n");
1525                 } else if (mscr.bits.media_1000BT_HD & mssr.bits.lp_1000BT_HD) {
1526                         np->speed = 1000;
1527                         np->full_duplex = 0;
1528                         printk (KERN_INFO "Auto 1000 Mbps, Half duplex\n");
1529                 } else if (negotiate.bits.media_100BX_FD) {
1530                         np->speed = 100;
1531                         np->full_duplex = 1;
1532                         printk (KERN_INFO "Auto 100 Mbps, Full duplex\n");
1533                 } else if (negotiate.bits.media_100BX_HD) {
1534                         np->speed = 100;
1535                         np->full_duplex = 0;
1536                         printk (KERN_INFO "Auto 100 Mbps, Half duplex\n");
1537                 } else if (negotiate.bits.media_10BT_FD) {
1538                         np->speed = 10;
1539                         np->full_duplex = 1;
1540                         printk (KERN_INFO "Auto 10 Mbps, Full duplex\n");
1541                 } else if (negotiate.bits.media_10BT_HD) {
1542                         np->speed = 10;
1543                         np->full_duplex = 0;
1544                         printk (KERN_INFO "Auto 10 Mbps, Half duplex\n");
1545                 }
1546                 if (negotiate.bits.pause) {
1547                         np->tx_flow &= 1;
1548                         np->rx_flow &= 1;
1549                 } else if (negotiate.bits.asymmetric) {
1550                         np->tx_flow = 0;
1551                         np->rx_flow &= 1;
1552                 }
1553                 /* else tx_flow, rx_flow = user select  */
1554         } else {
1555                 bmcr.image = mii_read (dev, phy_addr, MII_BMCR);
1556                 if (bmcr.bits.speed100 == 1 && bmcr.bits.speed1000 == 0) {
1557                         printk (KERN_INFO "Operating at 100 Mbps, ");
1558                 } else if (bmcr.bits.speed100 == 0 && bmcr.bits.speed1000 == 0) {
1559                         printk (KERN_INFO "Operating at 10 Mbps, ");
1560                 } else if (bmcr.bits.speed100 == 0 && bmcr.bits.speed1000 == 1) {
1561                         printk (KERN_INFO "Operating at 1000 Mbps, ");
1562                 }
1563                 if (bmcr.bits.duplex_mode) {
1564                         printk ("Full duplex\n");
1565                 } else {
1566                         printk ("Half duplex\n");
1567                 }
1568         }
1569         if (np->tx_flow)
1570                 printk(KERN_INFO "Enable Tx Flow Control\n");
1571         else
1572                 printk(KERN_INFO "Disable Tx Flow Control\n");
1573         if (np->rx_flow)
1574                 printk(KERN_INFO "Enable Rx Flow Control\n");
1575         else
1576                 printk(KERN_INFO "Disable Rx Flow Control\n");
1577
1578         return 0;
1579 }
1580
1581 static int
1582 mii_set_media (struct net_device *dev)
1583 {
1584         PHY_SCR_t pscr;
1585         BMCR_t bmcr;
1586         BMSR_t bmsr;
1587         ANAR_t anar;
1588         int phy_addr;
1589         struct netdev_private *np;
1590         np = dev->priv;
1591         phy_addr = np->phy_addr;
1592
1593         /* Does user set speed? */
1594         if (np->an_enable) {
1595                 /* Advertise capabilities */
1596                 bmsr.image = mii_read (dev, phy_addr, MII_BMSR);
1597                 anar.image = mii_read (dev, phy_addr, MII_ANAR);
1598                 anar.bits.media_100BX_FD = bmsr.bits.media_100BX_FD;
1599                 anar.bits.media_100BX_HD = bmsr.bits.media_100BX_HD;
1600                 anar.bits.media_100BT4 = bmsr.bits.media_100BT4;
1601                 anar.bits.media_10BT_FD = bmsr.bits.media_10BT_FD;
1602                 anar.bits.media_10BT_HD = bmsr.bits.media_10BT_HD;
1603                 anar.bits.pause = 1;
1604                 anar.bits.asymmetric = 1;
1605                 mii_write (dev, phy_addr, MII_ANAR, anar.image);
1606
1607                 /* Enable Auto crossover */
1608                 pscr.image = mii_read (dev, phy_addr, MII_PHY_SCR);
1609                 pscr.bits.mdi_crossover_mode = 3;       /* 11'b */
1610                 mii_write (dev, phy_addr, MII_PHY_SCR, pscr.image);
1611
1612                 /* Soft reset PHY */
1613                 mii_write (dev, phy_addr, MII_BMCR, MII_BMCR_RESET);
1614                 bmcr.image = 0;
1615                 bmcr.bits.an_enable = 1;
1616                 bmcr.bits.restart_an = 1;
1617                 bmcr.bits.reset = 1;
1618                 mii_write (dev, phy_addr, MII_BMCR, bmcr.image);
1619                 mdelay(1);
1620         } else {
1621                 /* Force speed setting */
1622                 /* 1) Disable Auto crossover */
1623                 pscr.image = mii_read (dev, phy_addr, MII_PHY_SCR);
1624                 pscr.bits.mdi_crossover_mode = 0;
1625                 mii_write (dev, phy_addr, MII_PHY_SCR, pscr.image);
1626
1627                 /* 2) PHY Reset */
1628                 bmcr.image = mii_read (dev, phy_addr, MII_BMCR);
1629                 bmcr.bits.reset = 1;
1630                 mii_write (dev, phy_addr, MII_BMCR, bmcr.image);
1631
1632                 /* 3) Power Down */
1633                 bmcr.image = 0x1940;    /* must be 0x1940 */
1634                 mii_write (dev, phy_addr, MII_BMCR, bmcr.image);
1635                 mdelay (100);   /* wait a certain time */
1636
1637                 /* 4) Advertise nothing */
1638                 mii_write (dev, phy_addr, MII_ANAR, 0);
1639
1640                 /* 5) Set media and Power Up */
1641                 bmcr.image = 0;
1642                 bmcr.bits.power_down = 1;
1643                 if (np->speed == 100) {
1644                         bmcr.bits.speed100 = 1;
1645                         bmcr.bits.speed1000 = 0;
1646                         printk (KERN_INFO "Manual 100 Mbps, ");
1647                 } else if (np->speed == 10) {
1648                         bmcr.bits.speed100 = 0;
1649                         bmcr.bits.speed1000 = 0;
1650                         printk (KERN_INFO "Manual 10 Mbps, ");
1651                 }
1652                 if (np->full_duplex) {
1653                         bmcr.bits.duplex_mode = 1;
1654                         printk ("Full duplex\n");
1655                 } else {
1656                         bmcr.bits.duplex_mode = 0;
1657                         printk ("Half duplex\n");
1658                 }
1659 #if 0
1660                 /* Set 1000BaseT Master/Slave setting */
1661                 mscr.image = mii_read (dev, phy_addr, MII_MSCR);
1662                 mscr.bits.cfg_enable = 1;
1663                 mscr.bits.cfg_value = 0;
1664 #endif
1665                 mii_write (dev, phy_addr, MII_BMCR, bmcr.image);
1666                 mdelay(10);
1667         }
1668         return 0;
1669 }
1670
1671 static int
1672 mii_get_media_pcs (struct net_device *dev)
1673 {
1674         ANAR_PCS_t negotiate;
1675         BMSR_t bmsr;
1676         BMCR_t bmcr;
1677         int phy_addr;
1678         struct netdev_private *np;
1679
1680         np = dev->priv;
1681         phy_addr = np->phy_addr;
1682
1683         bmsr.image = mii_read (dev, phy_addr, PCS_BMSR);
1684         if (np->an_enable) {
1685                 if (!bmsr.bits.an_complete) {
1686                         /* Auto-Negotiation not completed */
1687                         return -1;
1688                 }
1689                 negotiate.image = mii_read (dev, phy_addr, PCS_ANAR) &
1690                         mii_read (dev, phy_addr, PCS_ANLPAR);
1691                 np->speed = 1000;
1692                 if (negotiate.bits.full_duplex) {
1693                         printk (KERN_INFO "Auto 1000 Mbps, Full duplex\n");
1694                         np->full_duplex = 1;
1695                 } else {
1696                         printk (KERN_INFO "Auto 1000 Mbps, half duplex\n");
1697                         np->full_duplex = 0;
1698                 }
1699                 if (negotiate.bits.pause) {
1700                         np->tx_flow &= 1;
1701                         np->rx_flow &= 1;
1702                 } else if (negotiate.bits.asymmetric) {
1703                         np->tx_flow = 0;
1704                         np->rx_flow &= 1;
1705                 }
1706                 /* else tx_flow, rx_flow = user select  */
1707         } else {
1708                 bmcr.image = mii_read (dev, phy_addr, PCS_BMCR);
1709                 printk (KERN_INFO "Operating at 1000 Mbps, ");
1710                 if (bmcr.bits.duplex_mode) {
1711                         printk ("Full duplex\n");
1712                 } else {
1713                         printk ("Half duplex\n");
1714                 }
1715         }
1716         if (np->tx_flow)
1717                 printk(KERN_INFO "Enable Tx Flow Control\n");
1718         else
1719                 printk(KERN_INFO "Disable Tx Flow Control\n");
1720         if (np->rx_flow)
1721                 printk(KERN_INFO "Enable Rx Flow Control\n");
1722         else
1723                 printk(KERN_INFO "Disable Rx Flow Control\n");
1724
1725         return 0;
1726 }
1727
1728 static int
1729 mii_set_media_pcs (struct net_device *dev)
1730 {
1731         BMCR_t bmcr;
1732         ESR_t esr;
1733         ANAR_PCS_t anar;
1734         int phy_addr;
1735         struct netdev_private *np;
1736         np = dev->priv;
1737         phy_addr = np->phy_addr;
1738
1739         /* Auto-Negotiation? */
1740         if (np->an_enable) {
1741                 /* Advertise capabilities */
1742                 esr.image = mii_read (dev, phy_addr, PCS_ESR);
1743                 anar.image = mii_read (dev, phy_addr, MII_ANAR);
1744                 anar.bits.half_duplex =
1745                         esr.bits.media_1000BT_HD | esr.bits.media_1000BX_HD;
1746                 anar.bits.full_duplex =
1747                         esr.bits.media_1000BT_FD | esr.bits.media_1000BX_FD;
1748                 anar.bits.pause = 1;
1749                 anar.bits.asymmetric = 1;
1750                 mii_write (dev, phy_addr, MII_ANAR, anar.image);
1751
1752                 /* Soft reset PHY */
1753                 mii_write (dev, phy_addr, MII_BMCR, MII_BMCR_RESET);
1754                 bmcr.image = 0;
1755                 bmcr.bits.an_enable = 1;
1756                 bmcr.bits.restart_an = 1;
1757                 bmcr.bits.reset = 1;
1758                 mii_write (dev, phy_addr, MII_BMCR, bmcr.image);
1759                 mdelay(1);
1760         } else {
1761                 /* Force speed setting */
1762                 /* PHY Reset */
1763                 bmcr.image = 0;
1764                 bmcr.bits.reset = 1;
1765                 mii_write (dev, phy_addr, MII_BMCR, bmcr.image);
1766                 mdelay(10);
1767                 bmcr.image = 0;
1768                 bmcr.bits.an_enable = 0;
1769                 if (np->full_duplex) {
1770                         bmcr.bits.duplex_mode = 1;
1771                         printk (KERN_INFO "Manual full duplex\n");
1772                 } else {
1773                         bmcr.bits.duplex_mode = 0;
1774                         printk (KERN_INFO "Manual half duplex\n");
1775                 }
1776                 mii_write (dev, phy_addr, MII_BMCR, bmcr.image);
1777                 mdelay(10);
1778
1779                 /*  Advertise nothing */
1780                 mii_write (dev, phy_addr, MII_ANAR, 0);
1781         }
1782         return 0;
1783 }
1784
1785
1786 static int
1787 rio_close (struct net_device *dev)
1788 {
1789         long ioaddr = dev->base_addr;
1790         struct netdev_private *np = dev->priv;
1791         struct sk_buff *skb;
1792         int i;
1793
1794         netif_stop_queue (dev);
1795
1796         /* Disable interrupts */
1797         writew (0, ioaddr + IntEnable);
1798
1799         /* Stop Tx and Rx logics */
1800         writel (TxDisable | RxDisable | StatsDisable, ioaddr + MACCtrl);
1801         synchronize_irq ();
1802         free_irq (dev->irq, dev);
1803         del_timer_sync (&np->timer);
1804
1805         /* Free all the skbuffs in the queue. */
1806         for (i = 0; i < RX_RING_SIZE; i++) {
1807                 np->rx_ring[i].status = 0;
1808                 np->rx_ring[i].fraginfo = 0;
1809                 skb = np->rx_skbuff[i];
1810                 if (skb) {
1811                         pci_unmap_single (np->pdev, np->rx_ring[i].fraginfo,
1812                                           skb->len, PCI_DMA_FROMDEVICE);
1813                         dev_kfree_skb (skb);
1814                         np->rx_skbuff[i] = 0;
1815                 }
1816         }
1817         for (i = 0; i < TX_RING_SIZE; i++) {
1818                 skb = np->tx_skbuff[i];
1819                 if (skb) {
1820                         pci_unmap_single (np->pdev, np->tx_ring[i].fraginfo,
1821                                           skb->len, PCI_DMA_TODEVICE);
1822                         dev_kfree_skb (skb);
1823                         np->tx_skbuff[i] = 0;
1824                 }
1825         }
1826
1827         return 0;
1828 }
1829
1830 static void __devexit
1831 rio_remove1 (struct pci_dev *pdev)
1832 {
1833         struct net_device *dev = pci_get_drvdata (pdev);
1834
1835         if (dev) {
1836                 struct netdev_private *np = dev->priv;
1837
1838                 unregister_netdev (dev);
1839                 pci_free_consistent (pdev, RX_TOTAL_SIZE, np->rx_ring,
1840                                      np->rx_ring_dma);
1841                 pci_free_consistent (pdev, TX_TOTAL_SIZE, np->tx_ring,
1842                                      np->tx_ring_dma);
1843 #ifdef MEM_MAPPING
1844                 iounmap ((char *) (dev->base_addr));
1845 #endif
1846                 kfree (dev);
1847                 pci_release_regions (pdev);
1848                 pci_disable_device (pdev);
1849         }
1850         pci_set_drvdata (pdev, NULL);
1851 }
1852
1853 static struct pci_driver rio_driver = {
1854         name:           "dl2k",
1855         id_table:       rio_pci_tbl,
1856         probe:          rio_probe1,
1857         remove:         __devexit_p(rio_remove1),
1858 };
1859
1860 static int __init
1861 rio_init (void)
1862 {
1863         return pci_module_init (&rio_driver);
1864 }
1865
1866 static void __exit
1867 rio_exit (void)
1868 {
1869         pci_unregister_driver (&rio_driver);
1870 }
1871
1872 module_init (rio_init);
1873 module_exit (rio_exit);
1874
1875 /*
1876
1877 Compile command:
1878
1879 gcc -D__KERNEL__ -DMODULE -I/usr/src/linux/include -Wall -Wstrict-prototypes -O2 -c dl2k.c
1880
1881 Read Documentation/networking/dl2k.txt for details.
1882
1883 */
1884