projects / openwrt / openwrt.git / blob
? search:


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