Merge branch 'linux-2.6'
[linux-2.6] / drivers / net / netxen / netxen_nic_main.c
1 /*
2  * Copyright (C) 2003 - 2006 NetXen, Inc.
3  * All rights reserved.
4  *
5  * This program is free software; you can redistribute it and/or
6  * modify it under the terms of the GNU General Public License
7  * as published by the Free Software Foundation; either version 2
8  * of the License, or (at your option) any later version.
9  *
10  * This program is distributed in the hope that it will be useful, but
11  * WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with this program; if not, write to the Free Software
17  * Foundation, Inc., 59 Temple Place - Suite 330, Boston,
18  * MA  02111-1307, USA.
19  *
20  * The full GNU General Public License is included in this distribution
21  * in the file called LICENSE.
22  *
23  * Contact Information:
24  *    info@netxen.com
25  * NetXen,
26  * 3965 Freedom Circle, Fourth floor,
27  * Santa Clara, CA 95054
28  *
29  *
30  *  Main source file for NetXen NIC Driver on Linux
31  *
32  */
33
34 #include <linux/vmalloc.h>
35 #include <linux/highmem.h>
36 #include "netxen_nic_hw.h"
37
38 #include "netxen_nic.h"
39 #define DEFINE_GLOBAL_RECV_CRB
40 #include "netxen_nic_phan_reg.h"
41
42 #include <linux/dma-mapping.h>
43 #include <linux/vmalloc.h>
44
45 #define PHAN_VENDOR_ID 0x4040
46
47 MODULE_DESCRIPTION("NetXen Multi port (1/10) Gigabit Network Driver");
48 MODULE_LICENSE("GPL");
49 MODULE_VERSION(NETXEN_NIC_LINUX_VERSIONID);
50
51 char netxen_nic_driver_name[] = "netxen-nic";
52 static char netxen_nic_driver_string[] = "NetXen Network Driver version "
53     NETXEN_NIC_LINUX_VERSIONID;
54
55 #define NETXEN_NETDEV_WEIGHT 120
56 #define NETXEN_ADAPTER_UP_MAGIC 777
57 #define NETXEN_NIC_PEG_TUNE 0
58
59 u8 nx_p2_id = NX_P2_C0;
60
61 #define DMA_32BIT_MASK  0x00000000ffffffffULL
62 #define DMA_35BIT_MASK  0x00000007ffffffffULL
63
64 /* Local functions to NetXen NIC driver */
65 static int __devinit netxen_nic_probe(struct pci_dev *pdev,
66                                       const struct pci_device_id *ent);
67 static void __devexit netxen_nic_remove(struct pci_dev *pdev);
68 static int netxen_nic_open(struct net_device *netdev);
69 static int netxen_nic_close(struct net_device *netdev);
70 static int netxen_nic_xmit_frame(struct sk_buff *, struct net_device *);
71 static void netxen_tx_timeout(struct net_device *netdev);
72 static void netxen_tx_timeout_task(struct work_struct *work);
73 static void netxen_watchdog(unsigned long);
74 static int netxen_handle_int(struct netxen_adapter *, struct net_device *);
75 static int netxen_nic_poll(struct net_device *dev, int *budget);
76 #ifdef CONFIG_NET_POLL_CONTROLLER
77 static void netxen_nic_poll_controller(struct net_device *netdev);
78 #endif
79 static irqreturn_t netxen_intr(int irq, void *data);
80
81 /*  PCI Device ID Table  */
82 static struct pci_device_id netxen_pci_tbl[] __devinitdata = {
83         {PCI_DEVICE(0x4040, 0x0001)},
84         {PCI_DEVICE(0x4040, 0x0002)},
85         {PCI_DEVICE(0x4040, 0x0003)},
86         {PCI_DEVICE(0x4040, 0x0004)},
87         {PCI_DEVICE(0x4040, 0x0005)},
88         {PCI_DEVICE(0x4040, 0x0024)},
89         {PCI_DEVICE(0x4040, 0x0025)},
90         {0,}
91 };
92
93 MODULE_DEVICE_TABLE(pci, netxen_pci_tbl);
94
95 struct workqueue_struct *netxen_workq;
96 static void netxen_watchdog(unsigned long);
97
98 /*
99  * netxen_nic_probe()
100  *
101  * The Linux system will invoke this after identifying the vendor ID and
102  * device Id in the pci_tbl supported by this module.
103  *
104  * A quad port card has one operational PCI config space, (function 0),
105  * which is used to access all four ports.
106  *
107  * This routine will initialize the adapter, and setup the global parameters
108  * along with the port's specific structure.
109  */
110 static int __devinit
111 netxen_nic_probe(struct pci_dev *pdev, const struct pci_device_id *ent)
112 {
113         struct net_device *netdev = NULL;
114         struct netxen_adapter *adapter = NULL;
115         struct netxen_port *port = NULL;
116         void __iomem *mem_ptr0 = NULL;
117         void __iomem *mem_ptr1 = NULL;
118         void __iomem *mem_ptr2 = NULL;
119
120         u8 __iomem *db_ptr = NULL;
121         unsigned long mem_base, mem_len, db_base, db_len;
122         int pci_using_dac, i, err;
123         int ring;
124         struct netxen_recv_context *recv_ctx = NULL;
125         struct netxen_rcv_desc_ctx *rcv_desc = NULL;
126         struct netxen_cmd_buffer *cmd_buf_arr = NULL;
127         u64 mac_addr[FLASH_NUM_PORTS + 1];
128         int valid_mac = 0;
129
130         printk(KERN_INFO "%s \n", netxen_nic_driver_string);
131         /* In current scheme, we use only PCI function 0 */
132         if (PCI_FUNC(pdev->devfn) != 0) {
133                 DPRINTK(ERR, "NetXen function %d will not be enabled.\n",
134                         PCI_FUNC(pdev->devfn));
135                 return -ENODEV;
136         }
137         if ((err = pci_enable_device(pdev)))
138                 return err;
139         if (!(pci_resource_flags(pdev, 0) & IORESOURCE_MEM)) {
140                 err = -ENODEV;
141                 goto err_out_disable_pdev;
142         }
143
144         if ((err = pci_request_regions(pdev, netxen_nic_driver_name)))
145                 goto err_out_disable_pdev;
146
147         pci_set_master(pdev);
148         pci_read_config_byte(pdev, PCI_REVISION_ID, &nx_p2_id);
149         if (nx_p2_id == NX_P2_C1 &&
150             (pci_set_dma_mask(pdev, DMA_35BIT_MASK) == 0) &&
151             (pci_set_consistent_dma_mask(pdev, DMA_35BIT_MASK) == 0)) {
152                 pci_using_dac = 1;
153         } else {
154                 if ((err = pci_set_dma_mask(pdev, DMA_32BIT_MASK)) ||
155                     (err = pci_set_consistent_dma_mask(pdev, DMA_32BIT_MASK)))
156                         goto err_out_free_res;
157
158                 pci_using_dac = 0;
159         }
160
161         /* remap phys address */
162         mem_base = pci_resource_start(pdev, 0); /* 0 is for BAR 0 */
163         mem_len = pci_resource_len(pdev, 0);
164
165         /* 128 Meg of memory */
166         mem_ptr0 = ioremap(mem_base, FIRST_PAGE_GROUP_SIZE);
167         mem_ptr1 =
168             ioremap(mem_base + SECOND_PAGE_GROUP_START, SECOND_PAGE_GROUP_SIZE);
169         mem_ptr2 =
170             ioremap(mem_base + THIRD_PAGE_GROUP_START, THIRD_PAGE_GROUP_SIZE);
171
172         if ((mem_ptr0 == 0UL) || (mem_ptr1 == 0UL) || (mem_ptr2 == 0UL)) {
173                 DPRINTK(ERR,
174                         "Cannot remap adapter memory aborting.:"
175                         "0 -> %p, 1 -> %p, 2 -> %p\n",
176                         mem_ptr0, mem_ptr1, mem_ptr2);
177
178                 err = -EIO;
179                 goto err_out_iounmap;
180         }
181         db_base = pci_resource_start(pdev, 4);  /* doorbell is on bar 4 */
182         db_len = pci_resource_len(pdev, 4);
183
184         if (db_len == 0) {
185                 printk(KERN_ERR "%s: doorbell is disabled\n",
186                        netxen_nic_driver_name);
187                 err = -EIO;
188                 goto err_out_iounmap;
189         }
190         DPRINTK(INFO, "doorbell ioremap from %lx a size of %lx\n", db_base,
191                 db_len);
192
193         db_ptr = ioremap(db_base, NETXEN_DB_MAPSIZE_BYTES);
194         if (!db_ptr) {
195                 printk(KERN_ERR "%s: Failed to allocate doorbell map.",
196                        netxen_nic_driver_name);
197                 err = -EIO;
198                 goto err_out_iounmap;
199         }
200         DPRINTK(INFO, "doorbell ioremaped at %p\n", db_ptr);
201
202 /*
203  *      Allocate a adapter structure which will manage all the initialization
204  *      as well as the common resources for all ports...
205  *      all the ports will have pointer to this adapter as well as Adapter
206  *      will have pointers of all the ports structures.
207  */
208
209         /* One adapter structure for all 4 ports....   */
210         adapter = kzalloc(sizeof(struct netxen_adapter), GFP_KERNEL);
211         if (adapter == NULL) {
212                 printk(KERN_ERR "%s: Could not allocate adapter memory:%d\n",
213                        netxen_nic_driver_name,
214                        (int)sizeof(struct netxen_adapter));
215                 err = -ENOMEM;
216                 goto err_out_dbunmap;
217         }
218
219         adapter->max_tx_desc_count = MAX_CMD_DESCRIPTORS;
220         adapter->max_rx_desc_count = MAX_RCV_DESCRIPTORS;
221         adapter->max_jumbo_rx_desc_count = MAX_JUMBO_RCV_DESCRIPTORS;
222         adapter->max_lro_rx_desc_count = MAX_LRO_RCV_DESCRIPTORS;
223
224         pci_set_drvdata(pdev, adapter);
225
226         cmd_buf_arr = (struct netxen_cmd_buffer *)vmalloc(TX_RINGSIZE);
227         if (cmd_buf_arr == NULL) {
228                 printk(KERN_ERR
229                        "%s: Could not allocate cmd_buf_arr memory:%d\n",
230                        netxen_nic_driver_name, (int)TX_RINGSIZE);
231                 err = -ENOMEM;
232                 goto err_out_free_adapter;
233         }
234         memset(cmd_buf_arr, 0, TX_RINGSIZE);
235
236         for (i = 0; i < MAX_RCV_CTX; ++i) {
237                 recv_ctx = &adapter->recv_ctx[i];
238                 for (ring = 0; ring < NUM_RCV_DESC_RINGS; ring++) {
239                         rcv_desc = &recv_ctx->rcv_desc[ring];
240                         switch (RCV_DESC_TYPE(ring)) {
241                         case RCV_DESC_NORMAL:
242                                 rcv_desc->max_rx_desc_count =
243                                     adapter->max_rx_desc_count;
244                                 rcv_desc->flags = RCV_DESC_NORMAL;
245                                 rcv_desc->dma_size = RX_DMA_MAP_LEN;
246                                 rcv_desc->skb_size = MAX_RX_BUFFER_LENGTH;
247                                 break;
248
249                         case RCV_DESC_JUMBO:
250                                 rcv_desc->max_rx_desc_count =
251                                     adapter->max_jumbo_rx_desc_count;
252                                 rcv_desc->flags = RCV_DESC_JUMBO;
253                                 rcv_desc->dma_size = RX_JUMBO_DMA_MAP_LEN;
254                                 rcv_desc->skb_size = MAX_RX_JUMBO_BUFFER_LENGTH;
255                                 break;
256
257                         case RCV_RING_LRO:
258                                 rcv_desc->max_rx_desc_count =
259                                     adapter->max_lro_rx_desc_count;
260                                 rcv_desc->flags = RCV_DESC_LRO;
261                                 rcv_desc->dma_size = RX_LRO_DMA_MAP_LEN;
262                                 rcv_desc->skb_size = MAX_RX_LRO_BUFFER_LENGTH;
263                                 break;
264
265                         }
266                         rcv_desc->rx_buf_arr = (struct netxen_rx_buffer *)
267                             vmalloc(RCV_BUFFSIZE);
268
269                         if (rcv_desc->rx_buf_arr == NULL) {
270                                 printk(KERN_ERR "%s: Could not allocate"
271                                        "rcv_desc->rx_buf_arr memory:%d\n",
272                                        netxen_nic_driver_name,
273                                        (int)RCV_BUFFSIZE);
274                                 err = -ENOMEM;
275                                 goto err_out_free_rx_buffer;
276                         }
277                         memset(rcv_desc->rx_buf_arr, 0, RCV_BUFFSIZE);
278                 }
279
280         }
281
282         adapter->cmd_buf_arr = cmd_buf_arr;
283         adapter->ahw.pci_base0 = mem_ptr0;
284         adapter->ahw.pci_base1 = mem_ptr1;
285         adapter->ahw.pci_base2 = mem_ptr2;
286         adapter->ahw.db_base = db_ptr;
287         adapter->ahw.db_len = db_len;
288         spin_lock_init(&adapter->tx_lock);
289         spin_lock_init(&adapter->lock);
290         netxen_initialize_adapter_sw(adapter);  /* initialize the buffers in adapter */
291 #ifdef CONFIG_IA64
292         netxen_pinit_from_rom(adapter, 0);
293         udelay(500);
294         netxen_load_firmware(adapter);
295 #endif
296
297         /*
298          * Set the CRB window to invalid. If any register in window 0 is
299          * accessed it should set the window to 0 and then reset it to 1.
300          */
301         adapter->curr_window = 255;
302         /*
303          *  Adapter in our case is quad port so initialize it before
304          *  initializing the ports
305          */
306         netxen_initialize_adapter_hw(adapter);  /* initialize the adapter */
307
308         netxen_initialize_adapter_ops(adapter);
309
310         init_timer(&adapter->watchdog_timer);
311         adapter->ahw.xg_linkup = 0;
312         adapter->watchdog_timer.function = &netxen_watchdog;
313         adapter->watchdog_timer.data = (unsigned long)adapter;
314         INIT_WORK(&adapter->watchdog_task, netxen_watchdog_task);
315         adapter->ahw.pdev = pdev;
316         adapter->proc_cmd_buf_counter = 0;
317         adapter->ahw.revision_id = nx_p2_id;
318
319         if (pci_enable_msi(pdev)) {
320                 adapter->flags &= ~NETXEN_NIC_MSI_ENABLED;
321                 printk(KERN_WARNING "%s: unable to allocate MSI interrupt"
322                        " error\n", netxen_nic_driver_name);
323         } else
324                 adapter->flags |= NETXEN_NIC_MSI_ENABLED;
325
326         if (netxen_is_flash_supported(adapter) == 0 &&
327             netxen_get_flash_mac_addr(adapter, mac_addr) == 0)
328                 valid_mac = 1;
329         else
330                 valid_mac = 0;
331
332         /*
333          * Initialize all the CRB registers here.
334          */
335         writel(0, NETXEN_CRB_NORMALIZE(adapter, CRB_CMD_PRODUCER_OFFSET));
336         writel(0, NETXEN_CRB_NORMALIZE(adapter, CRB_CMD_CONSUMER_OFFSET));
337         writel(0, NETXEN_CRB_NORMALIZE(adapter, CRB_HOST_CMD_ADDR_LO));
338
339         /* do this before waking up pegs so that we have valid dummy dma addr */
340         err = netxen_initialize_adapter_offload(adapter);
341         if (err) {
342                 goto err_out_free_dev;
343         }
344
345         /* Unlock the HW, prompting the boot sequence */
346         writel(1,
347                NETXEN_CRB_NORMALIZE(adapter, NETXEN_ROMUSB_GLB_PEGTUNE_DONE));
348
349         /* Handshake with the card before we register the devices. */
350         netxen_phantom_init(adapter, NETXEN_NIC_PEG_TUNE);
351
352         /* initialize the all the ports */
353         adapter->active_ports = 0;
354
355         for (i = 0; i < adapter->ahw.max_ports; i++) {
356                 netdev = alloc_etherdev(sizeof(struct netxen_port));
357                 if (!netdev) {
358                         printk(KERN_ERR "%s: could not allocate netdev for port"
359                                " %d\n", netxen_nic_driver_name, i + 1);
360                         goto err_out_free_dev;
361                 }
362
363                 SET_MODULE_OWNER(netdev);
364                 SET_NETDEV_DEV(netdev, &pdev->dev);
365
366                 port = netdev_priv(netdev);
367                 port->netdev = netdev;
368                 port->pdev = pdev;
369                 port->adapter = adapter;
370                 port->portnum = i;      /* Gigabit port number from 0-3 */
371
372                 netdev->open = netxen_nic_open;
373                 netdev->stop = netxen_nic_close;
374                 netdev->hard_start_xmit = netxen_nic_xmit_frame;
375                 netdev->get_stats = netxen_nic_get_stats;
376                 netdev->set_multicast_list = netxen_nic_set_multi;
377                 netdev->set_mac_address = netxen_nic_set_mac;
378                 netdev->change_mtu = netxen_nic_change_mtu;
379                 netdev->tx_timeout = netxen_tx_timeout;
380                 netdev->watchdog_timeo = HZ;
381
382                 SET_ETHTOOL_OPS(netdev, &netxen_nic_ethtool_ops);
383                 netdev->poll = netxen_nic_poll;
384                 netdev->weight = NETXEN_NETDEV_WEIGHT;
385 #ifdef CONFIG_NET_POLL_CONTROLLER
386                 netdev->poll_controller = netxen_nic_poll_controller;
387 #endif
388                 /* ScatterGather support */
389                 netdev->features = NETIF_F_SG;
390                 netdev->features |= NETIF_F_IP_CSUM;
391                 netdev->features |= NETIF_F_TSO;
392
393                 if (pci_using_dac)
394                         netdev->features |= NETIF_F_HIGHDMA;
395
396                 if (valid_mac) {
397                         unsigned char *p = (unsigned char *)&mac_addr[i];
398                         netdev->dev_addr[0] = *(p + 5);
399                         netdev->dev_addr[1] = *(p + 4);
400                         netdev->dev_addr[2] = *(p + 3);
401                         netdev->dev_addr[3] = *(p + 2);
402                         netdev->dev_addr[4] = *(p + 1);
403                         netdev->dev_addr[5] = *(p + 0);
404
405                         memcpy(netdev->perm_addr, netdev->dev_addr,
406                                netdev->addr_len);
407                         if (!is_valid_ether_addr(netdev->perm_addr)) {
408                                 printk(KERN_ERR "%s: Bad MAC address "
409                                        "%02x:%02x:%02x:%02x:%02x:%02x.\n",
410                                        netxen_nic_driver_name,
411                                        netdev->dev_addr[0],
412                                        netdev->dev_addr[1],
413                                        netdev->dev_addr[2],
414                                        netdev->dev_addr[3],
415                                        netdev->dev_addr[4],
416                                        netdev->dev_addr[5]);
417                         } else {
418                                 if (adapter->macaddr_set)
419                                         adapter->macaddr_set(port,
420                                                              netdev->dev_addr);
421                         }
422                 }
423                 INIT_WORK(&port->tx_timeout_task, netxen_tx_timeout_task);
424                 netif_carrier_off(netdev);
425                 netif_stop_queue(netdev);
426
427                 if ((err = register_netdev(netdev))) {
428                         printk(KERN_ERR "%s: register_netdev failed port #%d"
429                                " aborting\n", netxen_nic_driver_name, i + 1);
430                         err = -EIO;
431                         free_netdev(netdev);
432                         goto err_out_free_dev;
433                 }
434                 adapter->port_count++;
435                 adapter->port[i] = port;
436         }
437
438         writel(0, NETXEN_CRB_NORMALIZE(adapter, CRB_CMDPEG_STATE));
439         netxen_pinit_from_rom(adapter, 0);
440         udelay(500);
441         netxen_load_firmware(adapter);
442         netxen_phantom_init(adapter, NETXEN_NIC_PEG_TUNE);
443         /*
444          * delay a while to ensure that the Pegs are up & running.
445          * Otherwise, we might see some flaky behaviour.
446          */
447         udelay(100);
448
449         switch (adapter->ahw.board_type) {
450         case NETXEN_NIC_GBE:
451                 printk("%s: QUAD GbE board initialized\n",
452                        netxen_nic_driver_name);
453                 break;
454
455         case NETXEN_NIC_XGBE:
456                 printk("%s: XGbE board initialized\n", netxen_nic_driver_name);
457                 break;
458         }
459
460         adapter->driver_mismatch = 0;
461
462         return 0;
463
464       err_out_free_dev:
465         if (adapter->flags & NETXEN_NIC_MSI_ENABLED)
466                 pci_disable_msi(pdev);
467         for (i = 0; i < adapter->port_count; i++) {
468                 port = adapter->port[i];
469                 if ((port) && (port->netdev)) {
470                         unregister_netdev(port->netdev);
471                         free_netdev(port->netdev);
472                 }
473         }
474
475         netxen_free_adapter_offload(adapter);
476
477       err_out_free_rx_buffer:
478         for (i = 0; i < MAX_RCV_CTX; ++i) {
479                 recv_ctx = &adapter->recv_ctx[i];
480                 for (ring = 0; ring < NUM_RCV_DESC_RINGS; ring++) {
481                         rcv_desc = &recv_ctx->rcv_desc[ring];
482                         if (rcv_desc->rx_buf_arr != NULL) {
483                                 vfree(rcv_desc->rx_buf_arr);
484                                 rcv_desc->rx_buf_arr = NULL;
485                         }
486                 }
487         }
488         vfree(cmd_buf_arr);
489
490       err_out_free_adapter:
491         pci_set_drvdata(pdev, NULL);
492         kfree(adapter);
493
494       err_out_dbunmap:
495         if (db_ptr)
496                 iounmap(db_ptr);
497
498       err_out_iounmap:
499         if (mem_ptr0)
500                 iounmap(mem_ptr0);
501         if (mem_ptr1)
502                 iounmap(mem_ptr1);
503         if (mem_ptr2)
504                 iounmap(mem_ptr2);
505
506       err_out_free_res:
507         pci_release_regions(pdev);
508       err_out_disable_pdev:
509         pci_disable_device(pdev);
510         return err;
511 }
512
513 static void __devexit netxen_nic_remove(struct pci_dev *pdev)
514 {
515         struct netxen_adapter *adapter;
516         struct netxen_port *port;
517         struct netxen_rx_buffer *buffer;
518         struct netxen_recv_context *recv_ctx;
519         struct netxen_rcv_desc_ctx *rcv_desc;
520         int i;
521         int ctxid, ring;
522
523         adapter = pci_get_drvdata(pdev);
524         if (adapter == NULL)
525                 return;
526
527         netxen_nic_stop_all_ports(adapter);
528         /* leave the hw in the same state as reboot */
529         netxen_pinit_from_rom(adapter, 0);
530         writel(0, NETXEN_CRB_NORMALIZE(adapter, CRB_CMDPEG_STATE));
531         netxen_load_firmware(adapter);
532         netxen_free_adapter_offload(adapter);
533
534         udelay(500);            /* Delay for a while to drain the DMA engines */
535         for (i = 0; i < adapter->port_count; i++) {
536                 port = adapter->port[i];
537                 if ((port) && (port->netdev)) {
538                         unregister_netdev(port->netdev);
539                         free_netdev(port->netdev);
540                 }
541         }
542
543         if ((adapter->flags & NETXEN_NIC_MSI_ENABLED))
544                 pci_disable_msi(pdev);
545         pci_set_drvdata(pdev, NULL);
546         if (adapter->is_up == NETXEN_ADAPTER_UP_MAGIC)
547                 netxen_free_hw_resources(adapter);
548
549         iounmap(adapter->ahw.db_base);
550         iounmap(adapter->ahw.pci_base0);
551         iounmap(adapter->ahw.pci_base1);
552         iounmap(adapter->ahw.pci_base2);
553
554         pci_release_regions(pdev);
555         pci_disable_device(pdev);
556
557         for (ctxid = 0; ctxid < MAX_RCV_CTX; ++ctxid) {
558                 recv_ctx = &adapter->recv_ctx[ctxid];
559                 for (ring = 0; ring < NUM_RCV_DESC_RINGS; ring++) {
560                         rcv_desc = &recv_ctx->rcv_desc[ring];
561                         for (i = 0; i < rcv_desc->max_rx_desc_count; ++i) {
562                                 buffer = &(rcv_desc->rx_buf_arr[i]);
563                                 if (buffer->state == NETXEN_BUFFER_FREE)
564                                         continue;
565                                 pci_unmap_single(pdev, buffer->dma,
566                                                  rcv_desc->dma_size,
567                                                  PCI_DMA_FROMDEVICE);
568                                 if (buffer->skb != NULL)
569                                         dev_kfree_skb_any(buffer->skb);
570                         }
571                         vfree(rcv_desc->rx_buf_arr);
572                 }
573         }
574
575         vfree(adapter->cmd_buf_arr);
576         kfree(adapter);
577 }
578
579 /*
580  * Called when a network interface is made active
581  * @returns 0 on success, negative value on failure
582  */
583 static int netxen_nic_open(struct net_device *netdev)
584 {
585         struct netxen_port *port = netdev_priv(netdev);
586         struct netxen_adapter *adapter = port->adapter;
587         int err = 0;
588         int ctx, ring;
589
590         if (adapter->is_up != NETXEN_ADAPTER_UP_MAGIC) {
591                 err = netxen_init_firmware(adapter);
592                 if (err != 0) {
593                         printk(KERN_ERR "Failed to init firmware\n");
594                         return -EIO;
595                 }
596                 netxen_nic_flash_print(adapter);
597                 if (adapter->init_niu)
598                         adapter->init_niu(adapter);
599
600                 /* setup all the resources for the Phantom... */
601                 /* this include the descriptors for rcv, tx, and status */
602                 netxen_nic_clear_stats(adapter);
603                 err = netxen_nic_hw_resources(adapter);
604                 if (err) {
605                         printk(KERN_ERR "Error in setting hw resources:%d\n",
606                                err);
607                         return err;
608                 }
609                 if (adapter->init_port
610                     && adapter->init_port(adapter, port->portnum) != 0) {
611                         printk(KERN_ERR "%s: Failed to initialize port %d\n",
612                                netxen_nic_driver_name, port->portnum);
613                         netxen_free_hw_resources(adapter);
614                         return -EIO;
615                 }
616                 for (ctx = 0; ctx < MAX_RCV_CTX; ++ctx) {
617                         for (ring = 0; ring < NUM_RCV_DESC_RINGS; ring++)
618                                 netxen_post_rx_buffers(adapter, ctx, ring);
619                 }
620                 adapter->irq = adapter->ahw.pdev->irq;
621                 err = request_irq(adapter->ahw.pdev->irq, &netxen_intr,
622                                   SA_SHIRQ | SA_SAMPLE_RANDOM, netdev->name,
623                                   adapter);
624                 if (err) {
625                         printk(KERN_ERR "request_irq failed with: %d\n", err);
626                         netxen_free_hw_resources(adapter);
627                         return err;
628                 }
629
630                 adapter->is_up = NETXEN_ADAPTER_UP_MAGIC;
631         }
632         adapter->active_ports++;
633         if (adapter->active_ports == 1) {
634                 if (!adapter->driver_mismatch)
635                         mod_timer(&adapter->watchdog_timer, jiffies);
636
637                 netxen_nic_enable_int(adapter);
638         }
639
640         /* Done here again so that even if phantom sw overwrote it,
641          * we set it */
642         if (adapter->macaddr_set)
643                 adapter->macaddr_set(port, netdev->dev_addr);
644         netxen_nic_set_link_parameters(port);
645
646         netxen_nic_set_multi(netdev);
647         if (adapter->set_mtu)
648                 adapter->set_mtu(port, netdev->mtu);
649
650         if (!adapter->driver_mismatch)
651                 netif_start_queue(netdev);
652
653         return 0;
654 }
655
656 /*
657  * netxen_nic_close - Disables a network interface entry point
658  */
659 static int netxen_nic_close(struct net_device *netdev)
660 {
661         struct netxen_port *port = netdev_priv(netdev);
662         struct netxen_adapter *adapter = port->adapter;
663         int i, j;
664         struct netxen_cmd_buffer *cmd_buff;
665         struct netxen_skb_frag *buffrag;
666
667         netif_carrier_off(netdev);
668         netif_stop_queue(netdev);
669
670         adapter->active_ports--;
671
672         if (!adapter->active_ports) {
673                 netxen_nic_disable_int(adapter);
674                 if (adapter->irq)
675                         free_irq(adapter->irq, adapter);
676                 cmd_buff = adapter->cmd_buf_arr;
677                 for (i = 0; i < adapter->max_tx_desc_count; i++) {
678                         buffrag = cmd_buff->frag_array;
679                         if (buffrag->dma) {
680                                 pci_unmap_single(port->pdev, buffrag->dma,
681                                                  buffrag->length,
682                                                  PCI_DMA_TODEVICE);
683                                 buffrag->dma = (u64) NULL;
684                         }
685                         for (j = 0; j < cmd_buff->frag_count; j++) {
686                                 buffrag++;
687                                 if (buffrag->dma) {
688                                         pci_unmap_page(port->pdev,
689                                                        buffrag->dma,
690                                                        buffrag->length,
691                                                        PCI_DMA_TODEVICE);
692                                         buffrag->dma = (u64) NULL;
693                                 }
694                         }
695                         /* Free the skb we received in netxen_nic_xmit_frame */
696                         if (cmd_buff->skb) {
697                                 dev_kfree_skb_any(cmd_buff->skb);
698                                 cmd_buff->skb = NULL;
699                         }
700                         cmd_buff++;
701                 }
702                 FLUSH_SCHEDULED_WORK();
703                 del_timer_sync(&adapter->watchdog_timer);
704         }
705
706         return 0;
707 }
708
709 static int netxen_nic_xmit_frame(struct sk_buff *skb, struct net_device *netdev)
710 {
711         struct netxen_port *port = netdev_priv(netdev);
712         struct netxen_adapter *adapter = port->adapter;
713         struct netxen_hardware_context *hw = &adapter->ahw;
714         unsigned int first_seg_len = skb->len - skb->data_len;
715         struct netxen_skb_frag *buffrag;
716         unsigned int i;
717
718         u32 producer = 0;
719         u32 saved_producer = 0;
720         struct cmd_desc_type0 *hwdesc;
721         int k;
722         struct netxen_cmd_buffer *pbuf = NULL;
723         static int dropped_packet = 0;
724         int frag_count;
725         u32 local_producer = 0;
726         u32 max_tx_desc_count = 0;
727         u32 last_cmd_consumer = 0;
728         int no_of_desc;
729
730         port->stats.xmitcalled++;
731         frag_count = skb_shinfo(skb)->nr_frags + 1;
732
733         if (unlikely(skb->len <= 0)) {
734                 dev_kfree_skb_any(skb);
735                 port->stats.badskblen++;
736                 return NETDEV_TX_OK;
737         }
738
739         if (frag_count > MAX_BUFFERS_PER_CMD) {
740                 printk("%s: %s netxen_nic_xmit_frame: frag_count (%d)"
741                        "too large, can handle only %d frags\n",
742                        netxen_nic_driver_name, netdev->name,
743                        frag_count, MAX_BUFFERS_PER_CMD);
744                 port->stats.txdropped++;
745                 if ((++dropped_packet & 0xff) == 0xff)
746                         printk("%s: %s droppped packets = %d\n",
747                                netxen_nic_driver_name, netdev->name,
748                                dropped_packet);
749
750                 return NETDEV_TX_OK;
751         }
752
753         /*
754          * Everything is set up. Now, we just need to transmit it out.
755          * Note that we have to copy the contents of buffer over to
756          * right place. Later on, this can be optimized out by de-coupling the
757          * producer index from the buffer index.
758          */
759       retry_getting_window:
760         spin_lock_bh(&adapter->tx_lock);
761         if (adapter->total_threads == MAX_XMIT_PRODUCERS) {
762                 spin_unlock_bh(&adapter->tx_lock);
763                 /*
764                  * Yield CPU
765                  */
766                 if (!in_atomic())
767                         schedule();
768                 else {
769                         for (i = 0; i < 20; i++)
770                                 cpu_relax();    /*This a nop instr on i386 */
771                 }
772                 goto retry_getting_window;
773         }
774         local_producer = adapter->cmd_producer;
775         /* There 4 fragments per descriptor */
776         no_of_desc = (frag_count + 3) >> 2;
777         if (netdev->features & NETIF_F_TSO) {
778                 if (skb_shinfo(skb)->gso_size > 0) {
779
780                         no_of_desc++;
781                         if (((skb->nh.iph)->ihl * sizeof(u32)) +
782                             ((skb->h.th)->doff * sizeof(u32)) +
783                             sizeof(struct ethhdr) >
784                             (sizeof(struct cmd_desc_type0) - 2)) {
785                                 no_of_desc++;
786                         }
787                 }
788         }
789         k = adapter->cmd_producer;
790         max_tx_desc_count = adapter->max_tx_desc_count;
791         last_cmd_consumer = adapter->last_cmd_consumer;
792         if ((k + no_of_desc) >=
793             ((last_cmd_consumer <= k) ? last_cmd_consumer + max_tx_desc_count :
794              last_cmd_consumer)) {
795                 port->stats.nocmddescriptor++;
796                 DPRINTK(ERR, "No command descriptors available,"
797                         " producer = %d, consumer = %d count=%llu,"
798                         " dropping packet\n", producer,
799                         adapter->last_cmd_consumer,
800                         port->stats.nocmddescriptor);
801
802                 netif_stop_queue(netdev);
803                 port->flags |= NETXEN_NETDEV_STATUS;
804                 spin_unlock_bh(&adapter->tx_lock);
805                 return NETDEV_TX_BUSY;
806         }
807         k = get_index_range(k, max_tx_desc_count, no_of_desc);
808         adapter->cmd_producer = k;
809         adapter->total_threads++;
810         adapter->num_threads++;
811
812         spin_unlock_bh(&adapter->tx_lock);
813         /* Copy the descriptors into the hardware    */
814         producer = local_producer;
815         saved_producer = producer;
816         hwdesc = &hw->cmd_desc_head[producer];
817         memset(hwdesc, 0, sizeof(struct cmd_desc_type0));
818         /* Take skb->data itself */
819         pbuf = &adapter->cmd_buf_arr[producer];
820         if ((netdev->features & NETIF_F_TSO) && skb_shinfo(skb)->gso_size > 0) {
821                 pbuf->mss = skb_shinfo(skb)->gso_size;
822                 hwdesc->mss = cpu_to_le16(skb_shinfo(skb)->gso_size);
823         } else {
824                 pbuf->mss = 0;
825                 hwdesc->mss = 0;
826         }
827         pbuf->total_length = skb->len;
828         pbuf->skb = skb;
829         pbuf->cmd = TX_ETHER_PKT;
830         pbuf->frag_count = frag_count;
831         pbuf->port = port->portnum;
832         buffrag = &pbuf->frag_array[0];
833         buffrag->dma = pci_map_single(port->pdev, skb->data, first_seg_len,
834                                       PCI_DMA_TODEVICE);
835         buffrag->length = first_seg_len;
836         netxen_set_cmd_desc_totallength(hwdesc, skb->len);
837         netxen_set_cmd_desc_num_of_buff(hwdesc, frag_count);
838         netxen_set_cmd_desc_opcode(hwdesc, TX_ETHER_PKT);
839
840         netxen_set_cmd_desc_port(hwdesc, port->portnum);
841         hwdesc->buffer1_length = cpu_to_le16(first_seg_len);
842         hwdesc->addr_buffer1 = cpu_to_le64(buffrag->dma);
843
844         for (i = 1, k = 1; i < frag_count; i++, k++) {
845                 struct skb_frag_struct *frag;
846                 int len, temp_len;
847                 unsigned long offset;
848                 dma_addr_t temp_dma;
849
850                 /* move to next desc. if there is a need */
851                 if ((i & 0x3) == 0) {
852                         k = 0;
853                         producer = get_next_index(producer,
854                                                   adapter->max_tx_desc_count);
855                         hwdesc = &hw->cmd_desc_head[producer];
856                         memset(hwdesc, 0, sizeof(struct cmd_desc_type0));
857                 }
858                 frag = &skb_shinfo(skb)->frags[i - 1];
859                 len = frag->size;
860                 offset = frag->page_offset;
861
862                 temp_len = len;
863                 temp_dma = pci_map_page(port->pdev, frag->page, offset,
864                                         len, PCI_DMA_TODEVICE);
865
866                 buffrag++;
867                 buffrag->dma = temp_dma;
868                 buffrag->length = temp_len;
869
870                 DPRINTK(INFO, "for loop. i=%d k=%d\n", i, k);
871                 switch (k) {
872                 case 0:
873                         hwdesc->buffer1_length = cpu_to_le16(temp_len);
874                         hwdesc->addr_buffer1 = cpu_to_le64(temp_dma);
875                         break;
876                 case 1:
877                         hwdesc->buffer2_length = cpu_to_le16(temp_len);
878                         hwdesc->addr_buffer2 = cpu_to_le64(temp_dma);
879                         break;
880                 case 2:
881                         hwdesc->buffer3_length = cpu_to_le16(temp_len);
882                         hwdesc->addr_buffer3 = cpu_to_le64(temp_dma);
883                         break;
884                 case 3:
885                         hwdesc->buffer4_length = cpu_to_le16(temp_len);
886                         hwdesc->addr_buffer4 = cpu_to_le64(temp_dma);
887                         break;
888                 }
889                 frag++;
890         }
891         producer = get_next_index(producer, adapter->max_tx_desc_count);
892
893         /* might change opcode to TX_TCP_LSO */
894         netxen_tso_check(adapter, &hw->cmd_desc_head[saved_producer], skb);
895
896         /* For LSO, we need to copy the MAC/IP/TCP headers into
897          * the descriptor ring
898          */
899         if (netxen_get_cmd_desc_opcode(&hw->cmd_desc_head[saved_producer])
900             == TX_TCP_LSO) {
901                 int hdr_len, first_hdr_len, more_hdr;
902                 hdr_len = hw->cmd_desc_head[saved_producer].total_hdr_length;
903                 if (hdr_len > (sizeof(struct cmd_desc_type0) - 2)) {
904                         first_hdr_len = sizeof(struct cmd_desc_type0) - 2;
905                         more_hdr = 1;
906                 } else {
907                         first_hdr_len = hdr_len;
908                         more_hdr = 0;
909                 }
910                 /* copy the MAC/IP/TCP headers to the cmd descriptor list */
911                 hwdesc = &hw->cmd_desc_head[producer];
912
913                 /* copy the first 64 bytes */
914                 memcpy(((void *)hwdesc) + 2,
915                        (void *)(skb->data), first_hdr_len);
916                 producer = get_next_index(producer, max_tx_desc_count);
917
918                 if (more_hdr) {
919                         hwdesc = &hw->cmd_desc_head[producer];
920                         /* copy the next 64 bytes - should be enough except
921                          * for pathological case
922                          */
923                         memcpy((void *)hwdesc, (void *)(skb->data) +
924                                first_hdr_len, hdr_len - first_hdr_len);
925                         producer = get_next_index(producer, max_tx_desc_count);
926                 }
927         }
928         spin_lock_bh(&adapter->tx_lock);
929         port->stats.txbytes +=
930             netxen_get_cmd_desc_totallength(&hw->cmd_desc_head[saved_producer]);
931         /* Code to update the adapter considering how many producer threads
932            are currently working */
933         if ((--adapter->num_threads) == 0) {
934                 /* This is the last thread */
935                 u32 crb_producer = adapter->cmd_producer;
936                 writel(crb_producer,
937                        NETXEN_CRB_NORMALIZE(adapter, CRB_CMD_PRODUCER_OFFSET));
938                 wmb();
939                 adapter->total_threads = 0;
940         }
941
942         port->stats.xmitfinished++;
943         spin_unlock_bh(&adapter->tx_lock);
944
945         netdev->trans_start = jiffies;
946
947         DPRINTK(INFO, "wrote CMD producer %x to phantom\n", producer);
948
949         DPRINTK(INFO, "Done. Send\n");
950         return NETDEV_TX_OK;
951 }
952
953 static void netxen_watchdog(unsigned long v)
954 {
955         struct netxen_adapter *adapter = (struct netxen_adapter *)v;
956
957         SCHEDULE_WORK(&adapter->watchdog_task);
958 }
959
960 static void netxen_tx_timeout(struct net_device *netdev)
961 {
962         struct netxen_port *port = (struct netxen_port *)netdev_priv(netdev);
963
964         SCHEDULE_WORK(&port->tx_timeout_task);
965 }
966
967 static void netxen_tx_timeout_task(struct work_struct *work)
968 {
969         struct netxen_port *port =
970                 container_of(work, struct netxen_port, tx_timeout_task);
971         struct net_device *netdev = port->netdev;
972         unsigned long flags;
973
974         printk(KERN_ERR "%s %s: transmit timeout, resetting.\n",
975                netxen_nic_driver_name, netdev->name);
976
977         spin_lock_irqsave(&port->adapter->lock, flags);
978         netxen_nic_close(netdev);
979         netxen_nic_open(netdev);
980         spin_unlock_irqrestore(&port->adapter->lock, flags);
981         netdev->trans_start = jiffies;
982         netif_wake_queue(netdev);
983 }
984
985 static int
986 netxen_handle_int(struct netxen_adapter *adapter, struct net_device *netdev)
987 {
988         u32 ret = 0;
989
990         DPRINTK(INFO, "Entered handle ISR\n");
991
992         adapter->stats.ints++;
993
994         if (!(adapter->flags & NETXEN_NIC_MSI_ENABLED)) {
995                 int count = 0;
996                 u32 mask;
997                 mask = readl(pci_base_offset(adapter, ISR_INT_VECTOR));
998                 if ((mask & 0x80) == 0) {
999                         /* not our interrupt */
1000                         return ret;
1001                 }
1002                 netxen_nic_disable_int(adapter);
1003                 /* Window = 0 or 1 */
1004                 do {
1005                         writel(0xffffffff, PCI_OFFSET_SECOND_RANGE(adapter,
1006                                                 ISR_INT_TARGET_STATUS));
1007                         mask = readl(pci_base_offset(adapter, ISR_INT_VECTOR));
1008                 } while (((mask & 0x80) != 0) && (++count < 32));
1009                 if ((mask & 0x80) != 0)
1010                         printk("Could not disable interrupt completely\n");
1011
1012         }
1013         adapter->stats.hostints++;
1014
1015         if (netxen_nic_rx_has_work(adapter) || netxen_nic_tx_has_work(adapter)) {
1016                 if (netif_rx_schedule_prep(netdev)) {
1017                         /*
1018                          * Interrupts are already disabled.
1019                          */
1020                         __netif_rx_schedule(netdev);
1021                 } else {
1022                         static unsigned int intcount = 0;
1023                         if ((++intcount & 0xfff) == 0xfff)
1024                                 printk(KERN_ERR
1025                                        "%s: %s interrupt %d while in poll\n",
1026                                        netxen_nic_driver_name, netdev->name,
1027                                        intcount);
1028                 }
1029                 ret = 1;
1030         }
1031
1032         if (ret == 0) {
1033                 netxen_nic_enable_int(adapter);
1034         }
1035
1036         return ret;
1037 }
1038
1039 /*
1040  * netxen_intr - Interrupt Handler
1041  * @irq: interrupt number
1042  * data points to adapter stucture (which may be handling more than 1 port
1043  */
1044 irqreturn_t netxen_intr(int irq, void *data)
1045 {
1046         struct netxen_adapter *adapter;
1047         struct netxen_port *port;
1048         struct net_device *netdev;
1049         int i;
1050
1051         if (unlikely(!irq)) {
1052                 return IRQ_NONE;        /* Not our interrupt */
1053         }
1054
1055         adapter = (struct netxen_adapter *)data;
1056         for (i = 0; i < adapter->ahw.max_ports; i++) {
1057                 port = adapter->port[i];
1058                 netdev = port->netdev;
1059
1060                 /* process our status queue (for all 4 ports) */
1061                 if (netif_running(netdev)) {
1062                         netxen_handle_int(adapter, netdev);
1063                         break;
1064                 }
1065         }
1066
1067         return IRQ_HANDLED;
1068 }
1069
1070 static int netxen_nic_poll(struct net_device *netdev, int *budget)
1071 {
1072         struct netxen_port *port = (struct netxen_port *)netdev_priv(netdev);
1073         struct netxen_adapter *adapter = port->adapter;
1074         int work_to_do = min(*budget, netdev->quota);
1075         int done = 1;
1076         int ctx;
1077         int this_work_done;
1078         int work_done = 0;
1079
1080         DPRINTK(INFO, "polling for %d descriptors\n", *budget);
1081         port->stats.polled++;
1082
1083         work_done = 0;
1084         for (ctx = 0; ctx < MAX_RCV_CTX; ++ctx) {
1085                 /*
1086                  * Fairness issue. This will give undue weight to the
1087                  * receive context 0.
1088                  */
1089
1090                 /*
1091                  * To avoid starvation, we give each of our receivers,
1092                  * a fraction of the quota. Sometimes, it might happen that we
1093                  * have enough quota to process every packet, but since all the
1094                  * packets are on one context, it gets only half of the quota,
1095                  * and ends up not processing it.
1096                  */
1097                 this_work_done = netxen_process_rcv_ring(adapter, ctx,
1098                                                          work_to_do /
1099                                                          MAX_RCV_CTX);
1100                 work_done += this_work_done;
1101         }
1102
1103         netdev->quota -= work_done;
1104         *budget -= work_done;
1105
1106         if (work_done >= work_to_do && netxen_nic_rx_has_work(adapter) != 0)
1107                 done = 0;
1108
1109         if (netxen_process_cmd_ring((unsigned long)adapter) == 0)
1110                 done = 0;
1111
1112         DPRINTK(INFO, "new work_done: %d work_to_do: %d\n",
1113                 work_done, work_to_do);
1114         if (done) {
1115                 netif_rx_complete(netdev);
1116                 netxen_nic_enable_int(adapter);
1117         }
1118
1119         return !done;
1120 }
1121
1122 #ifdef CONFIG_NET_POLL_CONTROLLER
1123 static void netxen_nic_poll_controller(struct net_device *netdev)
1124 {
1125         struct netxen_port *port = netdev_priv(netdev);
1126         struct netxen_adapter *adapter = port->adapter;
1127         disable_irq(adapter->irq);
1128         netxen_intr(adapter->irq, adapter);
1129         enable_irq(adapter->irq);
1130 }
1131 #endif
1132
1133 static struct pci_driver netxen_driver = {
1134         .name = netxen_nic_driver_name,
1135         .id_table = netxen_pci_tbl,
1136         .probe = netxen_nic_probe,
1137         .remove = __devexit_p(netxen_nic_remove)
1138 };
1139
1140 /* Driver Registration on NetXen card    */
1141
1142 static int __init netxen_init_module(void)
1143 {
1144         if ((netxen_workq = create_singlethread_workqueue("netxen")) == 0)
1145                 return -ENOMEM;
1146
1147         return pci_register_driver(&netxen_driver);
1148 }
1149
1150 module_init(netxen_init_module);
1151
1152 static void __exit netxen_exit_module(void)
1153 {
1154         /*
1155          * Wait for some time to allow the dma to drain, if any.
1156          */
1157         destroy_workqueue(netxen_workq);
1158         pci_unregister_driver(&netxen_driver);
1159 }
1160
1161 module_exit(netxen_exit_module);