projects / openwrt / svn-archive / archive.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
Prevent the ioctl from handling even unsupported ioctls
[openwrt/svn-archive/archive.git] / 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 */
OpenWrt SVN history