target/linux/rdc-2.6/files/drivers/net/r6040.c

   1 /* r6040.c: A RDC R6040 FastEthernet driver for linux. */
   2 /*
   3         Re-written 2004 by Sten Wang.
   4
   5         Copyright 1994-2000 by Donald Becker.
   6         Copyright 1993 United States Government as represented by the
   7         Director, National Security Agency.      This software may be used and
   8         distributed according to the terms of the GNU General Public License,
   9         incorporated herein by reference.
  10
  11         This driver is for RDC R6040 FastEthernet MAC series.
  12         For kernel version after 2.4.22
  13
  14         Modification List
  15         ----------      ------------------------------------------------
  16         08-24-2006      Support at linux 2.6.10 above
  17         03-24-2006      Support NAPI
  18         03-21-2006      By Charies,change spin_lock_irqsave(lp->lock, flags) to
  19                         spin_lock_irqsave(&lp->lock, flags) in set_multicast_list
  20         03-15-2006      Modify the set_multicast_list ,due to when re-plug the ethernet,
  21                         it will forget the previous setting
  22         07-12-2005      Tim, modify the set_multicast_list
  23         03-28-2005      Tim, modify some error mac register offset in
  24                         function set_multicast_list
  25         03-27-2005      Tim, Add the internal state machine reset
  26                         Sten, If multicast address more than 4, enter PROM mode
  27                         Changed rdc to r6040
  28         12-22-2004      Sten Init MAC MBCR register=0x012A
  29                         PHY_CAP = 0x01E1
  30
  31         Need to Do LIst:
  32         1. If multicast address more than 4, use the multicast address hash
  33 */
  34
  35 #define DRV_NAME        "r6040"
  36 #define DRV_VERSION     "0.13"
  37 #define DRV_RELDATE     "24Aug2006"
  38
  39 /* PHY CHIP Address */
  40 #define PHY1_ADDR       1       /* For MAC1 */
  41 #define PHY2_ADDR       2       /* For MAC2 */
  42 #define PHY_MODE        0x3100  /* PHY CHIP Register 0 */
  43 #define PHY_CAP         0x01E1  /* PHY CHIP Register 4 */
  44
  45 /* Time in jiffies before concluding the transmitter is hung. */
  46 #define TX_TIMEOUT      (6000 * HZ / 1000)
  47 #define TIMER_WUT       (jiffies + HZ * 1)/* timer wakeup time : 1 second */
  48
  49 /* RDC MAC ID */
  50 #define RDC_MAC_ID      0x6040
  51
  52 /* RDC MAC I/O Size */
  53 #define R6040_IO_SIZE   256
  54
  55 /* RDC Chip PCI Command */
  56 #define R6040_PCI_CMD   0x0005  /* IO, Master */
  57
  58 /* MAX RDC MAC */
  59 #define MAX_MAC         2
  60
  61 /* MAC setting */
  62 #define TX_DCNT         0x80    /* TX descriptor count */
  63 #define RX_DCNT         0x80    /* RX descriptor count */
  64 #define MAX_BUF_SIZE    0x600
  65 #define ALLOC_DESC_SIZE ((TX_DCNT+RX_DCNT)*sizeof(struct r6040_descriptor)+0x10)
  66 #define MBCR_DEFAULT    0x012A  /* MAC Bus Control Register */
  67
  68 /* Debug enable or not */
  69 #define RDC_DEBUG       0
  70
  71 #if RDC_DEBUG > 1
  72 #define RDC_DBUG(msg, value) printk("%s %x\n", msg, value);
  73 #else
  74 #define RDC_DBUG(msg, value)
  75 #endif
  76
  77
  78 #include <linux/module.h>
  79 #include <linux/version.h>
  80 #if LINUX_VERSION_CODE >= KERNEL_VERSION(2, 6, 0)
  81 #include <linux/moduleparam.h>
  82 #endif
  83 #include <linux/kernel.h>
  84 #include <linux/string.h>
  85 #include <linux/timer.h>
  86 #include <linux/errno.h>
  87 #include <linux/ioport.h>
  88 #include <linux/slab.h>
  89 #include <linux/interrupt.h>
  90 #include <linux/pci.h>
  91 #include <linux/netdevice.h>
  92 #include <linux/etherdevice.h>
  93 #include <linux/skbuff.h>
  94 #include <linux/init.h>
  95 #include <linux/delay.h>        /* for udelay() */
  96 #include <linux/mii.h>
  97 #include <linux/ethtool.h>
  98 #include <linux/crc32.h>
  99 #include <linux/spinlock.h>
 100
 101 #include <asm/processor.h>
 102 #include <asm/bitops.h>
 103 #include <asm/io.h>
 104 #include <asm/irq.h>
 105 #include <asm/uaccess.h>
 106
 107 MODULE_AUTHOR("Sten Wang <sten.wang@rdc.com.tw>");
 108 MODULE_LICENSE("GPL");
 109 #ifdef CONFIG_R6040_NAPI
 110 MODULE_DESCRIPTION("RDC R6040 NAPI PCI FastEthernet Driver");
 111 #else
 112 MODULE_DESCRIPTION("RDC R6040 PCI FastEthernet Driver");
 113 #endif
 114
 115 #define R6040_INT_MASK                  0x0011
 116
 117 struct r6040_descriptor {
 118         u16     status, len;            /* 0-3 */
 119         u32     buf;                    /* 4-7 */
 120         u32     ndesc;                  /* 8-B */
 121         u32     rev1;                   /* C-F */
 122         char    *vbufp;                 /* 10-13 */
 123         struct r6040_descriptor *vndescp;       /* 14-17 */
 124         struct sk_buff *skb_ptr;        /* 18-1B */
 125         u32     rev2;                   /* 1C-1F */
 126 } __attribute__(( aligned(32) ));
 127
 128 struct r6040_private {
 129         struct net_device_stats stats;
 130         spinlock_t lock;
 131         struct timer_list timer;
 132         struct pci_dev *pdev;
 133
 134         struct r6040_descriptor *rx_insert_ptr;
 135         struct r6040_descriptor *rx_remove_ptr;
 136         struct r6040_descriptor *tx_insert_ptr;
 137         struct r6040_descriptor *tx_remove_ptr;
 138         u16     tx_free_desc, rx_free_desc, phy_addr, phy_mode;
 139         u16     mcr0, mcr1;
 140         dma_addr_t desc_dma;
 141         char    *desc_pool;
 142         u16     switch_sig;
 143 };
 144
 145 struct r6040_chip_info {
 146         const char *name;
 147         u16 pci_flags;
 148         int io_size;
 149         int drv_flags;
 150 };
 151
 152 #ifdef CONFIG_R6040_NAPI
 153 static int NAPI_status;
 154 #endif
 155
 156 static int __devinitdata printed_version;
 157 #ifdef CONFIG_R6040_NAPI
 158 static char version[] __devinitdata =
 159         KERN_INFO DRV_NAME ": RDC R6040 NAPI net driver, version "DRV_VERSION " (" DRV_RELDATE ")\n";
 160 #else
 161 static char version[] __devinitdata =
 162         KERN_INFO DRV_NAME ": RDC R6040 net driver, version "DRV_VERSION " (" DRV_RELDATE ")\n";
 163 #endif
 164 static struct r6040_chip_info r6040_chip_info[] __devinitdata =
 165 {
 166         { "RDC R6040 Knight", R6040_PCI_CMD, R6040_IO_SIZE, 0}
 167 };
 168 static char *parent = NULL;
 169
 170 #if LINUX_VERSION_CODE >= KERNEL_VERSION(2, 6, 0)
 171 static int NUM_MAC_TABLE = 2 ;
 172 module_param(parent, charp, 0444);
 173 #else
 174 MODULE_PARM(parent, "s");
 175 #endif
 176 MODULE_PARM_DESC(parent, "Parent network device name");
 177
 178 static int phy_table[] = { 0x1, 0x2};
 179 static u8 adr_table[2][8] = {{0x00, 0x00, 0x60, 0x00, 0x00, 0x01}, {0x00, 0x00, 0x60, 0x00, 0x00, 0x02}};
 180
 181 #if LINUX_VERSION_CODE >= KERNEL_VERSION(2, 6, 10)
 182         module_param_array(adr_table, int, &NUM_MAC_TABLE, 0644);
 183 #elif LINUX_VERSION_CODE >= KERNEL_VERSION(2, 6, 0)
 184         module_param_array(adr_table, int, NUM_MAC_TABLE, 0644);
 185 #else
 186         MODULE_PARM(adr_table, "2-4i");
 187 #endif
 188 MODULE_PARM_DESC(adr_table, "MAC Address (assigned)");
 189
 190 static int r6040_open(struct net_device *dev);
 191 static int r6040_start_xmit(struct sk_buff *skb, struct net_device *dev);
 192 static irqreturn_t r6040_interrupt(int irq, void *dev_id);
 193 static struct net_device_stats *r6040_get_stats(struct net_device *dev);
 194 static int r6040_close(struct net_device *dev);
 195 static void set_multicast_list(struct net_device *dev);
 196 static struct ethtool_ops netdev_ethtool_ops;
 197 static int netdev_ioctl (struct net_device *dev, struct ifreq *rq, int cmd);
 198 static void r6040_down(struct net_device *dev);
 199 static void r6040_up(struct net_device *dev);
 200 static void r6040_tx_timeout (struct net_device *dev);
 201 static void r6040_timer(unsigned long);
 202
 203 static int phy_mode_chk(struct net_device *dev);
 204 static int phy_read(int ioaddr, int phy_adr, int reg_idx);
 205 static void phy_write(int ioaddr, int phy_adr, int reg_idx, int dat);
 206 static void rx_buf_alloc(struct r6040_private *lp,struct net_device *dev);
 207 #ifdef CONFIG_R6040_NAPI
 208 static int r6040_poll(struct net_device *netdev, int *budget);
 209 #endif
 210
 211
 212 static int __devinit r6040_init_one (struct pci_dev *pdev,
 213                                          const struct pci_device_id *ent)
 214 {
 215         struct net_device *dev;
 216         struct r6040_private *lp;
 217         int ioaddr, io_size, err;
 218         static int card_idx = -1;
 219         int chip_id = (int)ent->driver_data;
 220
 221         RDC_DBUG("r6040_init_one()", 0);
 222
 223         if (printed_version++)
 224                 printk(version);
 225
 226         if ((err = pci_enable_device (pdev)))
 227                 return err;
 228
 229         /* this should always be supported */
 230         if (pci_set_dma_mask(pdev, 0xffffffff)) {
 231                 printk(KERN_ERR DRV_NAME "32-bit PCI DMA addresses not supported by the card!?\n");
 232                 return  -ENODEV;
 233         }
 234
 235         /* IO Size check */
 236         io_size = r6040_chip_info[chip_id].io_size;
 237         if (pci_resource_len  (pdev, 0) < io_size) {
 238                 return  -ENODEV;
 239         }
 240
 241         ioaddr = pci_resource_start (pdev, 0);  /* IO map base address */
 242         pci_set_master(pdev);
 243
 244         dev = alloc_etherdev(sizeof(struct r6040_private));
 245         if (dev == NULL)
 246                 return -ENOMEM;
 247         SET_MODULE_OWNER(dev);
 248
 249         if (pci_request_regions(pdev, DRV_NAME)) {
 250                 printk(KERN_ERR DRV_NAME ": Failed to request PCI regions\n");
 251                 err = -ENODEV;
 252                 goto err_out_disable;
 253         }
 254
 255         /* Init system & device */
 256         lp = dev->priv;
 257         dev->base_addr = ioaddr;
 258         dev->irq = pdev->irq;
 259
 260         spin_lock_init(&lp->lock);
 261         pci_set_drvdata(pdev, dev);
 262
 263         /* Set MAC address */
 264         card_idx++;
 265         memcpy(dev->dev_addr, (u8 *)&adr_table[card_idx][0], 6);
 266
 267         /* Link new device into r6040_root_dev */
 268         lp->pdev = pdev;
 269
 270         /* Init RDC private data */
 271         lp->mcr0 = 0x1002;
 272         lp->phy_addr = phy_table[card_idx];
 273         lp->switch_sig = 0;
 274
 275         /* The RDC-specific entries in the device structure. */
 276         dev->open = &r6040_open;
 277         dev->hard_start_xmit = &r6040_start_xmit;
 278         dev->stop = &r6040_close;
 279         dev->get_stats = &r6040_get_stats;
 280         dev->set_multicast_list = &set_multicast_list;
 281         dev->do_ioctl = &netdev_ioctl;
 282         dev->ethtool_ops = &netdev_ethtool_ops;
 283         dev->tx_timeout = &r6040_tx_timeout;
 284         dev->watchdog_timeo = TX_TIMEOUT;
 285 #ifdef CONFIG_R6040_NAPI
 286         dev->poll = &r6040_poll;
 287         dev->weight = 64;
 288 #endif
 289
 290         /* Register net device. After this dev->name assign */
 291         if ((err = register_netdev(dev))) {
 292                 printk(KERN_ERR DRV_NAME ": Failed to register net device\n");
 293                 goto err_out_res;
 294         }
 295
 296         netif_carrier_on(dev);
 297         return 0;
 298
 299 err_out_res:
 300         pci_release_regions(pdev);
 301 err_out_disable:
 302         pci_disable_device(pdev);
 303         pci_set_drvdata(pdev, NULL);
 304         kfree(dev);
 305
 306         return err;
 307 }
 308
 309 static void __devexit r6040_remove_one (struct pci_dev *pdev)
 310 {
 311         struct net_device *dev = pci_get_drvdata(pdev);
 312
 313         unregister_netdev(dev);
 314         pci_release_regions(pdev);
 315         kfree(dev);
 316         pci_disable_device(pdev);
 317         pci_set_drvdata(pdev, NULL);
 318 }
 319
 320 static int
 321 r6040_open(struct net_device *dev)
 322 {
 323         struct r6040_private *lp = dev->priv;
 324         int i;
 325
 326         RDC_DBUG("r6040_open()", 0);
 327
 328         /* Request IRQ and Register interrupt handler */
 329         i = request_irq(dev->irq, &r6040_interrupt, SA_SHIRQ, dev->name, dev);
 330         if (i) return i;
 331
 332         /* Allocate Descriptor memory */
 333         lp->desc_pool = pci_alloc_consistent(lp->pdev, ALLOC_DESC_SIZE, &lp->desc_dma);
 334         if (!lp->desc_pool) return -ENOMEM;
 335
 336         r6040_up(dev);
 337
 338         netif_start_queue(dev);
 339
 340         if (lp->switch_sig != 0x0243)
 341         {
 342         /* set and active a timer process */
 343         init_timer(&lp->timer);
 344         lp->timer.expires = TIMER_WUT;
 345         lp->timer.data = (unsigned long)dev;
 346         lp->timer.function = &r6040_timer;
 347         add_timer(&lp->timer);
 348         }
 349         return 0;
 350 }
 351
 352 static void
 353 r6040_tx_timeout (struct net_device *dev)
 354 {
 355         struct r6040_private *lp = dev->priv;
 356         //int ioaddr = dev->base_addr;
 357         //struct r6040_descriptor *descptr = lp->tx_remove_ptr;
 358
 359         RDC_DBUG("r6040_tx_timeout()", 0);
 360
 361         /* Transmitter timeout, serious problems. */
 362         /* Sten: Nothing need to do so far. */
 363         printk(KERN_ERR DRV_NAME ": Big Trobule, transmit timeout/n");
 364         lp->stats.tx_errors++;
 365         netif_stop_queue(dev);
 366
 367 //printk("<RDC> XMT timedout: CR0 %x, CR40 %x, CR3C %x, CR2C %x, CR30 %x, CR34 %x, CR38 %x\n", inw(ioaddr), inw(ioaddr+0x40), inw(ioaddr+0x3c), inw(ioaddr+0x2c), inw(ioaddr+0x30), inw(ioaddr+0x34), inw(ioaddr+0x38));
 368
 369 //printk("<RDC> XMT_TO: %08lx:%04x %04x %08lx %08lx %08lx %08lx\n", descptr, descptr->status, descptr->len, descptr->buf, descptr->skb_ptr, descptr->ndesc, descptr->vndescp);
 370 }
 371
 372
 373 static int
 374 r6040_start_xmit(struct sk_buff *skb, struct net_device *dev)
 375 {
 376         struct r6040_private *lp = dev->priv;
 377         struct r6040_descriptor *descptr;
 378         int ioaddr = dev->base_addr;
 379         unsigned long flags;
 380
 381         RDC_DBUG("r6040_start_xmit()", 0);
 382
 383         if (skb == NULL)        /* NULL skb directly return */
 384                 return 0;
 385         if (skb->len >= MAX_BUF_SIZE) { /* Packet too long, drop it */
 386                 dev_kfree_skb(skb);
 387                 return 0;
 388         }
 389
 390         /* Critical Section */
 391         spin_lock_irqsave(&lp->lock, flags);
 392
 393         /* TX resource check */
 394         if (!lp->tx_free_desc) {
 395                 spin_unlock_irqrestore(&lp->lock, flags);
 396                 printk(KERN_ERR DRV_NAME ": NO TX DESC ");
 397                 return 1;
 398         }
 399
 400         /* Statistic Counter */
 401         lp->stats.tx_packets++;
 402         lp->stats.tx_bytes += skb->len;
 403
 404         /* Set TX descriptor & Transmit it */
 405         lp->tx_free_desc--;
 406         descptr = lp->tx_insert_ptr;
 407         if (skb->len < 0x3c) descptr->len = 0x3c;
 408         else descptr->len = skb->len;
 409         descptr->skb_ptr = skb;
 410         descptr->buf = cpu_to_le32(pci_map_single(lp->pdev, skb->data, skb->len, PCI_DMA_TODEVICE));
 411         descptr->status = 0x8000;
 412         outw(0x01, ioaddr + 0x14);
 413         lp->tx_insert_ptr = descptr->vndescp;
 414
 415 #if RDC_DEBUG
 416  printk("Xmit(): %08lx:%04x %04x %08lx %08lx %08lx %08lx\n", descptr, descptr->status, descptr->len, descptr->buf, descptr->skb_ptr, descptr->ndesc, descptr->vndescp);
 417 #endif
 418
 419         /* If no tx resource, stop */
 420         if (!lp->tx_free_desc)
 421                 netif_stop_queue(dev);
 422
 423         dev->trans_start = jiffies;
 424         spin_unlock_irqrestore(&lp->lock, flags);
 425         return 0;
 426 }
 427
 428 /* The RDC interrupt handler. */
 429 static irqreturn_t
 430 r6040_interrupt(int irq, void *dev_id)
 431 {
 432         struct net_device *dev = dev_id;
 433         struct r6040_private *lp;
 434         struct r6040_descriptor *descptr;
 435         struct sk_buff *skb_ptr;
 436         int ioaddr, status;
 437         unsigned long flags;
 438 #ifdef CONFIG_R6040_NAPI
 439         int handled = 1;
 440 #else
 441         int handled = 0;
 442 #endif
 443
 444         RDC_DBUG("r6040_interrupt()", 0);
 445         if (dev == NULL) {
 446                 printk (KERN_ERR DRV_NAME ": INT() unknown device.\n");
 447                 return IRQ_RETVAL(handled);
 448         }
 449
 450         lp = (struct r6040_private *)dev->priv;
 451         spin_lock_irqsave(&lp->lock, flags);
 452
 453         /* Check MAC Interrupt status */
 454         ioaddr = dev->base_addr;
 455         outw(0x0, ioaddr + 0x40);       /* Mask Off RDC MAC interrupt */
 456         status = inw(ioaddr + 0x3c);    /* Read INTR status and clear */
 457
 458
 459 #ifdef CONFIG_R6040_NAPI
 460
 461             if(netif_rx_schedule_prep(dev))
 462                 {
 463                 NAPI_status = status ;
 464                 __netif_rx_schedule(dev);
 465                 }
 466
 467         spin_unlock_irqrestore(&lp->lock, flags);
 468         return IRQ_RETVAL(handled);
 469 #else
 470         /* TX interrupt request */
 471         if (status & 0x10) {
 472                 handled = 1;
 473                 descptr = lp->tx_remove_ptr;
 474                 while(lp->tx_free_desc < TX_DCNT) {
 475                         if (descptr->status & 0x8000) break; /* Not complte */
 476                         skb_ptr = descptr->skb_ptr;
 477                         pci_unmap_single(lp->pdev, descptr->buf, skb_ptr->len, PCI_DMA_TODEVICE);
 478                         dev_kfree_skb_irq(skb_ptr); /* Free buffer */
 479                         descptr->skb_ptr = 0;
 480                         descptr = descptr->vndescp; /* To next descriptor */
 481                         lp->tx_free_desc++;
 482                 }
 483                 lp->tx_remove_ptr = descptr;
 484                 if (lp->tx_free_desc) netif_wake_queue(dev);
 485         }
 486
 487         /* RX interrupt request */
 488         if (status & 0x01) {
 489                 handled = 1;
 490                 descptr = lp->rx_remove_ptr;
 491                 while(lp->rx_free_desc) {
 492                         if (descptr->status & 0x8000) break; /* No Rx packet */
 493                         skb_ptr = descptr->skb_ptr;
 494                         descptr->skb_ptr = 0;
 495                         skb_ptr->dev = dev;
 496                         skb_put(skb_ptr, descptr->len - 4);
 497                         pci_unmap_single(lp->pdev, descptr->buf, MAX_BUF_SIZE, PCI_DMA_FROMDEVICE);
 498                         skb_ptr->protocol = eth_type_trans(skb_ptr, dev);
 499                         netif_rx(skb_ptr);  /* Send to upper layer */
 500                         lp->stats.rx_packets++;
 501                         lp->stats.rx_bytes += descptr->len;
 502                         descptr = descptr->vndescp; /* To next descriptor */
 503                         lp->rx_free_desc--;
 504                 }
 505                 lp->rx_remove_ptr = descptr;
 506         }
 507
 508         /* Allocate new RX buffer */
 509         if (lp->rx_free_desc < RX_DCNT) rx_buf_alloc(lp,dev);
 510
 511         outw(R6040_INT_MASK, ioaddr + 0x40);    /* TX/RX interrupt enable */
 512         spin_unlock_irqrestore(&lp->lock, flags);
 513 #endif
 514         return IRQ_RETVAL(handled);
 515 }
 516
 517
 518 static struct net_device_stats *
 519 r6040_get_stats(struct net_device *dev)
 520 {
 521         struct r6040_private *lp = dev->priv;
 522
 523         RDC_DBUG("r6040_get_stats()", 0);
 524         return &lp->stats;
 525 }
 526
 527 /*
 528  *     Set or clear the multicast filter for this adaptor.
 529  */
 530 static void
 531 set_multicast_list(struct net_device *dev)
 532 {
 533         struct r6040_private *lp = dev->priv;
 534         struct dev_mc_list *mcptr;
 535         int ioaddr = dev->base_addr;
 536         u16 *adrp, i;
 537         unsigned long flags;
 538
 539         RDC_DBUG("set_multicast_list()", 0);
 540
 541         /* MAC Address */
 542         adrp = (u16 *) dev->dev_addr;
 543         outw(adrp[0], ioaddr + 0x68);
 544         outw(adrp[1], ioaddr + 0x6A);
 545         outw(adrp[2], ioaddr + 0x6C);
 546
 547
 548 #if RDC_DEBUG
 549         printk("MAC ADDR: %04x %04x %04x\n", adrp[0], adrp[1], adrp[2]);
 550 #endif
 551
 552         /* Promiscous Mode */
 553         spin_lock_irqsave(&lp->lock, flags);
 554         i = inw(ioaddr) & ~0x0120;              /* Clear AMCP & PROM */
 555         if (dev->flags & IFF_PROMISC)
 556             {
 557                 i |= 0x0020;
 558                 lp->mcr0 |= 0x0020 ;
 559             }
 560         if (dev->mc_count > 4) i |= 0x0020;     /* Too many multicast address */
 561         outw(i, ioaddr);
 562         spin_unlock_irqrestore(&lp->lock, flags);
 563
 564         /* Multicast Address */
 565         if (dev->mc_count > 4)  /* Wait to do: Hash Table for multicast */
 566                 return;
 567
 568         /* Multicast Address 1~4 case */
 569         for (i = 0, mcptr = dev->mc_list; (i<dev->mc_count) && (i<4); i++) {
 570                 adrp = (u16 *)mcptr->dmi_addr;
 571                 outw(adrp[0], ioaddr + 0x70 + 8*i);
 572                 outw(adrp[1], ioaddr + 0x72 + 8*i);
 573                 outw(adrp[2], ioaddr + 0x74 + 8*i);
 574                 mcptr = mcptr->next;
 575 #if RDC_DEBUG
 576         printk("M_ADDR: %04x %04x %04x\n", adrp[0], adrp[1], adrp[2]);
 577 #endif
 578         }
 579         for (i = dev->mc_count; i < 4; i++) {
 580                 outw(0xffff, ioaddr + 0x68 + 8*i);
 581                 outw(0xffff, ioaddr + 0x6A + 8*i);
 582                 outw(0xffff, ioaddr + 0x6C + 8*i);
 583         }
 584 }
 585
 586 static void netdev_get_drvinfo (struct net_device *dev, struct ethtool_drvinfo *info)
 587 {
 588         struct r6040_private *rp = dev->priv;
 589
 590         strcpy (info->driver, DRV_NAME);
 591         strcpy (info->version, DRV_VERSION);
 592         strcpy (info->bus_info, pci_name(rp->pdev));
 593 }
 594
 595 static struct ethtool_ops netdev_ethtool_ops = {
 596         .get_drvinfo            = netdev_get_drvinfo,
 597 };
 598
 599 static int
 600 r6040_close(struct net_device *dev)
 601 {
 602         struct r6040_private *lp = dev->priv;
 603
 604         RDC_DBUG("r6040_close()", 0);
 605
 606         /* deleted timer */
 607         del_timer_sync(&lp->timer);
 608
 609         spin_lock_irq(&lp->lock);
 610
 611         netif_stop_queue(dev);
 612
 613         r6040_down(dev);
 614
 615         spin_unlock_irq(&lp->lock);
 616
 617         return 0;
 618 }
 619
 620 static int netdev_ioctl (struct net_device *dev, struct ifreq *rq, int cmd)
 621 {
 622         struct r6040_private *lp = dev->priv;
 623
 624         RDC_DBUG("netdev_ioctl()", 0);
 625         if (lp->switch_sig == 0x0243 && cmd == SIOCDEVPRIVATE)
 626         {
 627                 unsigned long *data = (unsigned long *)rq->ifr_data, args[4];
 628                 int ioaddr = dev->base_addr;
 629                 unsigned int val;
 630
 631                 data = (unsigned long *)rq->ifr_data;
 632                 if (copy_from_user(args, data, 4*sizeof(unsigned long)))
 633                         return -EFAULT;
 634
 635                 /* port priority */
 636                 if(args[0]&(1<<31))phy_write(ioaddr,29,19,(phy_read(ioaddr,29,19)|0x2000));     /* port 0 */
 637                 if(args[0]&(1<<29))phy_write(ioaddr,29,19,(phy_read(ioaddr,29,19)|0x0020));     /* port 1 */
 638                 if(args[0]&(1<<27))phy_write(ioaddr,29,20,(phy_read(ioaddr,29,20)|0x2000));     /* port 2 */
 639                 if(args[0]&(1<<25))phy_write(ioaddr,29,20,(phy_read(ioaddr,29,20)|0x0020));     /* port 3 */
 640
 641         }
 642         return -EOPNOTSUPP;
 643 }
 644
 645 /**
 646         Stop RDC MAC and Free the allocated resource
 647  */
 648 static void r6040_down(struct net_device *dev)
 649 {
 650         struct r6040_private *lp = dev->priv;
 651         int i;
 652         int ioaddr = dev->base_addr;
 653
 654         RDC_DBUG("r6040_down()", 0);
 655
 656         /* Stop MAC */
 657         outw(0x0000, ioaddr + 0x40);    /* Mask Off Interrupt */
 658         outw(0x0001, ioaddr + 0x04);    /* Reset RDC MAC */
 659         i = 0;
 660         do{}while((i++ < 2048) && (inw(ioaddr + 0x04) & 0x1));
 661
 662         free_irq(dev->irq, dev);
 663
 664         /* Free RX buffer */
 665         for (i = 0; i < RX_DCNT; i++) {
 666                 if (lp->rx_insert_ptr->skb_ptr) {
 667                         pci_unmap_single(lp->pdev, lp->rx_insert_ptr->buf, MAX_BUF_SIZE, PCI_DMA_FROMDEVICE);
 668                         dev_kfree_skb(lp->rx_insert_ptr->skb_ptr);
 669                         lp->rx_insert_ptr->skb_ptr = 0;
 670                 }
 671                 lp->rx_insert_ptr = lp->rx_insert_ptr->vndescp;
 672         }
 673
 674         /* Free TX buffer */
 675         for (i = 0; i < TX_DCNT; i++) {
 676                 if (lp->tx_insert_ptr->skb_ptr) {
 677                         pci_unmap_single(lp->pdev, lp->tx_insert_ptr->buf, MAX_BUF_SIZE, PCI_DMA_TODEVICE);
 678                         dev_kfree_skb(lp->tx_insert_ptr->skb_ptr);
 679                         lp->rx_insert_ptr->skb_ptr = 0;
 680                 }
 681                 lp->tx_insert_ptr = lp->tx_insert_ptr->vndescp;
 682         }
 683
 684         /* Free Descriptor memory */
 685         pci_free_consistent(lp->pdev, ALLOC_DESC_SIZE, lp->desc_pool, lp->desc_dma);
 686 }
 687
 688
 689
 690 #ifdef CONFIG_R6040_NAPI
 691 static int r6040_poll(struct net_device *dev, int *budget)
 692 {
 693         struct r6040_private *lp;
 694         struct r6040_descriptor *descptr;
 695         struct sk_buff *skb_ptr;
 696         int ioaddr, status;
 697         unsigned long flags;
 698
 699
 700         ioaddr = dev->base_addr;
 701         lp = (struct r6040_private *)dev->priv;
 702         unsigned long rx_work = dev->quota ;
 703         unsigned long rx ;
 704
 705
 706 #if 1
 707         /* TX interrupt request */
 708         if (NAPI_status & 0x10) {
 709
 710                 descptr = lp->tx_remove_ptr;
 711                 while(lp->tx_free_desc < TX_DCNT) {
 712                         if (descptr->status & 0x8000) break; /* Not complte */
 713                         skb_ptr = descptr->skb_ptr;
 714                         pci_unmap_single(lp->pdev, descptr->buf, skb_ptr->len, PCI_DMA_TODEVICE);
 715                         dev_kfree_skb_irq(skb_ptr); /* Free buffer */
 716                         descptr->skb_ptr = 0;
 717                         descptr = descptr->vndescp; /* To next descriptor */
 718                         lp->tx_free_desc++;
 719                 }
 720                 lp->tx_remove_ptr = descptr;
 721                 if (lp->tx_free_desc) netif_wake_queue(dev);
 722         }
 723 #endif
 724 #if 1
 725         /* RX interrupt request */
 726         if (NAPI_status & 0x01) {
 727
 728                 descptr = lp->rx_remove_ptr;
 729                 while(lp->rx_free_desc) {
 730                         if (descptr->status & 0x8000) break; /* No Rx packet */
 731                         skb_ptr = descptr->skb_ptr;
 732                         descptr->skb_ptr = 0;
 733                         skb_ptr->dev = dev;
 734                         skb_put(skb_ptr, descptr->len - 4);
 735                         pci_unmap_single(lp->pdev, descptr->buf, MAX_BUF_SIZE, PCI_DMA_FROMDEVICE);
 736                         skb_ptr->protocol = eth_type_trans(skb_ptr, dev);
 737                         netif_receive_skb(skb_ptr); /* Send to upper layer */
 738                         lp->stats.rx_packets++;
 739                         lp->stats.rx_bytes += descptr->len;
 740                         descptr = descptr->vndescp; /* To next descriptor */
 741                         lp->rx_free_desc--;
 742                 }
 743                 lp->rx_remove_ptr = descptr;
 744
 745         }
 746         /* Allocate new RX buffer */
 747         if (lp->rx_free_desc < RX_DCNT) rx_buf_alloc(lp,dev);
 748
 749         local_irq_disable();
 750         netif_rx_complete(dev);
 751         outw(R6040_INT_MASK,ioaddr + 0x40);
 752         local_irq_enable();
 753         return 0;
 754 #endif
 755 }
 756 #endif
 757
 758 /* Init RDC MAC */
 759 static void r6040_up(struct net_device *dev)
 760 {
 761         struct r6040_private *lp = dev->priv;
 762         struct r6040_descriptor *descptr;
 763         int i;
 764         int ioaddr = dev->base_addr;
 765         u32 tmp_addr;
 766         dma_addr_t desc_dma, start_dma;
 767
 768         RDC_DBUG("r6040_up()", 0);
 769
 770         /* Initilize */
 771         lp->tx_free_desc = TX_DCNT;
 772         lp->rx_free_desc = 0;
 773
 774         /* Init descriptor */
 775         memset(lp->desc_pool, 0, ALLOC_DESC_SIZE); /* Let all descriptor = 0 */
 776         lp->tx_insert_ptr = (struct r6040_descriptor *)lp->desc_pool;
 777         lp->tx_remove_ptr = lp->tx_insert_ptr;
 778         lp->rx_insert_ptr = (struct r6040_descriptor *)lp->tx_insert_ptr+TX_DCNT;
 779         lp->rx_remove_ptr = lp->rx_insert_ptr;
 780
 781         /* Init TX descriptor */
 782         descptr = lp->tx_insert_ptr;
 783         desc_dma = lp->desc_dma;
 784         start_dma = desc_dma;
 785         for (i = 0; i < TX_DCNT; i++) {
 786                 descptr->ndesc = cpu_to_le32(desc_dma + sizeof(struct r6040_descriptor));
 787                 descptr->vndescp = (descptr + 1);
 788                 descptr = (descptr + 1);
 789                 desc_dma += sizeof(struct r6040_descriptor);
 790         }
 791         (descptr - 1)->ndesc = cpu_to_le32(start_dma);
 792         (descptr - 1)->vndescp = lp->tx_insert_ptr;
 793
 794         /* Init RX descriptor */
 795         start_dma = desc_dma;
 796         descptr = lp->rx_insert_ptr;
 797         for (i = 0; i < RX_DCNT; i++) {
 798                 descptr->ndesc = cpu_to_le32(desc_dma + sizeof(struct r6040_descriptor));
 799                 descptr->vndescp = (descptr + 1);
 800                 descptr = (descptr + 1);
 801                 desc_dma += sizeof(struct r6040_descriptor);
 802         }
 803         (descptr - 1)->ndesc = cpu_to_le32(start_dma);
 804         (descptr - 1)->vndescp = lp->rx_insert_ptr;
 805
 806         /* Allocate buffer for RX descriptor */
 807         rx_buf_alloc(lp,dev);
 808
 809 #if RDC_DEBUG
 810 descptr = lp->tx_insert_ptr;
 811 for (i = 0; i < TX_DCNT; i++) {
 812  printk("%08lx:%04x %04x %08lx %08lx %08lx %08lx\n", descptr, descptr->status, descptr->len, descptr->buf, descptr->skb_ptr, descptr->ndesc, descptr->vndescp);
 813  descptr = descptr->vndescp;
 814 }
 815 descptr = lp->rx_insert_ptr;
 816 for (i = 0; i < RX_DCNT; i++) {
 817  printk("%08lx:%04x %04x %08lx %08lx %08lx %08lx\n", descptr, descptr->status, descptr->len, descptr->buf, descptr->skb_ptr, descptr->ndesc, descptr->vndescp);
 818  descptr = descptr->vndescp;
 819 }
 820 #endif
 821
 822         /* MAC operation register */
 823         outw(0x01, ioaddr+0x04);        /* Reset MAC */
 824         outw(2   , ioaddr+0xAC);        /* Reset internal state machine */
 825         outw(0   , ioaddr+0xAC);
 826         udelay(5000);
 827
 828         /* TX and RX descriptor start Register */
 829         tmp_addr = cpu_to_le32(lp->tx_insert_ptr);
 830         tmp_addr = virt_to_bus((volatile void *)tmp_addr);
 831         outw((u16) tmp_addr, ioaddr+0x2c);
 832         outw(tmp_addr >> 16, ioaddr+0x30);
 833         tmp_addr = cpu_to_le32(lp->rx_insert_ptr);
 834         tmp_addr = virt_to_bus((volatile void *)tmp_addr);
 835         outw((u16) tmp_addr, ioaddr+0x34);
 836         outw(tmp_addr >> 16, ioaddr+0x38);
 837
 838         /* Buffer Size Register */
 839         outw(MAX_BUF_SIZE, ioaddr+0x18);
 840
 841         if ((lp->switch_sig = phy_read(ioaddr, 0, 2)) == 0x0243)        // ICPlus IP175C Signature
 842         {
 843                 phy_write(ioaddr, 29,31, 0x175C);       //Enable registers
 844                 lp->phy_mode = 0x8000;
 845         } else {
 846                 /* PHY Mode Check */
 847                 phy_write(ioaddr, lp->phy_addr, 4, PHY_CAP);
 848                 phy_write(ioaddr, lp->phy_addr, 0, PHY_MODE);
 849
 850                 if (PHY_MODE == 0x3100)
 851                         lp->phy_mode = phy_mode_chk(dev);
 852                 else
 853                         lp->phy_mode = (PHY_MODE & 0x0100) ? 0x8000:0x0;
 854         }
 855         /* MAC Bus Control Register */
 856         outw(MBCR_DEFAULT, ioaddr+0x8);
 857
 858         /* MAC TX/RX Enable */
 859         lp->mcr0 |= lp->phy_mode;
 860         outw(lp->mcr0, ioaddr);
 861
 862         /* set interrupt waiting time and packet numbers */
 863         outw(0x0802, ioaddr + 0x0C);
 864         outw(0x0802, ioaddr + 0x10);
 865
 866         /* upgrade performance (by RDC guys) */
 867         phy_write(ioaddr,30,17,(phy_read(ioaddr,30,17)|0x4000));        //bit 14=1
 868         phy_write(ioaddr,30,17,~((~phy_read(ioaddr,30,17))|0x2000));    //bit 13=0
 869         phy_write(ioaddr,0,19,0x0000);
 870         phy_write(ioaddr,0,30,0x01F0);
 871
 872         /* Interrupt Mask Register */
 873         outw(R6040_INT_MASK, ioaddr + 0x40);
 874 }
 875
 876 /*
 877   A periodic timer routine
 878         Polling PHY Chip Link Status
 879 */
 880 static void r6040_timer(unsigned long data)
 881 {
 882         struct net_device *dev=(struct net_device *)data;
 883         struct r6040_private *lp = dev->priv;
 884         u16 ioaddr = dev->base_addr, phy_mode;
 885
 886         RDC_DBUG("r6040_timer()", 0);
 887
 888         /* Polling PHY Chip Status */
 889         if (PHY_MODE == 0x3100)
 890                 phy_mode = phy_mode_chk(dev);
 891         else phy_mode = (PHY_MODE & 0x0100) ? 0x8000:0x0;
 892
 893         if (phy_mode != lp->phy_mode) {
 894                 lp->phy_mode = phy_mode;
 895                 lp->mcr0 = (lp->mcr0 & 0x7fff) | phy_mode;
 896                 outw(lp->mcr0, ioaddr);
 897                 printk("<RDC> Link Change %x \n", inw(ioaddr));
 898         }
 899
 900         /* Debug */
 901 //      printk("<RDC> Timer: CR0 %x CR40 %x CR3C %x\n", inw(ioaddr), inw(ioaddr+0x40), inw(ioaddr+0x3c));
 902
 903         /* Timer active again */
 904         lp->timer.expires = TIMER_WUT;
 905         add_timer(&lp->timer);
 906 }
 907
 908 /* Allocate skb buffer for rx descriptor */
 909 static void rx_buf_alloc(struct r6040_private *lp,struct net_device *dev)
 910 {
 911         struct r6040_descriptor *descptr;
 912         int ioaddr = dev->base_addr ;
 913
 914         RDC_DBUG("rx_buf_alloc()", 0);
 915         descptr = lp->rx_insert_ptr;
 916         while(lp->rx_free_desc < RX_DCNT){
 917                 descptr->skb_ptr = dev_alloc_skb(MAX_BUF_SIZE);
 918                 if (!descptr->skb_ptr) break;
 919                 descptr->buf = cpu_to_le32(pci_map_single(lp->pdev, descptr->skb_ptr->tail, MAX_BUF_SIZE, PCI_DMA_FROMDEVICE));
 920                 descptr->status = 0x8000;
 921                 descptr = descptr->vndescp;
 922                 lp->rx_free_desc++;
 923                 outw(lp->mcr0 | 0x0002, ioaddr);        //Trigger Rx DMA
 924         }
 925         lp->rx_insert_ptr = descptr;
 926 }
 927
 928 /* Status of PHY CHIP */
 929 static int phy_mode_chk(struct net_device *dev)
 930 {
 931         struct r6040_private *lp = dev->priv;
 932         int ioaddr = dev->base_addr, phy_dat;
 933
 934         RDC_DBUG("phy_mode_chk()", 0);
 935
 936         /* PHY Link Status Check */
 937         phy_dat = phy_read(ioaddr, lp->phy_addr, 1);
 938         if (!(phy_dat & 0x4)) return 0x8000;    /* Link Failed, full duplex */
 939
 940         /* PHY Chip Auto-Negotiation Status */
 941         phy_dat = phy_read(ioaddr, lp->phy_addr, 1);
 942         if (phy_dat & 0x0020) {
 943                 /* Auto Negotiation Mode */
 944                 phy_dat = phy_read(ioaddr, lp->phy_addr, 5);
 945                 phy_dat &= phy_read(ioaddr, lp->phy_addr, 4);
 946                 if (phy_dat & 0x140) phy_dat = 0x8000;
 947                 else phy_dat = 0;
 948         } else {
 949                 /* Force Mode */
 950                 phy_dat = phy_read(ioaddr, lp->phy_addr, 0);
 951                 if (phy_dat & 0x100) phy_dat = 0x8000;
 952                 else phy_dat = 0x0000;
 953         }
 954
 955         return phy_dat;
 956 };
 957
 958 /* Read a word data from PHY Chip */
 959 static int phy_read(int ioaddr, int phy_addr, int reg_idx)
 960 {
 961         int i = 0;
 962
 963         RDC_DBUG("phy_read()", 0);
 964         outw(0x2000 + reg_idx + (phy_addr << 8), ioaddr + 0x20);
 965         do{}while( (i++ < 2048) && (inw(ioaddr + 0x20) & 0x2000) );
 966
 967         return inw(ioaddr + 0x24);
 968 }
 969
 970 /* Write a word data from PHY Chip */
 971 static void phy_write(int ioaddr, int phy_addr, int reg_idx, int dat)
 972 {
 973         int i = 0;
 974
 975         RDC_DBUG("phy_write()", 0);
 976         outw(dat, ioaddr + 0x28);
 977         outw(0x4000 + reg_idx + (phy_addr << 8), ioaddr + 0x20);
 978         do{}while( (i++ < 2048) && (inw(ioaddr + 0x20) & 0x4000) );
 979 }
 980
 981 enum {
 982         RDC_6040 = 0
 983 };
 984
 985 static struct pci_device_id r6040_pci_tbl[] = {
 986         {0x17F3, 0x6040, PCI_ANY_ID, PCI_ANY_ID, 0, 0, RDC_6040},
 987         //{0x1106, 0x3065, PCI_ANY_ID, PCI_ANY_ID, 0, 0, RDC_6040},
 988         {0,}                    /* terminate list */
 989 };
 990 MODULE_DEVICE_TABLE(pci, r6040_pci_tbl);
 991
 992 static struct pci_driver r6040_driver = {
 993         .name           = "r6040",
 994         .id_table       = r6040_pci_tbl,
 995         .probe          = r6040_init_one,
 996         .remove         = __devexit_p(r6040_remove_one),
 997 };
 998
 999
1000 static int __init r6040_init (void)
1001 {
1002         RDC_DBUG("r6040_init()", 0);
1003
1004         printk(version);
1005         printed_version = 1;
1006
1007         if (parent != NULL)
1008         {
1009                 struct net_device *the_parent = dev_get_by_name(parent);
1010
1011                 if (the_parent == NULL)
1012                 {
1013                         printk (KERN_ERR DRV_NAME ": Unknown device \"%s\" specified.\n", parent);
1014                         return -EINVAL;
1015                 }
1016                 memcpy((u8 *)&adr_table[0][0], the_parent->dev_addr, 6);
1017                 memcpy((u8 *)&adr_table[1][0], the_parent->dev_addr, 6);
1018                 ++*(u8 *)&adr_table[0][5];
1019         }
1020         return pci_register_driver (&r6040_driver);
1021 }
1022
1023
1024 static void __exit r6040_cleanup (void)
1025 {
1026         RDC_DBUG("r6040_cleanup()", 0);
1027         pci_unregister_driver (&r6040_driver);
1028 }
1029
1030 module_init(r6040_init);
1031 module_exit(r6040_cleanup);
1032
1033
1034 /*
1035  * Local variables:
1036  *  compile-command: "gcc -DMODULE -D__KERNEL__ -I/usr/src/linux/net/inet -Wall -Wstrict-prototypes -O6 -c r6040.c `[ -f /usr/include/linux/modversions.h ] && echo -DMODVERSIONS`"
1037  *  c-indent-level: 4
1038  *  c-basic-offset: 4
1039  *  tab-width: 4
1040  * End:
1041  */