Merge master.kernel.org:/pub/scm/linux/kernel/git/gregkh/driver-2.6
[linux-2.6] / drivers / net / tulip / xircom_cb.c
1 /*
2  * xircom_cb: A driver for the (tulip-like) Xircom Cardbus ethernet cards
3  *
4  * This software is (C) by the respective authors, and licensed under the GPL
5  * License.
6  *
7  * Written by Arjan van de Ven for Red Hat, Inc.
8  * Based on work by Jeff Garzik, Doug Ledford and Donald Becker
9  *
10  *      This software may be used and distributed according to the terms
11  *      of the GNU General Public License, incorporated herein by reference.
12  *
13  *
14  *      $Id: xircom_cb.c,v 1.33 2001/03/19 14:02:07 arjanv Exp $
15  */
16
17 #include <linux/module.h>
18 #include <linux/kernel.h>
19 #include <linux/string.h>
20 #include <linux/errno.h>
21 #include <linux/ioport.h>
22 #include <linux/slab.h>
23 #include <linux/interrupt.h>
24 #include <linux/pci.h>
25 #include <linux/netdevice.h>
26 #include <linux/etherdevice.h>
27 #include <linux/skbuff.h>
28 #include <linux/delay.h>
29 #include <linux/init.h>
30 #include <linux/ethtool.h>
31 #include <linux/bitops.h>
32
33 #include <asm/uaccess.h>
34 #include <asm/io.h>
35 #ifdef CONFIG_NET_POLL_CONTROLLER
36 #include <asm/irq.h>
37 #endif
38
39 #ifdef DEBUG
40 #define enter(x)   printk("Enter: %s, %s line %i\n",x,__FILE__,__LINE__)
41 #define leave(x)   printk("Leave: %s, %s line %i\n",x,__FILE__,__LINE__)
42 #else
43 #define enter(x)   do {} while (0)
44 #define leave(x)   do {} while (0)
45 #endif
46
47
48 MODULE_DESCRIPTION("Xircom Cardbus ethernet driver");
49 MODULE_AUTHOR("Arjan van de Ven <arjanv@redhat.com>");
50 MODULE_LICENSE("GPL");
51
52
53
54 /* IO registers on the card, offsets */
55 #define CSR0    0x00
56 #define CSR1    0x08
57 #define CSR2    0x10
58 #define CSR3    0x18
59 #define CSR4    0x20
60 #define CSR5    0x28
61 #define CSR6    0x30
62 #define CSR7    0x38
63 #define CSR8    0x40
64 #define CSR9    0x48
65 #define CSR10   0x50
66 #define CSR11   0x58
67 #define CSR12   0x60
68 #define CSR13   0x68
69 #define CSR14   0x70
70 #define CSR15   0x78
71 #define CSR16   0x80
72
73 /* PCI registers */
74 #define PCI_POWERMGMT   0x40
75
76 /* Offsets of the buffers within the descriptor pages, in bytes */
77
78 #define NUMDESCRIPTORS 4
79
80 static int bufferoffsets[NUMDESCRIPTORS] = {128,2048,4096,6144};
81
82
83 struct xircom_private {
84         /* Send and receive buffers, kernel-addressable and dma addressable forms */
85
86         unsigned int *rx_buffer;
87         unsigned int *tx_buffer;
88
89         dma_addr_t rx_dma_handle;
90         dma_addr_t tx_dma_handle;
91
92         struct sk_buff *tx_skb[4];
93
94         unsigned long io_port;
95         int open;
96
97         /* transmit_used is the rotating counter that indicates which transmit
98            descriptor has to be used next */
99         int transmit_used;
100
101         /* Spinlock to serialize register operations.
102            It must be helt while manipulating the following registers:
103            CSR0, CSR6, CSR7, CSR9, CSR10, CSR15
104          */
105         spinlock_t lock;
106
107
108         struct pci_dev *pdev;
109         struct net_device *dev;
110         struct net_device_stats stats;
111 };
112
113
114 /* Function prototypes */
115 static int xircom_probe(struct pci_dev *pdev, const struct pci_device_id *id);
116 static void xircom_remove(struct pci_dev *pdev);
117 static irqreturn_t xircom_interrupt(int irq, void *dev_instance);
118 static int xircom_start_xmit(struct sk_buff *skb, struct net_device *dev);
119 static int xircom_open(struct net_device *dev);
120 static int xircom_close(struct net_device *dev);
121 static void xircom_up(struct xircom_private *card);
122 static struct net_device_stats *xircom_get_stats(struct net_device *dev);
123 #ifdef CONFIG_NET_POLL_CONTROLLER
124 static void xircom_poll_controller(struct net_device *dev);
125 #endif
126
127 static void investigate_read_descriptor(struct net_device *dev,struct xircom_private *card, int descnr, unsigned int bufferoffset);
128 static void investigate_write_descriptor(struct net_device *dev, struct xircom_private *card, int descnr, unsigned int bufferoffset);
129 static void read_mac_address(struct xircom_private *card);
130 static void transceiver_voodoo(struct xircom_private *card);
131 static void initialize_card(struct xircom_private *card);
132 static void trigger_transmit(struct xircom_private *card);
133 static void trigger_receive(struct xircom_private *card);
134 static void setup_descriptors(struct xircom_private *card);
135 static void remove_descriptors(struct xircom_private *card);
136 static int link_status_changed(struct xircom_private *card);
137 static void activate_receiver(struct xircom_private *card);
138 static void deactivate_receiver(struct xircom_private *card);
139 static void activate_transmitter(struct xircom_private *card);
140 static void deactivate_transmitter(struct xircom_private *card);
141 static void enable_transmit_interrupt(struct xircom_private *card);
142 static void enable_receive_interrupt(struct xircom_private *card);
143 static void enable_link_interrupt(struct xircom_private *card);
144 static void disable_all_interrupts(struct xircom_private *card);
145 static int link_status(struct xircom_private *card);
146
147
148
149 static struct pci_device_id xircom_pci_table[] = {
150         {0x115D, 0x0003, PCI_ANY_ID, PCI_ANY_ID,},
151         {0,},
152 };
153 MODULE_DEVICE_TABLE(pci, xircom_pci_table);
154
155 static struct pci_driver xircom_ops = {
156         .name           = "xircom_cb",
157         .id_table       = xircom_pci_table,
158         .probe          = xircom_probe,
159         .remove         = xircom_remove,
160         .suspend =NULL,
161         .resume =NULL
162 };
163
164
165 #ifdef DEBUG
166 static void print_binary(unsigned int number)
167 {
168         int i,i2;
169         char buffer[64];
170         memset(buffer,0,64);
171         i2=0;
172         for (i=31;i>=0;i--) {
173                 if (number & (1<<i))
174                         buffer[i2++]='1';
175                 else
176                         buffer[i2++]='0';
177                 if ((i&3)==0)
178                         buffer[i2++]=' ';
179         }
180         printk("%s\n",buffer);
181 }
182 #endif
183
184 static void netdev_get_drvinfo(struct net_device *dev,
185                                struct ethtool_drvinfo *info)
186 {
187         struct xircom_private *private = netdev_priv(dev);
188
189         strcpy(info->driver, "xircom_cb");
190         strcpy(info->bus_info, pci_name(private->pdev));
191 }
192
193 static const struct ethtool_ops netdev_ethtool_ops = {
194         .get_drvinfo            = netdev_get_drvinfo,
195 };
196
197 /* xircom_probe is the code that gets called on device insertion.
198    it sets up the hardware and registers the device to the networklayer.
199
200    TODO: Send 1 or 2 "dummy" packets here as the card seems to discard the
201          first two packets that get send, and pump hates that.
202
203  */
204 static int __devinit xircom_probe(struct pci_dev *pdev, const struct pci_device_id *id)
205 {
206         struct net_device *dev = NULL;
207         struct xircom_private *private;
208         unsigned char chip_rev;
209         unsigned long flags;
210         unsigned short tmp16;
211         enter("xircom_probe");
212
213         /* First do the PCI initialisation */
214
215         if (pci_enable_device(pdev))
216                 return -ENODEV;
217
218         /* disable all powermanagement */
219         pci_write_config_dword(pdev, PCI_POWERMGMT, 0x0000);
220
221         pci_set_master(pdev); /* Why isn't this done by pci_enable_device ?*/
222
223         /* clear PCI status, if any */
224         pci_read_config_word (pdev,PCI_STATUS, &tmp16);
225         pci_write_config_word (pdev, PCI_STATUS,tmp16);
226
227         pci_read_config_byte(pdev, PCI_REVISION_ID, &chip_rev);
228
229         if (!request_region(pci_resource_start(pdev, 0), 128, "xircom_cb")) {
230                 printk(KERN_ERR "xircom_probe: failed to allocate io-region\n");
231                 return -ENODEV;
232         }
233
234         /*
235            Before changing the hardware, allocate the memory.
236            This way, we can fail gracefully if not enough memory
237            is available.
238          */
239         dev = alloc_etherdev(sizeof(struct xircom_private));
240         if (!dev) {
241                 printk(KERN_ERR "xircom_probe: failed to allocate etherdev\n");
242                 goto device_fail;
243         }
244         private = netdev_priv(dev);
245
246         /* Allocate the send/receive buffers */
247         private->rx_buffer = pci_alloc_consistent(pdev,8192,&private->rx_dma_handle);
248         if (private->rx_buffer == NULL) {
249                 printk(KERN_ERR "xircom_probe: no memory for rx buffer \n");
250                 goto rx_buf_fail;
251         }
252         private->tx_buffer = pci_alloc_consistent(pdev,8192,&private->tx_dma_handle);
253         if (private->tx_buffer == NULL) {
254                 printk(KERN_ERR "xircom_probe: no memory for tx buffer \n");
255                 goto tx_buf_fail;
256         }
257
258         SET_MODULE_OWNER(dev);
259         SET_NETDEV_DEV(dev, &pdev->dev);
260
261
262         private->dev = dev;
263         private->pdev = pdev;
264         private->io_port = pci_resource_start(pdev, 0);
265         spin_lock_init(&private->lock);
266         dev->irq = pdev->irq;
267         dev->base_addr = private->io_port;
268
269         initialize_card(private);
270         read_mac_address(private);
271         setup_descriptors(private);
272
273         dev->open = &xircom_open;
274         dev->hard_start_xmit = &xircom_start_xmit;
275         dev->stop = &xircom_close;
276         dev->get_stats = &xircom_get_stats;
277         dev->priv = private;
278 #ifdef CONFIG_NET_POLL_CONTROLLER
279         dev->poll_controller = &xircom_poll_controller;
280 #endif
281         SET_ETHTOOL_OPS(dev, &netdev_ethtool_ops);
282         pci_set_drvdata(pdev, dev);
283
284         if (register_netdev(dev)) {
285                 printk(KERN_ERR "xircom_probe: netdevice registration failed.\n");
286                 goto reg_fail;
287         }
288
289         printk(KERN_INFO "%s: Xircom cardbus revision %i at irq %i \n", dev->name, chip_rev, pdev->irq);
290         /* start the transmitter to get a heartbeat */
291         /* TODO: send 2 dummy packets here */
292         transceiver_voodoo(private);
293
294         spin_lock_irqsave(&private->lock,flags);
295         activate_transmitter(private);
296         activate_receiver(private);
297         spin_unlock_irqrestore(&private->lock,flags);
298
299         trigger_receive(private);
300
301         leave("xircom_probe");
302         return 0;
303
304 reg_fail:
305         kfree(private->tx_buffer);
306 tx_buf_fail:
307         kfree(private->rx_buffer);
308 rx_buf_fail:
309         free_netdev(dev);
310 device_fail:
311         return -ENODEV;
312 }
313
314
315 /*
316  xircom_remove is called on module-unload or on device-eject.
317  it unregisters the irq, io-region and network device.
318  Interrupts and such are already stopped in the "ifconfig ethX down"
319  code.
320  */
321 static void __devexit xircom_remove(struct pci_dev *pdev)
322 {
323         struct net_device *dev = pci_get_drvdata(pdev);
324         struct xircom_private *card = netdev_priv(dev);
325
326         enter("xircom_remove");
327         pci_free_consistent(pdev,8192,card->rx_buffer,card->rx_dma_handle);
328         pci_free_consistent(pdev,8192,card->tx_buffer,card->tx_dma_handle);
329
330         release_region(dev->base_addr, 128);
331         unregister_netdev(dev);
332         free_netdev(dev);
333         pci_set_drvdata(pdev, NULL);
334         leave("xircom_remove");
335 }
336
337 static irqreturn_t xircom_interrupt(int irq, void *dev_instance)
338 {
339         struct net_device *dev = (struct net_device *) dev_instance;
340         struct xircom_private *card = netdev_priv(dev);
341         unsigned int status;
342         int i;
343
344         enter("xircom_interrupt\n");
345
346         spin_lock(&card->lock);
347         status = inl(card->io_port+CSR5);
348
349 #ifdef DEBUG
350         print_binary(status);
351         printk("tx status 0x%08x 0x%08x \n",card->tx_buffer[0],card->tx_buffer[4]);
352         printk("rx status 0x%08x 0x%08x \n",card->rx_buffer[0],card->rx_buffer[4]);
353 #endif
354         /* Handle shared irq and hotplug */
355         if (status == 0 || status == 0xffffffff) {
356                 spin_unlock(&card->lock);
357                 return IRQ_NONE;
358         }
359
360         if (link_status_changed(card)) {
361                 int newlink;
362                 printk(KERN_DEBUG "xircom_cb: Link status has changed \n");
363                 newlink = link_status(card);
364                 printk(KERN_INFO  "xircom_cb: Link is %i mbit \n",newlink);
365                 if (newlink)
366                         netif_carrier_on(dev);
367                 else
368                         netif_carrier_off(dev);
369
370         }
371
372         /* Clear all remaining interrupts */
373         status |= 0xffffffff; /* FIXME: make this clear only the
374                                         real existing bits */
375         outl(status,card->io_port+CSR5);
376
377
378         for (i=0;i<NUMDESCRIPTORS;i++)
379                 investigate_write_descriptor(dev,card,i,bufferoffsets[i]);
380         for (i=0;i<NUMDESCRIPTORS;i++)
381                 investigate_read_descriptor(dev,card,i,bufferoffsets[i]);
382
383
384         spin_unlock(&card->lock);
385         leave("xircom_interrupt");
386         return IRQ_HANDLED;
387 }
388
389 static int xircom_start_xmit(struct sk_buff *skb, struct net_device *dev)
390 {
391         struct xircom_private *card;
392         unsigned long flags;
393         int nextdescriptor;
394         int desc;
395         enter("xircom_start_xmit");
396
397         card = netdev_priv(dev);
398         spin_lock_irqsave(&card->lock,flags);
399
400         /* First see if we can free some descriptors */
401         for (desc=0;desc<NUMDESCRIPTORS;desc++)
402                 investigate_write_descriptor(dev,card,desc,bufferoffsets[desc]);
403
404
405         nextdescriptor = (card->transmit_used +1) % (NUMDESCRIPTORS);
406         desc = card->transmit_used;
407
408         /* only send the packet if the descriptor is free */
409         if (card->tx_buffer[4*desc]==0) {
410                         /* Copy the packet data; zero the memory first as the card
411                            sometimes sends more than you ask it to. */
412
413                         memset(&card->tx_buffer[bufferoffsets[desc]/4],0,1536);
414                         skb_copy_from_linear_data(skb,
415                                   &(card->tx_buffer[bufferoffsets[desc] / 4]),
416                                                   skb->len);
417                         /* FIXME: The specification tells us that the length we send HAS to be a multiple of
418                            4 bytes. */
419
420                         card->tx_buffer[4*desc+1] = skb->len;
421                         if (desc == NUMDESCRIPTORS-1)
422                                 card->tx_buffer[4*desc+1] |= (1<<25);  /* bit 25: last descriptor of the ring */
423
424                         card->tx_buffer[4*desc+1] |= 0xF0000000;
425                                                  /* 0xF0... means want interrupts*/
426                         card->tx_skb[desc] = skb;
427
428                         wmb();
429                         /* This gives the descriptor to the card */
430                         card->tx_buffer[4*desc] = 0x80000000;
431                         trigger_transmit(card);
432                         if (((int)card->tx_buffer[nextdescriptor*4])<0) {       /* next descriptor is occupied... */
433                                 netif_stop_queue(dev);
434                         }
435                         card->transmit_used = nextdescriptor;
436                         leave("xircom-start_xmit - sent");
437                         spin_unlock_irqrestore(&card->lock,flags);
438                         return 0;
439         }
440
441
442
443         /* Uh oh... no free descriptor... drop the packet */
444         netif_stop_queue(dev);
445         spin_unlock_irqrestore(&card->lock,flags);
446         trigger_transmit(card);
447
448         return -EIO;
449 }
450
451
452
453
454 static int xircom_open(struct net_device *dev)
455 {
456         struct xircom_private *xp = netdev_priv(dev);
457         int retval;
458         enter("xircom_open");
459         printk(KERN_INFO "xircom cardbus adaptor found, registering as %s, using irq %i \n",dev->name,dev->irq);
460         retval = request_irq(dev->irq, &xircom_interrupt, IRQF_SHARED, dev->name, dev);
461         if (retval) {
462                 leave("xircom_open - No IRQ");
463                 return retval;
464         }
465
466         xircom_up(xp);
467         xp->open = 1;
468         leave("xircom_open");
469         return 0;
470 }
471
472 static int xircom_close(struct net_device *dev)
473 {
474         struct xircom_private *card;
475         unsigned long flags;
476
477         enter("xircom_close");
478         card = netdev_priv(dev);
479         netif_stop_queue(dev); /* we don't want new packets */
480
481
482         spin_lock_irqsave(&card->lock,flags);
483
484         disable_all_interrupts(card);
485 #if 0
486         /* We can enable this again once we send dummy packets on ifconfig ethX up */
487         deactivate_receiver(card);
488         deactivate_transmitter(card);
489 #endif
490         remove_descriptors(card);
491
492         spin_unlock_irqrestore(&card->lock,flags);
493
494         card->open = 0;
495         free_irq(dev->irq,dev);
496
497         leave("xircom_close");
498
499         return 0;
500
501 }
502
503
504
505 static struct net_device_stats *xircom_get_stats(struct net_device *dev)
506 {
507         struct xircom_private *card = netdev_priv(dev);
508         return &card->stats;
509 }
510
511
512 #ifdef CONFIG_NET_POLL_CONTROLLER
513 static void xircom_poll_controller(struct net_device *dev)
514 {
515         disable_irq(dev->irq);
516         xircom_interrupt(dev->irq, dev);
517         enable_irq(dev->irq);
518 }
519 #endif
520
521
522 static void initialize_card(struct xircom_private *card)
523 {
524         unsigned int val;
525         unsigned long flags;
526         enter("initialize_card");
527
528
529         spin_lock_irqsave(&card->lock, flags);
530
531         /* First: reset the card */
532         val = inl(card->io_port + CSR0);
533         val |= 0x01;            /* Software reset */
534         outl(val, card->io_port + CSR0);
535
536         udelay(100);            /* give the card some time to reset */
537
538         val = inl(card->io_port + CSR0);
539         val &= ~0x01;           /* disable Software reset */
540         outl(val, card->io_port + CSR0);
541
542
543         val = 0;                /* Value 0x00 is a safe and conservative value
544                                    for the PCI configuration settings */
545         outl(val, card->io_port + CSR0);
546
547
548         disable_all_interrupts(card);
549         deactivate_receiver(card);
550         deactivate_transmitter(card);
551
552         spin_unlock_irqrestore(&card->lock, flags);
553
554         leave("initialize_card");
555 }
556
557 /*
558 trigger_transmit causes the card to check for frames to be transmitted.
559 This is accomplished by writing to the CSR1 port. The documentation
560 claims that the act of writing is sufficient and that the value is
561 ignored; I chose zero.
562 */
563 static void trigger_transmit(struct xircom_private *card)
564 {
565         unsigned int val;
566         enter("trigger_transmit");
567
568         val = 0;
569         outl(val, card->io_port + CSR1);
570
571         leave("trigger_transmit");
572 }
573
574 /*
575 trigger_receive causes the card to check for empty frames in the
576 descriptor list in which packets can be received.
577 This is accomplished by writing to the CSR2 port. The documentation
578 claims that the act of writing is sufficient and that the value is
579 ignored; I chose zero.
580 */
581 static void trigger_receive(struct xircom_private *card)
582 {
583         unsigned int val;
584         enter("trigger_receive");
585
586         val = 0;
587         outl(val, card->io_port + CSR2);
588
589         leave("trigger_receive");
590 }
591
592 /*
593 setup_descriptors initializes the send and receive buffers to be valid
594 descriptors and programs the addresses into the card.
595 */
596 static void setup_descriptors(struct xircom_private *card)
597 {
598         unsigned int val;
599         unsigned int address;
600         int i;
601         enter("setup_descriptors");
602
603
604         BUG_ON(card->rx_buffer == NULL);
605         BUG_ON(card->tx_buffer == NULL);
606
607         /* Receive descriptors */
608         memset(card->rx_buffer, 0, 128);        /* clear the descriptors */
609         for (i=0;i<NUMDESCRIPTORS;i++ ) {
610
611                 /* Rx Descr0: It's empty, let the card own it, no errors -> 0x80000000 */
612                 card->rx_buffer[i*4 + 0] = 0x80000000;
613                 /* Rx Descr1: buffer 1 is 1536 bytes, buffer 2 is 0 bytes */
614                 card->rx_buffer[i*4 + 1] = 1536;
615                 if (i==NUMDESCRIPTORS-1)
616                         card->rx_buffer[i*4 + 1] |= (1 << 25); /* bit 25 is "last descriptor" */
617
618                 /* Rx Descr2: address of the buffer
619                    we store the buffer at the 2nd half of the page */
620
621                 address = (unsigned long) card->rx_dma_handle;
622                 card->rx_buffer[i*4 + 2] = cpu_to_le32(address + bufferoffsets[i]);
623                 /* Rx Desc3: address of 2nd buffer -> 0 */
624                 card->rx_buffer[i*4 + 3] = 0;
625         }
626
627         wmb();
628         /* Write the receive descriptor ring address to the card */
629         address = (unsigned long) card->rx_dma_handle;
630         val = cpu_to_le32(address);
631         outl(val, card->io_port + CSR3);        /* Receive descr list address */
632
633
634         /* transmit descriptors */
635         memset(card->tx_buffer, 0, 128);        /* clear the descriptors */
636
637         for (i=0;i<NUMDESCRIPTORS;i++ ) {
638                 /* Tx Descr0: Empty, we own it, no errors -> 0x00000000 */
639                 card->tx_buffer[i*4 + 0] = 0x00000000;
640                 /* Tx Descr1: buffer 1 is 1536 bytes, buffer 2 is 0 bytes */
641                 card->tx_buffer[i*4 + 1] = 1536;
642                 if (i==NUMDESCRIPTORS-1)
643                         card->tx_buffer[i*4 + 1] |= (1 << 25); /* bit 25 is "last descriptor" */
644
645                 /* Tx Descr2: address of the buffer
646                    we store the buffer at the 2nd half of the page */
647                 address = (unsigned long) card->tx_dma_handle;
648                 card->tx_buffer[i*4 + 2] = cpu_to_le32(address + bufferoffsets[i]);
649                 /* Tx Desc3: address of 2nd buffer -> 0 */
650                 card->tx_buffer[i*4 + 3] = 0;
651         }
652
653         wmb();
654         /* wite the transmit descriptor ring to the card */
655         address = (unsigned long) card->tx_dma_handle;
656         val =cpu_to_le32(address);
657         outl(val, card->io_port + CSR4);        /* xmit descr list address */
658
659         leave("setup_descriptors");
660 }
661
662 /*
663 remove_descriptors informs the card the descriptors are no longer
664 valid by setting the address in the card to 0x00.
665 */
666 static void remove_descriptors(struct xircom_private *card)
667 {
668         unsigned int val;
669         enter("remove_descriptors");
670
671         val = 0;
672         outl(val, card->io_port + CSR3);        /* Receive descriptor address */
673         outl(val, card->io_port + CSR4);        /* Send descriptor address */
674
675         leave("remove_descriptors");
676 }
677
678 /*
679 link_status_changed returns 1 if the card has indicated that
680 the link status has changed. The new link status has to be read from CSR12.
681
682 This function also clears the status-bit.
683 */
684 static int link_status_changed(struct xircom_private *card)
685 {
686         unsigned int val;
687         enter("link_status_changed");
688
689         val = inl(card->io_port + CSR5);        /* Status register */
690
691         if ((val & (1 << 27)) == 0) {   /* no change */
692                 leave("link_status_changed - nochange");
693                 return 0;
694         }
695
696         /* clear the event by writing a 1 to the bit in the
697            status register. */
698         val = (1 << 27);
699         outl(val, card->io_port + CSR5);
700
701         leave("link_status_changed - changed");
702         return 1;
703 }
704
705
706 /*
707 transmit_active returns 1 if the transmitter on the card is
708 in a non-stopped state.
709 */
710 static int transmit_active(struct xircom_private *card)
711 {
712         unsigned int val;
713         enter("transmit_active");
714
715         val = inl(card->io_port + CSR5);        /* Status register */
716
717         if ((val & (7 << 20)) == 0) {   /* transmitter disabled */
718                 leave("transmit_active - inactive");
719                 return 0;
720         }
721
722         leave("transmit_active - active");
723         return 1;
724 }
725
726 /*
727 receive_active returns 1 if the receiver on the card is
728 in a non-stopped state.
729 */
730 static int receive_active(struct xircom_private *card)
731 {
732         unsigned int val;
733         enter("receive_active");
734
735
736         val = inl(card->io_port + CSR5);        /* Status register */
737
738         if ((val & (7 << 17)) == 0) {   /* receiver disabled */
739                 leave("receive_active - inactive");
740                 return 0;
741         }
742
743         leave("receive_active - active");
744         return 1;
745 }
746
747 /*
748 activate_receiver enables the receiver on the card.
749 Before being allowed to active the receiver, the receiver
750 must be completely de-activated. To achieve this,
751 this code actually disables the receiver first; then it waits for the
752 receiver to become inactive, then it activates the receiver and then
753 it waits for the receiver to be active.
754
755 must be called with the lock held and interrupts disabled.
756 */
757 static void activate_receiver(struct xircom_private *card)
758 {
759         unsigned int val;
760         int counter;
761         enter("activate_receiver");
762
763
764         val = inl(card->io_port + CSR6);        /* Operation mode */
765
766         /* If the "active" bit is set and the receiver is already
767            active, no need to do the expensive thing */
768         if ((val&2) && (receive_active(card)))
769                 return;
770
771
772         val = val & ~2;         /* disable the receiver */
773         outl(val, card->io_port + CSR6);
774
775         counter = 10;
776         while (counter > 0) {
777                 if (!receive_active(card))
778                         break;
779                 /* wait a while */
780                 udelay(50);
781                 counter--;
782                 if (counter <= 0)
783                         printk(KERN_ERR "xircom_cb: Receiver failed to deactivate\n");
784         }
785
786         /* enable the receiver */
787         val = inl(card->io_port + CSR6);        /* Operation mode */
788         val = val | 2;                          /* enable the receiver */
789         outl(val, card->io_port + CSR6);
790
791         /* now wait for the card to activate again */
792         counter = 10;
793         while (counter > 0) {
794                 if (receive_active(card))
795                         break;
796                 /* wait a while */
797                 udelay(50);
798                 counter--;
799                 if (counter <= 0)
800                         printk(KERN_ERR "xircom_cb: Receiver failed to re-activate\n");
801         }
802
803         leave("activate_receiver");
804 }
805
806 /*
807 deactivate_receiver disables the receiver on the card.
808 To achieve this this code disables the receiver first;
809 then it waits for the receiver to become inactive.
810
811 must be called with the lock held and interrupts disabled.
812 */
813 static void deactivate_receiver(struct xircom_private *card)
814 {
815         unsigned int val;
816         int counter;
817         enter("deactivate_receiver");
818
819         val = inl(card->io_port + CSR6);        /* Operation mode */
820         val = val & ~2;                         /* disable the receiver */
821         outl(val, card->io_port + CSR6);
822
823         counter = 10;
824         while (counter > 0) {
825                 if (!receive_active(card))
826                         break;
827                 /* wait a while */
828                 udelay(50);
829                 counter--;
830                 if (counter <= 0)
831                         printk(KERN_ERR "xircom_cb: Receiver failed to deactivate\n");
832         }
833
834
835         leave("deactivate_receiver");
836 }
837
838
839 /*
840 activate_transmitter enables the transmitter on the card.
841 Before being allowed to active the transmitter, the transmitter
842 must be completely de-activated. To achieve this,
843 this code actually disables the transmitter first; then it waits for the
844 transmitter to become inactive, then it activates the transmitter and then
845 it waits for the transmitter to be active again.
846
847 must be called with the lock held and interrupts disabled.
848 */
849 static void activate_transmitter(struct xircom_private *card)
850 {
851         unsigned int val;
852         int counter;
853         enter("activate_transmitter");
854
855
856         val = inl(card->io_port + CSR6);        /* Operation mode */
857
858         /* If the "active" bit is set and the receiver is already
859            active, no need to do the expensive thing */
860         if ((val&(1<<13)) && (transmit_active(card)))
861                 return;
862
863         val = val & ~(1 << 13); /* disable the transmitter */
864         outl(val, card->io_port + CSR6);
865
866         counter = 10;
867         while (counter > 0) {
868                 if (!transmit_active(card))
869                         break;
870                 /* wait a while */
871                 udelay(50);
872                 counter--;
873                 if (counter <= 0)
874                         printk(KERN_ERR "xircom_cb: Transmitter failed to deactivate\n");
875         }
876
877         /* enable the transmitter */
878         val = inl(card->io_port + CSR6);        /* Operation mode */
879         val = val | (1 << 13);  /* enable the transmitter */
880         outl(val, card->io_port + CSR6);
881
882         /* now wait for the card to activate again */
883         counter = 10;
884         while (counter > 0) {
885                 if (transmit_active(card))
886                         break;
887                 /* wait a while */
888                 udelay(50);
889                 counter--;
890                 if (counter <= 0)
891                         printk(KERN_ERR "xircom_cb: Transmitter failed to re-activate\n");
892         }
893
894         leave("activate_transmitter");
895 }
896
897 /*
898 deactivate_transmitter disables the transmitter on the card.
899 To achieve this this code disables the transmitter first;
900 then it waits for the transmitter to become inactive.
901
902 must be called with the lock held and interrupts disabled.
903 */
904 static void deactivate_transmitter(struct xircom_private *card)
905 {
906         unsigned int val;
907         int counter;
908         enter("deactivate_transmitter");
909
910         val = inl(card->io_port + CSR6);        /* Operation mode */
911         val = val & ~2;         /* disable the transmitter */
912         outl(val, card->io_port + CSR6);
913
914         counter = 20;
915         while (counter > 0) {
916                 if (!transmit_active(card))
917                         break;
918                 /* wait a while */
919                 udelay(50);
920                 counter--;
921                 if (counter <= 0)
922                         printk(KERN_ERR "xircom_cb: Transmitter failed to deactivate\n");
923         }
924
925
926         leave("deactivate_transmitter");
927 }
928
929
930 /*
931 enable_transmit_interrupt enables the transmit interrupt
932
933 must be called with the lock held and interrupts disabled.
934 */
935 static void enable_transmit_interrupt(struct xircom_private *card)
936 {
937         unsigned int val;
938         enter("enable_transmit_interrupt");
939
940         val = inl(card->io_port + CSR7);        /* Interrupt enable register */
941         val |= 1;                               /* enable the transmit interrupt */
942         outl(val, card->io_port + CSR7);
943
944         leave("enable_transmit_interrupt");
945 }
946
947
948 /*
949 enable_receive_interrupt enables the receive interrupt
950
951 must be called with the lock held and interrupts disabled.
952 */
953 static void enable_receive_interrupt(struct xircom_private *card)
954 {
955         unsigned int val;
956         enter("enable_receive_interrupt");
957
958         val = inl(card->io_port + CSR7);        /* Interrupt enable register */
959         val = val | (1 << 6);                   /* enable the receive interrupt */
960         outl(val, card->io_port + CSR7);
961
962         leave("enable_receive_interrupt");
963 }
964
965 /*
966 enable_link_interrupt enables the link status change interrupt
967
968 must be called with the lock held and interrupts disabled.
969 */
970 static void enable_link_interrupt(struct xircom_private *card)
971 {
972         unsigned int val;
973         enter("enable_link_interrupt");
974
975         val = inl(card->io_port + CSR7);        /* Interrupt enable register */
976         val = val | (1 << 27);                  /* enable the link status chage interrupt */
977         outl(val, card->io_port + CSR7);
978
979         leave("enable_link_interrupt");
980 }
981
982
983
984 /*
985 disable_all_interrupts disables all interrupts
986
987 must be called with the lock held and interrupts disabled.
988 */
989 static void disable_all_interrupts(struct xircom_private *card)
990 {
991         unsigned int val;
992         enter("enable_all_interrupts");
993
994         val = 0;                                /* disable all interrupts */
995         outl(val, card->io_port + CSR7);
996
997         leave("disable_all_interrupts");
998 }
999
1000 /*
1001 enable_common_interrupts enables several weird interrupts
1002
1003 must be called with the lock held and interrupts disabled.
1004 */
1005 static void enable_common_interrupts(struct xircom_private *card)
1006 {
1007         unsigned int val;
1008         enter("enable_link_interrupt");
1009
1010         val = inl(card->io_port + CSR7);        /* Interrupt enable register */
1011         val |= (1<<16); /* Normal Interrupt Summary */
1012         val |= (1<<15); /* Abnormal Interrupt Summary */
1013         val |= (1<<13); /* Fatal bus error */
1014         val |= (1<<8);  /* Receive Process Stopped */
1015         val |= (1<<7);  /* Receive Buffer Unavailable */
1016         val |= (1<<5);  /* Transmit Underflow */
1017         val |= (1<<2);  /* Transmit Buffer Unavailable */
1018         val |= (1<<1);  /* Transmit Process Stopped */
1019         outl(val, card->io_port + CSR7);
1020
1021         leave("enable_link_interrupt");
1022 }
1023
1024 /*
1025 enable_promisc starts promisc mode
1026
1027 must be called with the lock held and interrupts disabled.
1028 */
1029 static int enable_promisc(struct xircom_private *card)
1030 {
1031         unsigned int val;
1032         enter("enable_promisc");
1033
1034         val = inl(card->io_port + CSR6);
1035         val = val | (1 << 6);
1036         outl(val, card->io_port + CSR6);
1037
1038         leave("enable_promisc");
1039         return 1;
1040 }
1041
1042
1043
1044
1045 /*
1046 link_status() checks the links status and will return 0 for no link, 10 for 10mbit link and 100 for.. guess what.
1047
1048 Must be called in locked state with interrupts disabled
1049 */
1050 static int link_status(struct xircom_private *card)
1051 {
1052         unsigned int val;
1053         enter("link_status");
1054
1055         val = inb(card->io_port + CSR12);
1056
1057         if (!(val&(1<<2)))  /* bit 2 is 0 for 10mbit link, 1 for not an 10mbit link */
1058                 return 10;
1059         if (!(val&(1<<1)))  /* bit 1 is 0 for 100mbit link, 1 for not an 100mbit link */
1060                 return 100;
1061
1062         /* If we get here -> no link at all */
1063
1064         leave("link_status");
1065         return 0;
1066 }
1067
1068
1069
1070
1071
1072 /*
1073   read_mac_address() reads the MAC address from the NIC and stores it in the "dev" structure.
1074
1075   This function will take the spinlock itself and can, as a result, not be called with the lock helt.
1076  */
1077 static void read_mac_address(struct xircom_private *card)
1078 {
1079         unsigned char j, tuple, link, data_id, data_count;
1080         unsigned long flags;
1081         int i;
1082
1083         enter("read_mac_address");
1084
1085         spin_lock_irqsave(&card->lock, flags);
1086
1087         outl(1 << 12, card->io_port + CSR9);    /* enable boot rom access */
1088         for (i = 0x100; i < 0x1f7; i += link + 2) {
1089                 outl(i, card->io_port + CSR10);
1090                 tuple = inl(card->io_port + CSR9) & 0xff;
1091                 outl(i + 1, card->io_port + CSR10);
1092                 link = inl(card->io_port + CSR9) & 0xff;
1093                 outl(i + 2, card->io_port + CSR10);
1094                 data_id = inl(card->io_port + CSR9) & 0xff;
1095                 outl(i + 3, card->io_port + CSR10);
1096                 data_count = inl(card->io_port + CSR9) & 0xff;
1097                 if ((tuple == 0x22) && (data_id == 0x04) && (data_count == 0x06)) {
1098                         /*
1099                          * This is it.  We have the data we want.
1100                          */
1101                         for (j = 0; j < 6; j++) {
1102                                 outl(i + j + 4, card->io_port + CSR10);
1103                                 card->dev->dev_addr[j] = inl(card->io_port + CSR9) & 0xff;
1104                         }
1105                         break;
1106                 } else if (link == 0) {
1107                         break;
1108                 }
1109         }
1110         spin_unlock_irqrestore(&card->lock, flags);
1111 #ifdef DEBUG
1112         for (i = 0; i < 6; i++)
1113                 printk("%c%2.2X", i ? ':' : ' ', card->dev->dev_addr[i]);
1114         printk("\n");
1115 #endif
1116         leave("read_mac_address");
1117 }
1118
1119
1120 /*
1121  transceiver_voodoo() enables the external UTP plug thingy.
1122  it's called voodoo as I stole this code and cannot cross-reference
1123  it with the specification.
1124  */
1125 static void transceiver_voodoo(struct xircom_private *card)
1126 {
1127         unsigned long flags;
1128
1129         enter("transceiver_voodoo");
1130
1131         /* disable all powermanagement */
1132         pci_write_config_dword(card->pdev, PCI_POWERMGMT, 0x0000);
1133
1134         setup_descriptors(card);
1135
1136         spin_lock_irqsave(&card->lock, flags);
1137
1138         outl(0x0008, card->io_port + CSR15);
1139         udelay(25);
1140         outl(0xa8050000, card->io_port + CSR15);
1141         udelay(25);
1142         outl(0xa00f0000, card->io_port + CSR15);
1143         udelay(25);
1144
1145         spin_unlock_irqrestore(&card->lock, flags);
1146
1147         netif_start_queue(card->dev);
1148         leave("transceiver_voodoo");
1149 }
1150
1151
1152 static void xircom_up(struct xircom_private *card)
1153 {
1154         unsigned long flags;
1155         int i;
1156
1157         enter("xircom_up");
1158
1159         /* disable all powermanagement */
1160         pci_write_config_dword(card->pdev, PCI_POWERMGMT, 0x0000);
1161
1162         setup_descriptors(card);
1163
1164         spin_lock_irqsave(&card->lock, flags);
1165
1166
1167         enable_link_interrupt(card);
1168         enable_transmit_interrupt(card);
1169         enable_receive_interrupt(card);
1170         enable_common_interrupts(card);
1171         enable_promisc(card);
1172
1173         /* The card can have received packets already, read them away now */
1174         for (i=0;i<NUMDESCRIPTORS;i++)
1175                 investigate_read_descriptor(card->dev,card,i,bufferoffsets[i]);
1176
1177
1178         spin_unlock_irqrestore(&card->lock, flags);
1179         trigger_receive(card);
1180         trigger_transmit(card);
1181         netif_start_queue(card->dev);
1182         leave("xircom_up");
1183 }
1184
1185 /* Bufferoffset is in BYTES */
1186 static void investigate_read_descriptor(struct net_device *dev,struct xircom_private *card, int descnr, unsigned int bufferoffset)
1187 {
1188                 int status;
1189
1190                 enter("investigate_read_descriptor");
1191                 status = card->rx_buffer[4*descnr];
1192
1193                 if ((status > 0)) {     /* packet received */
1194
1195                         /* TODO: discard error packets */
1196
1197                         short pkt_len = ((status >> 16) & 0x7ff) - 4;   /* minus 4, we don't want the CRC */
1198                         struct sk_buff *skb;
1199
1200                         if (pkt_len > 1518) {
1201                                 printk(KERN_ERR "xircom_cb: Packet length %i is bogus \n",pkt_len);
1202                                 pkt_len = 1518;
1203                         }
1204
1205                         skb = dev_alloc_skb(pkt_len + 2);
1206                         if (skb == NULL) {
1207                                 card->stats.rx_dropped++;
1208                                 goto out;
1209                         }
1210                         skb_reserve(skb, 2);
1211                         skb_copy_to_linear_data(skb, (unsigned char*)&card->rx_buffer[bufferoffset / 4], pkt_len);
1212                         skb_put(skb, pkt_len);
1213                         skb->protocol = eth_type_trans(skb, dev);
1214                         netif_rx(skb);
1215                         dev->last_rx = jiffies;
1216                         card->stats.rx_packets++;
1217                         card->stats.rx_bytes += pkt_len;
1218
1219                       out:
1220                         /* give the buffer back to the card */
1221                         card->rx_buffer[4*descnr] =  0x80000000;
1222                         trigger_receive(card);
1223                 }
1224
1225                 leave("investigate_read_descriptor");
1226
1227 }
1228
1229
1230 /* Bufferoffset is in BYTES */
1231 static void investigate_write_descriptor(struct net_device *dev, struct xircom_private *card, int descnr, unsigned int bufferoffset)
1232 {
1233                 int status;
1234
1235                 enter("investigate_write_descriptor");
1236
1237                 status = card->tx_buffer[4*descnr];
1238 #if 0
1239                 if (status & 0x8000) {  /* Major error */
1240                         printk(KERN_ERR "Major transmit error status %x \n", status);
1241                         card->tx_buffer[4*descnr] = 0;
1242                         netif_wake_queue (dev);
1243                 }
1244 #endif
1245                 if (status > 0) {       /* bit 31 is 0 when done */
1246                         if (card->tx_skb[descnr]!=NULL) {
1247                                 card->stats.tx_bytes += card->tx_skb[descnr]->len;
1248                                 dev_kfree_skb_irq(card->tx_skb[descnr]);
1249                         }
1250                         card->tx_skb[descnr] = NULL;
1251                         /* Bit 8 in the status field is 1 if there was a collision */
1252                         if (status&(1<<8))
1253                                 card->stats.collisions++;
1254                         card->tx_buffer[4*descnr] = 0; /* descriptor is free again */
1255                         netif_wake_queue (dev);
1256                         card->stats.tx_packets++;
1257                 }
1258
1259                 leave("investigate_write_descriptor");
1260
1261 }
1262
1263
1264 static int __init xircom_init(void)
1265 {
1266         return pci_register_driver(&xircom_ops);
1267 }
1268
1269 static void __exit xircom_exit(void)
1270 {
1271         pci_unregister_driver(&xircom_ops);
1272 }
1273
1274 module_init(xircom_init)
1275 module_exit(xircom_exit)
1276