drivers/net/s2io.c

   1 /************************************************************************
   2  * s2io.c: A Linux PCI-X Ethernet driver for Neterion 10GbE Server NIC
   3  * Copyright(c) 2002-2005 Neterion Inc.
   4
   5  * This software may be used and distributed according to the terms of
   6  * the GNU General Public License (GPL), incorporated herein by reference.
   7  * Drivers based on or derived from this code fall under the GPL and must
   8  * retain the authorship, copyright and license notice.  This file is not
   9  * a complete program and may only be used when the entire operating
  10  * system is licensed under the GPL.
  11  * See the file COPYING in this distribution for more information.
  12  *
  13  * Credits:
  14  * Jeff Garzik          : For pointing out the improper error condition
  15  *                        check in the s2io_xmit routine and also some
  16  *                        issues in the Tx watch dog function. Also for
  17  *                        patiently answering all those innumerable
  18  *                        questions regaring the 2.6 porting issues.
  19  * Stephen Hemminger    : Providing proper 2.6 porting mechanism for some
  20  *                        macros available only in 2.6 Kernel.
  21  * Francois Romieu      : For pointing out all code part that were
  22  *                        deprecated and also styling related comments.
  23  * Grant Grundler       : For helping me get rid of some Architecture
  24  *                        dependent code.
  25  * Christopher Hellwig  : Some more 2.6 specific issues in the driver.
  26  *
  27  * The module loadable parameters that are supported by the driver and a brief
  28  * explaination of all the variables.
  29  * rx_ring_num : This can be used to program the number of receive rings used
  30  * in the driver.
  31  * rx_ring_sz: This defines the number of descriptors each ring can have. This
  32  * is also an array of size 8.
  33  * rx_ring_mode: This defines the operation mode of all 8 rings. The valid
  34  *              values are 1, 2 and 3.
  35  * tx_fifo_num: This defines the number of Tx FIFOs thats used int the driver.
  36  * tx_fifo_len: This too is an array of 8. Each element defines the number of
  37  * Tx descriptors that can be associated with each corresponding FIFO.
  38  ************************************************************************/
  39
  40 #include <linux/config.h>
  41 #include <linux/module.h>
  42 #include <linux/types.h>
  43 #include <linux/errno.h>
  44 #include <linux/ioport.h>
  45 #include <linux/pci.h>
  46 #include <linux/dma-mapping.h>
  47 #include <linux/kernel.h>
  48 #include <linux/netdevice.h>
  49 #include <linux/etherdevice.h>
  50 #include <linux/skbuff.h>
  51 #include <linux/init.h>
  52 #include <linux/delay.h>
  53 #include <linux/stddef.h>
  54 #include <linux/ioctl.h>
  55 #include <linux/timex.h>
  56 #include <linux/sched.h>
  57 #include <linux/ethtool.h>
  58 #include <linux/workqueue.h>
  59 #include <linux/if_vlan.h>
  60
  61 #include <asm/system.h>
  62 #include <asm/uaccess.h>
  63 #include <asm/io.h>
  64
  65 /* local include */
  66 #include "s2io.h"
  67 #include "s2io-regs.h"
  68
  69 #define DRV_VERSION "Version 2.0.9.4"
  70
  71 /* S2io Driver name & version. */
  72 static char s2io_driver_name[] = "Neterion";
  73 static char s2io_driver_version[] = DRV_VERSION;
  74
  75 int rxd_size[4] = {32,48,48,64};
  76 int rxd_count[4] = {127,85,85,63};
  77
  78 static inline int RXD_IS_UP2DT(RxD_t *rxdp)
  79 {
  80         int ret;
  81
  82         ret = ((!(rxdp->Control_1 & RXD_OWN_XENA)) &&
  83                 (GET_RXD_MARKER(rxdp->Control_2) != THE_RXD_MARK));
  84
  85         return ret;
  86 }
  87
  88 /*
  89  * Cards with following subsystem_id have a link state indication
  90  * problem, 600B, 600C, 600D, 640B, 640C and 640D.
  91  * macro below identifies these cards given the subsystem_id.
  92  */
  93 #define CARDS_WITH_FAULTY_LINK_INDICATORS(dev_type, subid) \
  94         (dev_type == XFRAME_I_DEVICE) ?                 \
  95                 ((((subid >= 0x600B) && (subid <= 0x600D)) || \
  96                  ((subid >= 0x640B) && (subid <= 0x640D))) ? 1 : 0) : 0
  97
  98 #define LINK_IS_UP(val64) (!(val64 & (ADAPTER_STATUS_RMAC_REMOTE_FAULT | \
  99                                       ADAPTER_STATUS_RMAC_LOCAL_FAULT)))
 100 #define TASKLET_IN_USE test_and_set_bit(0, (&sp->tasklet_status))
 101 #define PANIC   1
 102 #define LOW     2
 103 static inline int rx_buffer_level(nic_t * sp, int rxb_size, int ring)
 104 {
 105         int level = 0;
 106         mac_info_t *mac_control;
 107
 108         mac_control = &sp->mac_control;
 109         if ((mac_control->rings[ring].pkt_cnt - rxb_size) > 16) {
 110                 level = LOW;
 111                 if (rxb_size <= rxd_count[sp->rxd_mode]) {
 112                         level = PANIC;
 113                 }
 114         }
 115
 116         return level;
 117 }
 118
 119 /* Ethtool related variables and Macros. */
 120 static char s2io_gstrings[][ETH_GSTRING_LEN] = {
 121         "Register test\t(offline)",
 122         "Eeprom test\t(offline)",
 123         "Link test\t(online)",
 124         "RLDRAM test\t(offline)",
 125         "BIST Test\t(offline)"
 126 };
 127
 128 static char ethtool_stats_keys[][ETH_GSTRING_LEN] = {
 129         {"tmac_frms"},
 130         {"tmac_data_octets"},
 131         {"tmac_drop_frms"},
 132         {"tmac_mcst_frms"},
 133         {"tmac_bcst_frms"},
 134         {"tmac_pause_ctrl_frms"},
 135         {"tmac_any_err_frms"},
 136         {"tmac_vld_ip_octets"},
 137         {"tmac_vld_ip"},
 138         {"tmac_drop_ip"},
 139         {"tmac_icmp"},
 140         {"tmac_rst_tcp"},
 141         {"tmac_tcp"},
 142         {"tmac_udp"},
 143         {"rmac_vld_frms"},
 144         {"rmac_data_octets"},
 145         {"rmac_fcs_err_frms"},
 146         {"rmac_drop_frms"},
 147         {"rmac_vld_mcst_frms"},
 148         {"rmac_vld_bcst_frms"},
 149         {"rmac_in_rng_len_err_frms"},
 150         {"rmac_long_frms"},
 151         {"rmac_pause_ctrl_frms"},
 152         {"rmac_discarded_frms"},
 153         {"rmac_usized_frms"},
 154         {"rmac_osized_frms"},
 155         {"rmac_frag_frms"},
 156         {"rmac_jabber_frms"},
 157         {"rmac_ip"},
 158         {"rmac_ip_octets"},
 159         {"rmac_hdr_err_ip"},
 160         {"rmac_drop_ip"},
 161         {"rmac_icmp"},
 162         {"rmac_tcp"},
 163         {"rmac_udp"},
 164         {"rmac_err_drp_udp"},
 165         {"rmac_pause_cnt"},
 166         {"rmac_accepted_ip"},
 167         {"rmac_err_tcp"},
 168         {"\n DRIVER STATISTICS"},
 169         {"single_bit_ecc_errs"},
 170         {"double_bit_ecc_errs"},
 171 };
 172
 173 #define S2IO_STAT_LEN sizeof(ethtool_stats_keys)/ ETH_GSTRING_LEN
 174 #define S2IO_STAT_STRINGS_LEN S2IO_STAT_LEN * ETH_GSTRING_LEN
 175
 176 #define S2IO_TEST_LEN   sizeof(s2io_gstrings) / ETH_GSTRING_LEN
 177 #define S2IO_STRINGS_LEN        S2IO_TEST_LEN * ETH_GSTRING_LEN
 178
 179 #define S2IO_TIMER_CONF(timer, handle, arg, exp)                \
 180                         init_timer(&timer);                     \
 181                         timer.function = handle;                \
 182                         timer.data = (unsigned long) arg;       \
 183                         mod_timer(&timer, (jiffies + exp))      \
 184
 185 /* Add the vlan */
 186 static void s2io_vlan_rx_register(struct net_device *dev,
 187                                         struct vlan_group *grp)
 188 {
 189         nic_t *nic = dev->priv;
 190         unsigned long flags;
 191
 192         spin_lock_irqsave(&nic->tx_lock, flags);
 193         nic->vlgrp = grp;
 194         spin_unlock_irqrestore(&nic->tx_lock, flags);
 195 }
 196
 197 /* Unregister the vlan */
 198 static void s2io_vlan_rx_kill_vid(struct net_device *dev, unsigned long vid)
 199 {
 200         nic_t *nic = dev->priv;
 201         unsigned long flags;
 202
 203         spin_lock_irqsave(&nic->tx_lock, flags);
 204         if (nic->vlgrp)
 205                 nic->vlgrp->vlan_devices[vid] = NULL;
 206         spin_unlock_irqrestore(&nic->tx_lock, flags);
 207 }
 208
 209 /*
 210  * Constants to be programmed into the Xena's registers, to configure
 211  * the XAUI.
 212  */
 213
 214 #define SWITCH_SIGN     0xA5A5A5A5A5A5A5A5ULL
 215 #define END_SIGN        0x0
 216
 217 static u64 herc_act_dtx_cfg[] = {
 218         /* Set address */
 219         0x8000051536750000ULL, 0x80000515367500E0ULL,
 220         /* Write data */
 221         0x8000051536750004ULL, 0x80000515367500E4ULL,
 222         /* Set address */
 223         0x80010515003F0000ULL, 0x80010515003F00E0ULL,
 224         /* Write data */
 225         0x80010515003F0004ULL, 0x80010515003F00E4ULL,
 226         /* Set address */
 227         0x801205150D440000ULL, 0x801205150D4400E0ULL,
 228         /* Write data */
 229         0x801205150D440004ULL, 0x801205150D4400E4ULL,
 230         /* Set address */
 231         0x80020515F2100000ULL, 0x80020515F21000E0ULL,
 232         /* Write data */
 233         0x80020515F2100004ULL, 0x80020515F21000E4ULL,
 234         /* Done */
 235         END_SIGN
 236 };
 237
 238 static u64 xena_mdio_cfg[] = {
 239         /* Reset PMA PLL */
 240         0xC001010000000000ULL, 0xC0010100000000E0ULL,
 241         0xC0010100008000E4ULL,
 242         /* Remove Reset from PMA PLL */
 243         0xC001010000000000ULL, 0xC0010100000000E0ULL,
 244         0xC0010100000000E4ULL,
 245         END_SIGN
 246 };
 247
 248 static u64 xena_dtx_cfg[] = {
 249         0x8000051500000000ULL, 0x80000515000000E0ULL,
 250         0x80000515D93500E4ULL, 0x8001051500000000ULL,
 251         0x80010515000000E0ULL, 0x80010515001E00E4ULL,
 252         0x8002051500000000ULL, 0x80020515000000E0ULL,
 253         0x80020515F21000E4ULL,
 254         /* Set PADLOOPBACKN */
 255         0x8002051500000000ULL, 0x80020515000000E0ULL,
 256         0x80020515B20000E4ULL, 0x8003051500000000ULL,
 257         0x80030515000000E0ULL, 0x80030515B20000E4ULL,
 258         0x8004051500000000ULL, 0x80040515000000E0ULL,
 259         0x80040515B20000E4ULL, 0x8005051500000000ULL,
 260         0x80050515000000E0ULL, 0x80050515B20000E4ULL,
 261         SWITCH_SIGN,
 262         /* Remove PADLOOPBACKN */
 263         0x8002051500000000ULL, 0x80020515000000E0ULL,
 264         0x80020515F20000E4ULL, 0x8003051500000000ULL,
 265         0x80030515000000E0ULL, 0x80030515F20000E4ULL,
 266         0x8004051500000000ULL, 0x80040515000000E0ULL,
 267         0x80040515F20000E4ULL, 0x8005051500000000ULL,
 268         0x80050515000000E0ULL, 0x80050515F20000E4ULL,
 269         END_SIGN
 270 };
 271
 272 /*
 273  * Constants for Fixing the MacAddress problem seen mostly on
 274  * Alpha machines.
 275  */
 276 static u64 fix_mac[] = {
 277         0x0060000000000000ULL, 0x0060600000000000ULL,
 278         0x0040600000000000ULL, 0x0000600000000000ULL,
 279         0x0020600000000000ULL, 0x0060600000000000ULL,
 280         0x0020600000000000ULL, 0x0060600000000000ULL,
 281         0x0020600000000000ULL, 0x0060600000000000ULL,
 282         0x0020600000000000ULL, 0x0060600000000000ULL,
 283         0x0020600000000000ULL, 0x0060600000000000ULL,
 284         0x0020600000000000ULL, 0x0060600000000000ULL,
 285         0x0020600000000000ULL, 0x0060600000000000ULL,
 286         0x0020600000000000ULL, 0x0060600000000000ULL,
 287         0x0020600000000000ULL, 0x0060600000000000ULL,
 288         0x0020600000000000ULL, 0x0060600000000000ULL,
 289         0x0020600000000000ULL, 0x0000600000000000ULL,
 290         0x0040600000000000ULL, 0x0060600000000000ULL,
 291         END_SIGN
 292 };
 293
 294 /* Module Loadable parameters. */
 295 static unsigned int tx_fifo_num = 1;
 296 static unsigned int tx_fifo_len[MAX_TX_FIFOS] =
 297     {[0 ...(MAX_TX_FIFOS - 1)] = 0 };
 298 static unsigned int rx_ring_num = 1;
 299 static unsigned int rx_ring_sz[MAX_RX_RINGS] =
 300     {[0 ...(MAX_RX_RINGS - 1)] = 0 };
 301 static unsigned int rts_frm_len[MAX_RX_RINGS] =
 302     {[0 ...(MAX_RX_RINGS - 1)] = 0 };
 303 static unsigned int rx_ring_mode = 1;
 304 static unsigned int use_continuous_tx_intrs = 1;
 305 static unsigned int rmac_pause_time = 65535;
 306 static unsigned int mc_pause_threshold_q0q3 = 187;
 307 static unsigned int mc_pause_threshold_q4q7 = 187;
 308 static unsigned int shared_splits;
 309 static unsigned int tmac_util_period = 5;
 310 static unsigned int rmac_util_period = 5;
 311 static unsigned int bimodal = 0;
 312 static unsigned int l3l4hdr_size = 128;
 313 #ifndef CONFIG_S2IO_NAPI
 314 static unsigned int indicate_max_pkts;
 315 #endif
 316 /* Frequency of Rx desc syncs expressed as power of 2 */
 317 static unsigned int rxsync_frequency = 3;
 318 /* Interrupt type. Values can be 0(INTA), 1(MSI), 2(MSI_X) */
 319 static unsigned int intr_type = 0;
 320
 321 /*
 322  * S2IO device table.
 323  * This table lists all the devices that this driver supports.
 324  */
 325 static struct pci_device_id s2io_tbl[] __devinitdata = {
 326         {PCI_VENDOR_ID_S2IO, PCI_DEVICE_ID_S2IO_WIN,
 327          PCI_ANY_ID, PCI_ANY_ID},
 328         {PCI_VENDOR_ID_S2IO, PCI_DEVICE_ID_S2IO_UNI,
 329          PCI_ANY_ID, PCI_ANY_ID},
 330         {PCI_VENDOR_ID_S2IO, PCI_DEVICE_ID_HERC_WIN,
 331          PCI_ANY_ID, PCI_ANY_ID},
 332         {PCI_VENDOR_ID_S2IO, PCI_DEVICE_ID_HERC_UNI,
 333          PCI_ANY_ID, PCI_ANY_ID},
 334         {0,}
 335 };
 336
 337 MODULE_DEVICE_TABLE(pci, s2io_tbl);
 338
 339 static struct pci_driver s2io_driver = {
 340       .name = "S2IO",
 341       .id_table = s2io_tbl,
 342       .probe = s2io_init_nic,
 343       .remove = __devexit_p(s2io_rem_nic),
 344 };
 345
 346 /* A simplifier macro used both by init and free shared_mem Fns(). */
 347 #define TXD_MEM_PAGE_CNT(len, per_each) ((len+per_each - 1) / per_each)
 348
 349 /**
 350  * init_shared_mem - Allocation and Initialization of Memory
 351  * @nic: Device private variable.
 352  * Description: The function allocates all the memory areas shared
 353  * between the NIC and the driver. This includes Tx descriptors,
 354  * Rx descriptors and the statistics block.
 355  */
 356
 357 static int init_shared_mem(struct s2io_nic *nic)
 358 {
 359         u32 size;
 360         void *tmp_v_addr, *tmp_v_addr_next;
 361         dma_addr_t tmp_p_addr, tmp_p_addr_next;
 362         RxD_block_t *pre_rxd_blk = NULL;
 363         int i, j, blk_cnt, rx_sz, tx_sz;
 364         int lst_size, lst_per_page;
 365         struct net_device *dev = nic->dev;
 366         unsigned long tmp;
 367         buffAdd_t *ba;
 368
 369         mac_info_t *mac_control;
 370         struct config_param *config;
 371
 372         mac_control = &nic->mac_control;
 373         config = &nic->config;
 374
 375
 376         /* Allocation and initialization of TXDLs in FIOFs */
 377         size = 0;
 378         for (i = 0; i < config->tx_fifo_num; i++) {
 379                 size += config->tx_cfg[i].fifo_len;
 380         }
 381         if (size > MAX_AVAILABLE_TXDS) {
 382                 DBG_PRINT(ERR_DBG, "%s: Requested TxDs too high, ",
 383                           __FUNCTION__);
 384                 DBG_PRINT(ERR_DBG, "Requested: %d, max supported: 8192\n", size);
 385                 return FAILURE;
 386         }
 387
 388         lst_size = (sizeof(TxD_t) * config->max_txds);
 389         tx_sz = lst_size * size;
 390         lst_per_page = PAGE_SIZE / lst_size;
 391
 392         for (i = 0; i < config->tx_fifo_num; i++) {
 393                 int fifo_len = config->tx_cfg[i].fifo_len;
 394                 int list_holder_size = fifo_len * sizeof(list_info_hold_t);
 395                 mac_control->fifos[i].list_info = kmalloc(list_holder_size,
 396                                                           GFP_KERNEL);
 397                 if (!mac_control->fifos[i].list_info) {
 398                         DBG_PRINT(ERR_DBG,
 399                                   "Malloc failed for list_info\n");
 400                         return -ENOMEM;
 401                 }
 402                 memset(mac_control->fifos[i].list_info, 0, list_holder_size);
 403         }
 404         for (i = 0; i < config->tx_fifo_num; i++) {
 405                 int page_num = TXD_MEM_PAGE_CNT(config->tx_cfg[i].fifo_len,
 406                                                 lst_per_page);
 407                 mac_control->fifos[i].tx_curr_put_info.offset = 0;
 408                 mac_control->fifos[i].tx_curr_put_info.fifo_len =
 409                     config->tx_cfg[i].fifo_len - 1;
 410                 mac_control->fifos[i].tx_curr_get_info.offset = 0;
 411                 mac_control->fifos[i].tx_curr_get_info.fifo_len =
 412                     config->tx_cfg[i].fifo_len - 1;
 413                 mac_control->fifos[i].fifo_no = i;
 414                 mac_control->fifos[i].nic = nic;
 415                 mac_control->fifos[i].max_txds = MAX_SKB_FRAGS + 2;
 416
 417                 for (j = 0; j < page_num; j++) {
 418                         int k = 0;
 419                         dma_addr_t tmp_p;
 420                         void *tmp_v;
 421                         tmp_v = pci_alloc_consistent(nic->pdev,
 422                                                      PAGE_SIZE, &tmp_p);
 423                         if (!tmp_v) {
 424                                 DBG_PRINT(ERR_DBG,
 425                                           "pci_alloc_consistent ");
 426                                 DBG_PRINT(ERR_DBG, "failed for TxDL\n");
 427                                 return -ENOMEM;
 428                         }
 429                         /* If we got a zero DMA address(can happen on
 430                          * certain platforms like PPC), reallocate.
 431                          * Store virtual address of page we don't want,
 432                          * to be freed later.
 433                          */
 434                         if (!tmp_p) {
 435                                 mac_control->zerodma_virt_addr = tmp_v;
 436                                 DBG_PRINT(INIT_DBG,
 437                                 "%s: Zero DMA address for TxDL. ", dev->name);
 438                                 DBG_PRINT(INIT_DBG,
 439                                 "Virtual address %p\n", tmp_v);
 440                                 tmp_v = pci_alloc_consistent(nic->pdev,
 441                                                      PAGE_SIZE, &tmp_p);
 442                                 if (!tmp_v) {
 443                                         DBG_PRINT(ERR_DBG,
 444                                           "pci_alloc_consistent ");
 445                                         DBG_PRINT(ERR_DBG, "failed for TxDL\n");
 446                                         return -ENOMEM;
 447                                 }
 448                         }
 449                         while (k < lst_per_page) {
 450                                 int l = (j * lst_per_page) + k;
 451                                 if (l == config->tx_cfg[i].fifo_len)
 452                                         break;
 453                                 mac_control->fifos[i].list_info[l].list_virt_addr =
 454                                     tmp_v + (k * lst_size);
 455                                 mac_control->fifos[i].list_info[l].list_phy_addr =
 456                                     tmp_p + (k * lst_size);
 457                                 k++;
 458                         }
 459                 }
 460         }
 461
 462         nic->ufo_in_band_v = kmalloc((sizeof(u64) * size), GFP_KERNEL);
 463         if (!nic->ufo_in_band_v)
 464                 return -ENOMEM;
 465
 466         /* Allocation and initialization of RXDs in Rings */
 467         size = 0;
 468         for (i = 0; i < config->rx_ring_num; i++) {
 469                 if (config->rx_cfg[i].num_rxd %
 470                     (rxd_count[nic->rxd_mode] + 1)) {
 471                         DBG_PRINT(ERR_DBG, "%s: RxD count of ", dev->name);
 472                         DBG_PRINT(ERR_DBG, "Ring%d is not a multiple of ",
 473                                   i);
 474                         DBG_PRINT(ERR_DBG, "RxDs per Block");
 475                         return FAILURE;
 476                 }
 477                 size += config->rx_cfg[i].num_rxd;
 478                 mac_control->rings[i].block_count =
 479                         config->rx_cfg[i].num_rxd /
 480                         (rxd_count[nic->rxd_mode] + 1 );
 481                 mac_control->rings[i].pkt_cnt = config->rx_cfg[i].num_rxd -
 482                         mac_control->rings[i].block_count;
 483         }
 484         if (nic->rxd_mode == RXD_MODE_1)
 485                 size = (size * (sizeof(RxD1_t)));
 486         else
 487                 size = (size * (sizeof(RxD3_t)));
 488         rx_sz = size;
 489
 490         for (i = 0; i < config->rx_ring_num; i++) {
 491                 mac_control->rings[i].rx_curr_get_info.block_index = 0;
 492                 mac_control->rings[i].rx_curr_get_info.offset = 0;
 493                 mac_control->rings[i].rx_curr_get_info.ring_len =
 494                     config->rx_cfg[i].num_rxd - 1;
 495                 mac_control->rings[i].rx_curr_put_info.block_index = 0;
 496                 mac_control->rings[i].rx_curr_put_info.offset = 0;
 497                 mac_control->rings[i].rx_curr_put_info.ring_len =
 498                     config->rx_cfg[i].num_rxd - 1;
 499                 mac_control->rings[i].nic = nic;
 500                 mac_control->rings[i].ring_no = i;
 501
 502                 blk_cnt = config->rx_cfg[i].num_rxd /
 503                                 (rxd_count[nic->rxd_mode] + 1);
 504                 /*  Allocating all the Rx blocks */
 505                 for (j = 0; j < blk_cnt; j++) {
 506                         rx_block_info_t *rx_blocks;
 507                         int l;
 508
 509                         rx_blocks = &mac_control->rings[i].rx_blocks[j];
 510                         size = SIZE_OF_BLOCK; //size is always page size
 511                         tmp_v_addr = pci_alloc_consistent(nic->pdev, size,
 512                                                           &tmp_p_addr);
 513                         if (tmp_v_addr == NULL) {
 514                                 /*
 515                                  * In case of failure, free_shared_mem()
 516                                  * is called, which should free any
 517                                  * memory that was alloced till the
 518                                  * failure happened.
 519                                  */
 520                                 rx_blocks->block_virt_addr = tmp_v_addr;
 521                                 return -ENOMEM;
 522                         }
 523                         memset(tmp_v_addr, 0, size);
 524                         rx_blocks->block_virt_addr = tmp_v_addr;
 525                         rx_blocks->block_dma_addr = tmp_p_addr;
 526                         rx_blocks->rxds = kmalloc(sizeof(rxd_info_t)*
 527                                                   rxd_count[nic->rxd_mode],
 528                                                   GFP_KERNEL);
 529                         for (l=0; l<rxd_count[nic->rxd_mode];l++) {
 530                                 rx_blocks->rxds[l].virt_addr =
 531                                         rx_blocks->block_virt_addr +
 532                                         (rxd_size[nic->rxd_mode] * l);
 533                                 rx_blocks->rxds[l].dma_addr =
 534                                         rx_blocks->block_dma_addr +
 535                                         (rxd_size[nic->rxd_mode] * l);
 536                         }
 537
 538                         mac_control->rings[i].rx_blocks[j].block_virt_addr =
 539                                 tmp_v_addr;
 540                         mac_control->rings[i].rx_blocks[j].block_dma_addr =
 541                                 tmp_p_addr;
 542                 }
 543                 /* Interlinking all Rx Blocks */
 544                 for (j = 0; j < blk_cnt; j++) {
 545                         tmp_v_addr =
 546                                 mac_control->rings[i].rx_blocks[j].block_virt_addr;
 547                         tmp_v_addr_next =
 548                                 mac_control->rings[i].rx_blocks[(j + 1) %
 549                                               blk_cnt].block_virt_addr;
 550                         tmp_p_addr =
 551                                 mac_control->rings[i].rx_blocks[j].block_dma_addr;
 552                         tmp_p_addr_next =
 553                                 mac_control->rings[i].rx_blocks[(j + 1) %
 554                                               blk_cnt].block_dma_addr;
 555
 556                         pre_rxd_blk = (RxD_block_t *) tmp_v_addr;
 557                         pre_rxd_blk->reserved_2_pNext_RxD_block =
 558                             (unsigned long) tmp_v_addr_next;
 559                         pre_rxd_blk->pNext_RxD_Blk_physical =
 560                             (u64) tmp_p_addr_next;
 561                 }
 562         }
 563         if (nic->rxd_mode >= RXD_MODE_3A) {
 564                 /*
 565                  * Allocation of Storages for buffer addresses in 2BUFF mode
 566                  * and the buffers as well.
 567                  */
 568                 for (i = 0; i < config->rx_ring_num; i++) {
 569                         blk_cnt = config->rx_cfg[i].num_rxd /
 570                            (rxd_count[nic->rxd_mode]+ 1);
 571                         mac_control->rings[i].ba =
 572                                 kmalloc((sizeof(buffAdd_t *) * blk_cnt),
 573                                      GFP_KERNEL);
 574                         if (!mac_control->rings[i].ba)
 575                                 return -ENOMEM;
 576                         for (j = 0; j < blk_cnt; j++) {
 577                                 int k = 0;
 578                                 mac_control->rings[i].ba[j] =
 579                                         kmalloc((sizeof(buffAdd_t) *
 580                                                 (rxd_count[nic->rxd_mode] + 1)),
 581                                                 GFP_KERNEL);
 582                                 if (!mac_control->rings[i].ba[j])
 583                                         return -ENOMEM;
 584                                 while (k != rxd_count[nic->rxd_mode]) {
 585                                         ba = &mac_control->rings[i].ba[j][k];
 586
 587                                         ba->ba_0_org = (void *) kmalloc
 588                                             (BUF0_LEN + ALIGN_SIZE, GFP_KERNEL);
 589                                         if (!ba->ba_0_org)
 590                                                 return -ENOMEM;
 591                                         tmp = (unsigned long)ba->ba_0_org;
 592                                         tmp += ALIGN_SIZE;
 593                                         tmp &= ~((unsigned long) ALIGN_SIZE);
 594                                         ba->ba_0 = (void *) tmp;
 595
 596                                         ba->ba_1_org = (void *) kmalloc
 597                                             (BUF1_LEN + ALIGN_SIZE, GFP_KERNEL);
 598                                         if (!ba->ba_1_org)
 599                                                 return -ENOMEM;
 600                                         tmp = (unsigned long) ba->ba_1_org;
 601                                         tmp += ALIGN_SIZE;
 602                                         tmp &= ~((unsigned long) ALIGN_SIZE);
 603                                         ba->ba_1 = (void *) tmp;
 604                                         k++;
 605                                 }
 606                         }
 607                 }
 608         }
 609
 610         /* Allocation and initialization of Statistics block */
 611         size = sizeof(StatInfo_t);
 612         mac_control->stats_mem = pci_alloc_consistent
 613             (nic->pdev, size, &mac_control->stats_mem_phy);
 614
 615         if (!mac_control->stats_mem) {
 616                 /*
 617                  * In case of failure, free_shared_mem() is called, which
 618                  * should free any memory that was alloced till the
 619                  * failure happened.
 620                  */
 621                 return -ENOMEM;
 622         }
 623         mac_control->stats_mem_sz = size;
 624
 625         tmp_v_addr = mac_control->stats_mem;
 626         mac_control->stats_info = (StatInfo_t *) tmp_v_addr;
 627         memset(tmp_v_addr, 0, size);
 628         DBG_PRINT(INIT_DBG, "%s:Ring Mem PHY: 0x%llx\n", dev->name,
 629                   (unsigned long long) tmp_p_addr);
 630
 631         return SUCCESS;
 632 }
 633
 634 /**
 635  * free_shared_mem - Free the allocated Memory
 636  * @nic:  Device private variable.
 637  * Description: This function is to free all memory locations allocated by
 638  * the init_shared_mem() function and return it to the kernel.
 639  */
 640
 641 static void free_shared_mem(struct s2io_nic *nic)
 642 {
 643         int i, j, blk_cnt, size;
 644         void *tmp_v_addr;
 645         dma_addr_t tmp_p_addr;
 646         mac_info_t *mac_control;
 647         struct config_param *config;
 648         int lst_size, lst_per_page;
 649         struct net_device *dev = nic->dev;
 650
 651         if (!nic)
 652                 return;
 653
 654         mac_control = &nic->mac_control;
 655         config = &nic->config;
 656
 657         lst_size = (sizeof(TxD_t) * config->max_txds);
 658         lst_per_page = PAGE_SIZE / lst_size;
 659
 660         for (i = 0; i < config->tx_fifo_num; i++) {
 661                 int page_num = TXD_MEM_PAGE_CNT(config->tx_cfg[i].fifo_len,
 662                                                 lst_per_page);
 663                 for (j = 0; j < page_num; j++) {
 664                         int mem_blks = (j * lst_per_page);
 665                         if (!mac_control->fifos[i].list_info)
 666                                 return;
 667                         if (!mac_control->fifos[i].list_info[mem_blks].
 668                                  list_virt_addr)
 669                                 break;
 670                         pci_free_consistent(nic->pdev, PAGE_SIZE,
 671                                             mac_control->fifos[i].
 672                                             list_info[mem_blks].
 673                                             list_virt_addr,
 674                                             mac_control->fifos[i].
 675                                             list_info[mem_blks].
 676                                             list_phy_addr);
 677                 }
 678                 /* If we got a zero DMA address during allocation,
 679                  * free the page now
 680                  */
 681                 if (mac_control->zerodma_virt_addr) {
 682                         pci_free_consistent(nic->pdev, PAGE_SIZE,
 683                                             mac_control->zerodma_virt_addr,
 684                                             (dma_addr_t)0);
 685                         DBG_PRINT(INIT_DBG,
 686                                 "%s: Freeing TxDL with zero DMA addr. ",
 687                                 dev->name);
 688                         DBG_PRINT(INIT_DBG, "Virtual address %p\n",
 689                                 mac_control->zerodma_virt_addr);
 690                 }
 691                 kfree(mac_control->fifos[i].list_info);
 692         }
 693
 694         size = SIZE_OF_BLOCK;
 695         for (i = 0; i < config->rx_ring_num; i++) {
 696                 blk_cnt = mac_control->rings[i].block_count;
 697                 for (j = 0; j < blk_cnt; j++) {
 698                         tmp_v_addr = mac_control->rings[i].rx_blocks[j].
 699                                 block_virt_addr;
 700                         tmp_p_addr = mac_control->rings[i].rx_blocks[j].
 701                                 block_dma_addr;
 702                         if (tmp_v_addr == NULL)
 703                                 break;
 704                         pci_free_consistent(nic->pdev, size,
 705                                             tmp_v_addr, tmp_p_addr);
 706                         kfree(mac_control->rings[i].rx_blocks[j].rxds);
 707                 }
 708         }
 709
 710         if (nic->rxd_mode >= RXD_MODE_3A) {
 711                 /* Freeing buffer storage addresses in 2BUFF mode. */
 712                 for (i = 0; i < config->rx_ring_num; i++) {
 713                         blk_cnt = config->rx_cfg[i].num_rxd /
 714                             (rxd_count[nic->rxd_mode] + 1);
 715                         for (j = 0; j < blk_cnt; j++) {
 716                                 int k = 0;
 717                                 if (!mac_control->rings[i].ba[j])
 718                                         continue;
 719                                 while (k != rxd_count[nic->rxd_mode]) {
 720                                         buffAdd_t *ba =
 721                                                 &mac_control->rings[i].ba[j][k];
 722                                         kfree(ba->ba_0_org);
 723                                         kfree(ba->ba_1_org);
 724                                         k++;
 725                                 }
 726                                 kfree(mac_control->rings[i].ba[j]);
 727                         }
 728                         kfree(mac_control->rings[i].ba);
 729                 }
 730         }
 731
 732         if (mac_control->stats_mem) {
 733                 pci_free_consistent(nic->pdev,
 734                                     mac_control->stats_mem_sz,
 735                                     mac_control->stats_mem,
 736                                     mac_control->stats_mem_phy);
 737         }
 738         if (nic->ufo_in_band_v)
 739                 kfree(nic->ufo_in_band_v);
 740 }
 741
 742 /**
 743  * s2io_verify_pci_mode -
 744  */
 745
 746 static int s2io_verify_pci_mode(nic_t *nic)
 747 {
 748         XENA_dev_config_t __iomem *bar0 = nic->bar0;
 749         register u64 val64 = 0;
 750         int     mode;
 751
 752         val64 = readq(&bar0->pci_mode);
 753         mode = (u8)GET_PCI_MODE(val64);
 754
 755         if ( val64 & PCI_MODE_UNKNOWN_MODE)
 756                 return -1;      /* Unknown PCI mode */
 757         return mode;
 758 }
 759
 760
 761 /**
 762  * s2io_print_pci_mode -
 763  */
 764 static int s2io_print_pci_mode(nic_t *nic)
 765 {
 766         XENA_dev_config_t __iomem *bar0 = nic->bar0;
 767         register u64 val64 = 0;
 768         int     mode;
 769         struct config_param *config = &nic->config;
 770
 771         val64 = readq(&bar0->pci_mode);
 772         mode = (u8)GET_PCI_MODE(val64);
 773
 774         if ( val64 & PCI_MODE_UNKNOWN_MODE)
 775                 return -1;      /* Unknown PCI mode */
 776
 777         if (val64 & PCI_MODE_32_BITS) {
 778                 DBG_PRINT(ERR_DBG, "%s: Device is on 32 bit ", nic->dev->name);
 779         } else {
 780                 DBG_PRINT(ERR_DBG, "%s: Device is on 64 bit ", nic->dev->name);
 781         }
 782
 783         switch(mode) {
 784                 case PCI_MODE_PCI_33:
 785                         DBG_PRINT(ERR_DBG, "33MHz PCI bus\n");
 786                         config->bus_speed = 33;
 787                         break;
 788                 case PCI_MODE_PCI_66:
 789                         DBG_PRINT(ERR_DBG, "66MHz PCI bus\n");
 790                         config->bus_speed = 133;
 791                         break;
 792                 case PCI_MODE_PCIX_M1_66:
 793                         DBG_PRINT(ERR_DBG, "66MHz PCIX(M1) bus\n");
 794                         config->bus_speed = 133; /* Herc doubles the clock rate */
 795                         break;
 796                 case PCI_MODE_PCIX_M1_100:
 797                         DBG_PRINT(ERR_DBG, "100MHz PCIX(M1) bus\n");
 798                         config->bus_speed = 200;
 799                         break;
 800                 case PCI_MODE_PCIX_M1_133:
 801                         DBG_PRINT(ERR_DBG, "133MHz PCIX(M1) bus\n");
 802                         config->bus_speed = 266;
 803                         break;
 804                 case PCI_MODE_PCIX_M2_66:
 805                         DBG_PRINT(ERR_DBG, "133MHz PCIX(M2) bus\n");
 806                         config->bus_speed = 133;
 807                         break;
 808                 case PCI_MODE_PCIX_M2_100:
 809                         DBG_PRINT(ERR_DBG, "200MHz PCIX(M2) bus\n");
 810                         config->bus_speed = 200;
 811                         break;
 812                 case PCI_MODE_PCIX_M2_133:
 813                         DBG_PRINT(ERR_DBG, "266MHz PCIX(M2) bus\n");
 814                         config->bus_speed = 266;
 815                         break;
 816                 default:
 817                         return -1;      /* Unsupported bus speed */
 818         }
 819
 820         return mode;
 821 }
 822
 823 /**
 824  *  init_nic - Initialization of hardware
 825  *  @nic: device peivate variable
 826  *  Description: The function sequentially configures every block
 827  *  of the H/W from their reset values.
 828  *  Return Value:  SUCCESS on success and
 829  *  '-1' on failure (endian settings incorrect).
 830  */
 831
 832 static int init_nic(struct s2io_nic *nic)
 833 {
 834         XENA_dev_config_t __iomem *bar0 = nic->bar0;
 835         struct net_device *dev = nic->dev;
 836         register u64 val64 = 0;
 837         void __iomem *add;
 838         u32 time;
 839         int i, j;
 840         mac_info_t *mac_control;
 841         struct config_param *config;
 842         int mdio_cnt = 0, dtx_cnt = 0;
 843         unsigned long long mem_share;
 844         int mem_size;
 845
 846         mac_control = &nic->mac_control;
 847         config = &nic->config;
 848
 849         /* to set the swapper controle on the card */
 850         if(s2io_set_swapper(nic)) {
 851                 DBG_PRINT(ERR_DBG,"ERROR: Setting Swapper failed\n");
 852                 return -1;
 853         }
 854
 855         /*
 856          * Herc requires EOI to be removed from reset before XGXS, so..
 857          */
 858         if (nic->device_type & XFRAME_II_DEVICE) {
 859                 val64 = 0xA500000000ULL;
 860                 writeq(val64, &bar0->sw_reset);
 861                 msleep(500);
 862                 val64 = readq(&bar0->sw_reset);
 863         }
 864
 865         /* Remove XGXS from reset state */
 866         val64 = 0;
 867         writeq(val64, &bar0->sw_reset);
 868         msleep(500);
 869         val64 = readq(&bar0->sw_reset);
 870
 871         /*  Enable Receiving broadcasts */
 872         add = &bar0->mac_cfg;
 873         val64 = readq(&bar0->mac_cfg);
 874         val64 |= MAC_RMAC_BCAST_ENABLE;
 875         writeq(RMAC_CFG_KEY(0x4C0D), &bar0->rmac_cfg_key);
 876         writel((u32) val64, add);
 877         writeq(RMAC_CFG_KEY(0x4C0D), &bar0->rmac_cfg_key);
 878         writel((u32) (val64 >> 32), (add + 4));
 879
 880         /* Read registers in all blocks */
 881         val64 = readq(&bar0->mac_int_mask);
 882         val64 = readq(&bar0->mc_int_mask);
 883         val64 = readq(&bar0->xgxs_int_mask);
 884
 885         /*  Set MTU */
 886         val64 = dev->mtu;
 887         writeq(vBIT(val64, 2, 14), &bar0->rmac_max_pyld_len);
 888
 889         /*
 890          * Configuring the XAUI Interface of Xena.
 891          * ***************************************
 892          * To Configure the Xena's XAUI, one has to write a series
 893          * of 64 bit values into two registers in a particular
 894          * sequence. Hence a macro 'SWITCH_SIGN' has been defined
 895          * which will be defined in the array of configuration values
 896          * (xena_dtx_cfg & xena_mdio_cfg) at appropriate places
 897          * to switch writing from one regsiter to another. We continue
 898          * writing these values until we encounter the 'END_SIGN' macro.
 899          * For example, After making a series of 21 writes into
 900          * dtx_control register the 'SWITCH_SIGN' appears and hence we
 901          * start writing into mdio_control until we encounter END_SIGN.
 902          */
 903         if (nic->device_type & XFRAME_II_DEVICE) {
 904                 while (herc_act_dtx_cfg[dtx_cnt] != END_SIGN) {
 905                         SPECIAL_REG_WRITE(herc_act_dtx_cfg[dtx_cnt],
 906                                           &bar0->dtx_control, UF);
 907                         if (dtx_cnt & 0x1)
 908                                 msleep(1); /* Necessary!! */
 909                         dtx_cnt++;
 910                 }
 911         } else {
 912                 while (1) {
 913                       dtx_cfg:
 914                         while (xena_dtx_cfg[dtx_cnt] != END_SIGN) {
 915                                 if (xena_dtx_cfg[dtx_cnt] == SWITCH_SIGN) {
 916                                         dtx_cnt++;
 917                                         goto mdio_cfg;
 918                                 }
 919                                 SPECIAL_REG_WRITE(xena_dtx_cfg[dtx_cnt],
 920                                                   &bar0->dtx_control, UF);
 921                                 val64 = readq(&bar0->dtx_control);
 922                                 dtx_cnt++;
 923                         }
 924                       mdio_cfg:
 925                         while (xena_mdio_cfg[mdio_cnt] != END_SIGN) {
 926                                 if (xena_mdio_cfg[mdio_cnt] == SWITCH_SIGN) {
 927                                         mdio_cnt++;
 928                                         goto dtx_cfg;
 929                                 }
 930                                 SPECIAL_REG_WRITE(xena_mdio_cfg[mdio_cnt],
 931                                                   &bar0->mdio_control, UF);
 932                                 val64 = readq(&bar0->mdio_control);
 933                                 mdio_cnt++;
 934                         }
 935                         if ((xena_dtx_cfg[dtx_cnt] == END_SIGN) &&
 936                             (xena_mdio_cfg[mdio_cnt] == END_SIGN)) {
 937                                 break;
 938                         } else {
 939                                 goto dtx_cfg;
 940                         }
 941                 }
 942         }
 943
 944         /*  Tx DMA Initialization */
 945         val64 = 0;
 946         writeq(val64, &bar0->tx_fifo_partition_0);
 947         writeq(val64, &bar0->tx_fifo_partition_1);
 948         writeq(val64, &bar0->tx_fifo_partition_2);
 949         writeq(val64, &bar0->tx_fifo_partition_3);
 950
 951
 952         for (i = 0, j = 0; i < config->tx_fifo_num; i++) {
 953                 val64 |=
 954                     vBIT(config->tx_cfg[i].fifo_len - 1, ((i * 32) + 19),
 955                          13) | vBIT(config->tx_cfg[i].fifo_priority,
 956                                     ((i * 32) + 5), 3);
 957
 958                 if (i == (config->tx_fifo_num - 1)) {
 959                         if (i % 2 == 0)
 960                                 i++;
 961                 }
 962
 963                 switch (i) {
 964                 case 1:
 965                         writeq(val64, &bar0->tx_fifo_partition_0);
 966                         val64 = 0;
 967                         break;
 968                 case 3:
 969                         writeq(val64, &bar0->tx_fifo_partition_1);
 970                         val64 = 0;
 971                         break;
 972                 case 5:
 973                         writeq(val64, &bar0->tx_fifo_partition_2);
 974                         val64 = 0;
 975                         break;
 976                 case 7:
 977                         writeq(val64, &bar0->tx_fifo_partition_3);
 978                         break;
 979                 }
 980         }
 981
 982         /* Enable Tx FIFO partition 0. */
 983         val64 = readq(&bar0->tx_fifo_partition_0);
 984         val64 |= BIT(0);        /* To enable the FIFO partition. */
 985         writeq(val64, &bar0->tx_fifo_partition_0);
 986
 987         /*
 988          * Disable 4 PCCs for Xena1, 2 and 3 as per H/W bug
 989          * SXE-008 TRANSMIT DMA ARBITRATION ISSUE.
 990          */
 991         if ((nic->device_type == XFRAME_I_DEVICE) &&
 992                 (get_xena_rev_id(nic->pdev) < 4))
 993                 writeq(PCC_ENABLE_FOUR, &bar0->pcc_enable);
 994
 995         val64 = readq(&bar0->tx_fifo_partition_0);
 996         DBG_PRINT(INIT_DBG, "Fifo partition at: 0x%p is: 0x%llx\n",
 997                   &bar0->tx_fifo_partition_0, (unsigned long long) val64);
 998
 999         /*
1000          * Initialization of Tx_PA_CONFIG register to ignore packet
1001          * integrity checking.
1002          */
1003         val64 = readq(&bar0->tx_pa_cfg);
1004         val64 |= TX_PA_CFG_IGNORE_FRM_ERR | TX_PA_CFG_IGNORE_SNAP_OUI |
1005             TX_PA_CFG_IGNORE_LLC_CTRL | TX_PA_CFG_IGNORE_L2_ERR;
1006         writeq(val64, &bar0->tx_pa_cfg);
1007
1008         /* Rx DMA intialization. */
1009         val64 = 0;
1010         for (i = 0; i < config->rx_ring_num; i++) {
1011                 val64 |=
1012                     vBIT(config->rx_cfg[i].ring_priority, (5 + (i * 8)),
1013                          3);
1014         }
1015         writeq(val64, &bar0->rx_queue_priority);
1016
1017         /*
1018          * Allocating equal share of memory to all the
1019          * configured Rings.
1020          */
1021         val64 = 0;
1022         if (nic->device_type & XFRAME_II_DEVICE)
1023                 mem_size = 32;
1024         else
1025                 mem_size = 64;
1026
1027         for (i = 0; i < config->rx_ring_num; i++) {
1028                 switch (i) {
1029                 case 0:
1030                         mem_share = (mem_size / config->rx_ring_num +
1031                                      mem_size % config->rx_ring_num);
1032                         val64 |= RX_QUEUE_CFG_Q0_SZ(mem_share);
1033                         continue;
1034                 case 1:
1035                         mem_share = (mem_size / config->rx_ring_num);
1036                         val64 |= RX_QUEUE_CFG_Q1_SZ(mem_share);
1037                         continue;
1038                 case 2:
1039                         mem_share = (mem_size / config->rx_ring_num);
1040                         val64 |= RX_QUEUE_CFG_Q2_SZ(mem_share);
1041                         continue;
1042                 case 3:
1043                         mem_share = (mem_size / config->rx_ring_num);
1044                         val64 |= RX_QUEUE_CFG_Q3_SZ(mem_share);
1045                         continue;
1046                 case 4:
1047                         mem_share = (mem_size / config->rx_ring_num);
1048                         val64 |= RX_QUEUE_CFG_Q4_SZ(mem_share);
1049                         continue;
1050                 case 5:
1051                         mem_share = (mem_size / config->rx_ring_num);
1052                         val64 |= RX_QUEUE_CFG_Q5_SZ(mem_share);
1053                         continue;
1054                 case 6:
1055                         mem_share = (mem_size / config->rx_ring_num);
1056                         val64 |= RX_QUEUE_CFG_Q6_SZ(mem_share);
1057                         continue;
1058                 case 7:
1059                         mem_share = (mem_size / config->rx_ring_num);
1060                         val64 |= RX_QUEUE_CFG_Q7_SZ(mem_share);
1061                         continue;
1062                 }
1063         }
1064         writeq(val64, &bar0->rx_queue_cfg);
1065
1066         /*
1067          * Filling Tx round robin registers
1068          * as per the number of FIFOs
1069          */
1070         switch (config->tx_fifo_num) {
1071         case 1:
1072                 val64 = 0x0000000000000000ULL;
1073                 writeq(val64, &bar0->tx_w_round_robin_0);
1074                 writeq(val64, &bar0->tx_w_round_robin_1);
1075                 writeq(val64, &bar0->tx_w_round_robin_2);
1076                 writeq(val64, &bar0->tx_w_round_robin_3);
1077                 writeq(val64, &bar0->tx_w_round_robin_4);
1078                 break;
1079         case 2:
1080                 val64 = 0x0000010000010000ULL;
1081                 writeq(val64, &bar0->tx_w_round_robin_0);
1082                 val64 = 0x0100000100000100ULL;
1083                 writeq(val64, &bar0->tx_w_round_robin_1);
1084                 val64 = 0x0001000001000001ULL;
1085                 writeq(val64, &bar0->tx_w_round_robin_2);
1086                 val64 = 0x0000010000010000ULL;
1087                 writeq(val64, &bar0->tx_w_round_robin_3);
1088                 val64 = 0x0100000000000000ULL;
1089                 writeq(val64, &bar0->tx_w_round_robin_4);
1090                 break;
1091         case 3:
1092                 val64 = 0x0001000102000001ULL;
1093                 writeq(val64, &bar0->tx_w_round_robin_0);
1094                 val64 = 0x0001020000010001ULL;
1095                 writeq(val64, &bar0->tx_w_round_robin_1);
1096                 val64 = 0x0200000100010200ULL;
1097                 writeq(val64, &bar0->tx_w_round_robin_2);
1098                 val64 = 0x0001000102000001ULL;
1099                 writeq(val64, &bar0->tx_w_round_robin_3);
1100                 val64 = 0x0001020000000000ULL;
1101                 writeq(val64, &bar0->tx_w_round_robin_4);
1102                 break;
1103         case 4:
1104                 val64 = 0x0001020300010200ULL;
1105                 writeq(val64, &bar0->tx_w_round_robin_0);
1106                 val64 = 0x0100000102030001ULL;
1107                 writeq(val64, &bar0->tx_w_round_robin_1);
1108                 val64 = 0x0200010000010203ULL;
1109                 writeq(val64, &bar0->tx_w_round_robin_2);
1110                 val64 = 0x0001020001000001ULL;
1111                 writeq(val64, &bar0->tx_w_round_robin_3);
1112                 val64 = 0x0203000100000000ULL;
1113                 writeq(val64, &bar0->tx_w_round_robin_4);
1114                 break;
1115         case 5:
1116                 val64 = 0x0001000203000102ULL;
1117                 writeq(val64, &bar0->tx_w_round_robin_0);
1118                 val64 = 0x0001020001030004ULL;
1119                 writeq(val64, &bar0->tx_w_round_robin_1);
1120                 val64 = 0x0001000203000102ULL;
1121                 writeq(val64, &bar0->tx_w_round_robin_2);
1122                 val64 = 0x0001020001030004ULL;
1123                 writeq(val64, &bar0->tx_w_round_robin_3);
1124                 val64 = 0x0001000000000000ULL;
1125                 writeq(val64, &bar0->tx_w_round_robin_4);
1126                 break;
1127         case 6:
1128                 val64 = 0x0001020304000102ULL;
1129                 writeq(val64, &bar0->tx_w_round_robin_0);
1130                 val64 = 0x0304050001020001ULL;
1131                 writeq(val64, &bar0->tx_w_round_robin_1);
1132                 val64 = 0x0203000100000102ULL;
1133                 writeq(val64, &bar0->tx_w_round_robin_2);
1134                 val64 = 0x0304000102030405ULL;
1135                 writeq(val64, &bar0->tx_w_round_robin_3);
1136                 val64 = 0x0001000200000000ULL;
1137                 writeq(val64, &bar0->tx_w_round_robin_4);
1138                 break;
1139         case 7:
1140                 val64 = 0x0001020001020300ULL;
1141                 writeq(val64, &bar0->tx_w_round_robin_0);
1142                 val64 = 0x0102030400010203ULL;
1143                 writeq(val64, &bar0->tx_w_round_robin_1);
1144                 val64 = 0x0405060001020001ULL;
1145                 writeq(val64, &bar0->tx_w_round_robin_2);
1146                 val64 = 0x0304050000010200ULL;
1147                 writeq(val64, &bar0->tx_w_round_robin_3);
1148                 val64 = 0x0102030000000000ULL;
1149                 writeq(val64, &bar0->tx_w_round_robin_4);
1150                 break;
1151         case 8:
1152                 val64 = 0x0001020300040105ULL;
1153                 writeq(val64, &bar0->tx_w_round_robin_0);
1154                 val64 = 0x0200030106000204ULL;
1155                 writeq(val64, &bar0->tx_w_round_robin_1);
1156                 val64 = 0x0103000502010007ULL;
1157                 writeq(val64, &bar0->tx_w_round_robin_2);
1158                 val64 = 0x0304010002060500ULL;
1159                 writeq(val64, &bar0->tx_w_round_robin_3);
1160                 val64 = 0x0103020400000000ULL;
1161                 writeq(val64, &bar0->tx_w_round_robin_4);
1162                 break;
1163         }
1164
1165         /* Filling the Rx round robin registers as per the
1166          * number of Rings and steering based on QoS.
1167          */
1168         switch (config->rx_ring_num) {
1169         case 1:
1170                 val64 = 0x8080808080808080ULL;
1171                 writeq(val64, &bar0->rts_qos_steering);
1172                 break;
1173         case 2:
1174                 val64 = 0x0000010000010000ULL;
1175                 writeq(val64, &bar0->rx_w_round_robin_0);
1176                 val64 = 0x0100000100000100ULL;
1177                 writeq(val64, &bar0->rx_w_round_robin_1);
1178                 val64 = 0x0001000001000001ULL;
1179                 writeq(val64, &bar0->rx_w_round_robin_2);
1180                 val64 = 0x0000010000010000ULL;
1181                 writeq(val64, &bar0->rx_w_round_robin_3);
1182                 val64 = 0x0100000000000000ULL;
1183                 writeq(val64, &bar0->rx_w_round_robin_4);
1184
1185                 val64 = 0x8080808040404040ULL;
1186                 writeq(val64, &bar0->rts_qos_steering);
1187                 break;
1188         case 3:
1189                 val64 = 0x0001000102000001ULL;
1190                 writeq(val64, &bar0->rx_w_round_robin_0);
1191                 val64 = 0x0001020000010001ULL;
1192                 writeq(val64, &bar0->rx_w_round_robin_1);
1193                 val64 = 0x0200000100010200ULL;
1194                 writeq(val64, &bar0->rx_w_round_robin_2);
1195                 val64 = 0x0001000102000001ULL;
1196                 writeq(val64, &bar0->rx_w_round_robin_3);
1197                 val64 = 0x0001020000000000ULL;
1198                 writeq(val64, &bar0->rx_w_round_robin_4);
1199
1200                 val64 = 0x8080804040402020ULL;
1201                 writeq(val64, &bar0->rts_qos_steering);
1202                 break;
1203         case 4:
1204                 val64 = 0x0001020300010200ULL;
1205                 writeq(val64, &bar0->rx_w_round_robin_0);
1206                 val64 = 0x0100000102030001ULL;
1207                 writeq(val64, &bar0->rx_w_round_robin_1);
1208                 val64 = 0x0200010000010203ULL;
1209                 writeq(val64, &bar0->rx_w_round_robin_2);
1210                 val64 = 0x0001020001000001ULL;
1211                 writeq(val64, &bar0->rx_w_round_robin_3);
1212                 val64 = 0x0203000100000000ULL;
1213                 writeq(val64, &bar0->rx_w_round_robin_4);
1214
1215                 val64 = 0x8080404020201010ULL;
1216                 writeq(val64, &bar0->rts_qos_steering);
1217                 break;
1218         case 5:
1219                 val64 = 0x0001000203000102ULL;
1220                 writeq(val64, &bar0->rx_w_round_robin_0);
1221                 val64 = 0x0001020001030004ULL;
1222                 writeq(val64, &bar0->rx_w_round_robin_1);
1223                 val64 = 0x0001000203000102ULL;
1224                 writeq(val64, &bar0->rx_w_round_robin_2);
1225                 val64 = 0x0001020001030004ULL;
1226                 writeq(val64, &bar0->rx_w_round_robin_3);
1227                 val64 = 0x0001000000000000ULL;
1228                 writeq(val64, &bar0->rx_w_round_robin_4);
1229
1230                 val64 = 0x8080404020201008ULL;
1231                 writeq(val64, &bar0->rts_qos_steering);
1232                 break;
1233         case 6:
1234                 val64 = 0x0001020304000102ULL;
1235                 writeq(val64, &bar0->rx_w_round_robin_0);
1236                 val64 = 0x0304050001020001ULL;
1237                 writeq(val64, &bar0->rx_w_round_robin_1);
1238                 val64 = 0x0203000100000102ULL;
1239                 writeq(val64, &bar0->rx_w_round_robin_2);
1240                 val64 = 0x0304000102030405ULL;
1241                 writeq(val64, &bar0->rx_w_round_robin_3);
1242                 val64 = 0x0001000200000000ULL;
1243                 writeq(val64, &bar0->rx_w_round_robin_4);
1244
1245                 val64 = 0x8080404020100804ULL;
1246                 writeq(val64, &bar0->rts_qos_steering);
1247                 break;
1248         case 7:
1249                 val64 = 0x0001020001020300ULL;
1250                 writeq(val64, &bar0->rx_w_round_robin_0);
1251                 val64 = 0x0102030400010203ULL;
1252                 writeq(val64, &bar0->rx_w_round_robin_1);
1253                 val64 = 0x0405060001020001ULL;
1254                 writeq(val64, &bar0->rx_w_round_robin_2);
1255                 val64 = 0x0304050000010200ULL;
1256                 writeq(val64, &bar0->rx_w_round_robin_3);
1257                 val64 = 0x0102030000000000ULL;
1258                 writeq(val64, &bar0->rx_w_round_robin_4);
1259
1260                 val64 = 0x8080402010080402ULL;
1261                 writeq(val64, &bar0->rts_qos_steering);
1262                 break;
1263         case 8:
1264                 val64 = 0x0001020300040105ULL;
1265                 writeq(val64, &bar0->rx_w_round_robin_0);
1266                 val64 = 0x0200030106000204ULL;
1267                 writeq(val64, &bar0->rx_w_round_robin_1);
1268                 val64 = 0x0103000502010007ULL;
1269                 writeq(val64, &bar0->rx_w_round_robin_2);
1270                 val64 = 0x0304010002060500ULL;
1271                 writeq(val64, &bar0->rx_w_round_robin_3);
1272                 val64 = 0x0103020400000000ULL;
1273                 writeq(val64, &bar0->rx_w_round_robin_4);
1274
1275                 val64 = 0x8040201008040201ULL;
1276                 writeq(val64, &bar0->rts_qos_steering);
1277                 break;
1278         }
1279
1280         /* UDP Fix */
1281         val64 = 0;
1282         for (i = 0; i < 8; i++)
1283                 writeq(val64, &bar0->rts_frm_len_n[i]);
1284
1285         /* Set the default rts frame length for the rings configured */
1286         val64 = MAC_RTS_FRM_LEN_SET(dev->mtu+22);
1287         for (i = 0 ; i < config->rx_ring_num ; i++)
1288                 writeq(val64, &bar0->rts_frm_len_n[i]);
1289
1290         /* Set the frame length for the configured rings
1291          * desired by the user
1292          */
1293         for (i = 0; i < config->rx_ring_num; i++) {
1294                 /* If rts_frm_len[i] == 0 then it is assumed that user not
1295                  * specified frame length steering.
1296                  * If the user provides the frame length then program
1297                  * the rts_frm_len register for those values or else
1298                  * leave it as it is.
1299                  */
1300                 if (rts_frm_len[i] != 0) {
1301                         writeq(MAC_RTS_FRM_LEN_SET(rts_frm_len[i]),
1302                                 &bar0->rts_frm_len_n[i]);
1303                 }
1304         }
1305
1306         /* Program statistics memory */
1307         writeq(mac_control->stats_mem_phy, &bar0->stat_addr);
1308
1309         if (nic->device_type == XFRAME_II_DEVICE) {
1310                 val64 = STAT_BC(0x320);
1311                 writeq(val64, &bar0->stat_byte_cnt);
1312         }
1313
1314         /*
1315          * Initializing the sampling rate for the device to calculate the
1316          * bandwidth utilization.
1317          */
1318         val64 = MAC_TX_LINK_UTIL_VAL(tmac_util_period) |
1319             MAC_RX_LINK_UTIL_VAL(rmac_util_period);
1320         writeq(val64, &bar0->mac_link_util);
1321
1322
1323         /*
1324          * Initializing the Transmit and Receive Traffic Interrupt
1325          * Scheme.
1326          */
1327         /*
1328          * TTI Initialization. Default Tx timer gets us about
1329          * 250 interrupts per sec. Continuous interrupts are enabled
1330          * by default.
1331          */
1332         if (nic->device_type == XFRAME_II_DEVICE) {
1333                 int count = (nic->config.bus_speed * 125)/2;
1334                 val64 = TTI_DATA1_MEM_TX_TIMER_VAL(count);
1335         } else {
1336
1337                 val64 = TTI_DATA1_MEM_TX_TIMER_VAL(0x2078);
1338         }
1339         val64 |= TTI_DATA1_MEM_TX_URNG_A(0xA) |
1340             TTI_DATA1_MEM_TX_URNG_B(0x10) |
1341             TTI_DATA1_MEM_TX_URNG_C(0x30) | TTI_DATA1_MEM_TX_TIMER_AC_EN;
1342                 if (use_continuous_tx_intrs)
1343                         val64 |= TTI_DATA1_MEM_TX_TIMER_CI_EN;
1344         writeq(val64, &bar0->tti_data1_mem);
1345
1346         val64 = TTI_DATA2_MEM_TX_UFC_A(0x10) |
1347             TTI_DATA2_MEM_TX_UFC_B(0x20) |
1348             TTI_DATA2_MEM_TX_UFC_C(0x70) | TTI_DATA2_MEM_TX_UFC_D(0x80);
1349         writeq(val64, &bar0->tti_data2_mem);
1350
1351         val64 = TTI_CMD_MEM_WE | TTI_CMD_MEM_STROBE_NEW_CMD;
1352         writeq(val64, &bar0->tti_command_mem);
1353
1354         /*
1355          * Once the operation completes, the Strobe bit of the command
1356          * register will be reset. We poll for this particular condition
1357          * We wait for a maximum of 500ms for the operation to complete,
1358          * if it's not complete by then we return error.
1359          */
1360         time = 0;
1361         while (TRUE) {
1362                 val64 = readq(&bar0->tti_command_mem);
1363                 if (!(val64 & TTI_CMD_MEM_STROBE_NEW_CMD)) {
1364                         break;
1365                 }
1366                 if (time > 10) {
1367                         DBG_PRINT(ERR_DBG, "%s: TTI init Failed\n",
1368                                   dev->name);
1369                         return -1;
1370                 }
1371                 msleep(50);
1372                 time++;
1373         }
1374
1375         if (nic->config.bimodal) {
1376                 int k = 0;
1377                 for (k = 0; k < config->rx_ring_num; k++) {
1378                         val64 = TTI_CMD_MEM_WE | TTI_CMD_MEM_STROBE_NEW_CMD;
1379                         val64 |= TTI_CMD_MEM_OFFSET(0x38+k);
1380                         writeq(val64, &bar0->tti_command_mem);
1381
1382                 /*
1383                  * Once the operation completes, the Strobe bit of the command
1384                  * register will be reset. We poll for this particular condition
1385                  * We wait for a maximum of 500ms for the operation to complete,
1386                  * if it's not complete by then we return error.
1387                 */
1388                         time = 0;
1389                         while (TRUE) {
1390                                 val64 = readq(&bar0->tti_command_mem);
1391                                 if (!(val64 & TTI_CMD_MEM_STROBE_NEW_CMD)) {
1392                                         break;
1393                                 }
1394                                 if (time > 10) {
1395                                         DBG_PRINT(ERR_DBG,
1396                                                 "%s: TTI init Failed\n",
1397                                         dev->name);
1398                                         return -1;
1399                                 }
1400                                 time++;
1401                                 msleep(50);
1402                         }
1403                 }
1404         } else {
1405
1406                 /* RTI Initialization */
1407                 if (nic->device_type == XFRAME_II_DEVICE) {
1408                         /*
1409                          * Programmed to generate Apprx 500 Intrs per
1410                          * second
1411                          */
1412                         int count = (nic->config.bus_speed * 125)/4;
1413                         val64 = RTI_DATA1_MEM_RX_TIMER_VAL(count);
1414                 } else {
1415                         val64 = RTI_DATA1_MEM_RX_TIMER_VAL(0xFFF);
1416                 }
1417                 val64 |= RTI_DATA1_MEM_RX_URNG_A(0xA) |
1418                     RTI_DATA1_MEM_RX_URNG_B(0x10) |
1419                     RTI_DATA1_MEM_RX_URNG_C(0x30) | RTI_DATA1_MEM_RX_TIMER_AC_EN;
1420
1421                 writeq(val64, &bar0->rti_data1_mem);
1422
1423                 val64 = RTI_DATA2_MEM_RX_UFC_A(0x1) |
1424                     RTI_DATA2_MEM_RX_UFC_B(0x2) ;
1425                 if (nic->intr_type == MSI_X)
1426                     val64 |= (RTI_DATA2_MEM_RX_UFC_C(0x20) | \
1427                                 RTI_DATA2_MEM_RX_UFC_D(0x40));
1428                 else
1429                     val64 |= (RTI_DATA2_MEM_RX_UFC_C(0x40) | \
1430                                 RTI_DATA2_MEM_RX_UFC_D(0x80));
1431                 writeq(val64, &bar0->rti_data2_mem);
1432
1433                 for (i = 0; i < config->rx_ring_num; i++) {
1434                         val64 = RTI_CMD_MEM_WE | RTI_CMD_MEM_STROBE_NEW_CMD
1435                                         | RTI_CMD_MEM_OFFSET(i);
1436                         writeq(val64, &bar0->rti_command_mem);
1437
1438                         /*
1439                          * Once the operation completes, the Strobe bit of the
1440                          * command register will be reset. We poll for this
1441                          * particular condition. We wait for a maximum of 500ms
1442                          * for the operation to complete, if it's not complete
1443                          * by then we return error.
1444                          */
1445                         time = 0;
1446                         while (TRUE) {
1447                                 val64 = readq(&bar0->rti_command_mem);
1448                                 if (!(val64 & RTI_CMD_MEM_STROBE_NEW_CMD)) {
1449                                         break;
1450                                 }
1451                                 if (time > 10) {
1452                                         DBG_PRINT(ERR_DBG, "%s: RTI init Failed\n",
1453                                                   dev->name);
1454                                         return -1;
1455                                 }
1456                                 time++;
1457                                 msleep(50);
1458                         }
1459                 }
1460         }
1461
1462         /*
1463          * Initializing proper values as Pause threshold into all
1464          * the 8 Queues on Rx side.
1465          */
1466         writeq(0xffbbffbbffbbffbbULL, &bar0->mc_pause_thresh_q0q3);
1467         writeq(0xffbbffbbffbbffbbULL, &bar0->mc_pause_thresh_q4q7);
1468
1469         /* Disable RMAC PAD STRIPPING */
1470         add = &bar0->mac_cfg;
1471         val64 = readq(&bar0->mac_cfg);
1472         val64 &= ~(MAC_CFG_RMAC_STRIP_PAD);
1473         writeq(RMAC_CFG_KEY(0x4C0D), &bar0->rmac_cfg_key);
1474         writel((u32) (val64), add);
1475         writeq(RMAC_CFG_KEY(0x4C0D), &bar0->rmac_cfg_key);
1476         writel((u32) (val64 >> 32), (add + 4));
1477         val64 = readq(&bar0->mac_cfg);
1478
1479         /*
1480          * Set the time value to be inserted in the pause frame
1481          * generated by xena.
1482          */
1483         val64 = readq(&bar0->rmac_pause_cfg);
1484         val64 &= ~(RMAC_PAUSE_HG_PTIME(0xffff));
1485         val64 |= RMAC_PAUSE_HG_PTIME(nic->mac_control.rmac_pause_time);
1486         writeq(val64, &bar0->rmac_pause_cfg);
1487
1488         /*
1489          * Set the Threshold Limit for Generating the pause frame
1490          * If the amount of data in any Queue exceeds ratio of
1491          * (mac_control.mc_pause_threshold_q0q3 or q4q7)/256
1492          * pause frame is generated
1493          */
1494         val64 = 0;
1495         for (i = 0; i < 4; i++) {
1496                 val64 |=
1497                     (((u64) 0xFF00 | nic->mac_control.
1498                       mc_pause_threshold_q0q3)
1499                      << (i * 2 * 8));
1500         }
1501         writeq(val64, &bar0->mc_pause_thresh_q0q3);
1502
1503         val64 = 0;
1504         for (i = 0; i < 4; i++) {
1505                 val64 |=
1506                     (((u64) 0xFF00 | nic->mac_control.
1507                       mc_pause_threshold_q4q7)
1508                      << (i * 2 * 8));
1509         }
1510         writeq(val64, &bar0->mc_pause_thresh_q4q7);
1511
1512         /*
1513          * TxDMA will stop Read request if the number of read split has
1514          * exceeded the limit pointed by shared_splits
1515          */
1516         val64 = readq(&bar0->pic_control);
1517         val64 |= PIC_CNTL_SHARED_SPLITS(shared_splits);
1518         writeq(val64, &bar0->pic_control);
1519
1520         /*
1521          * Programming the Herc to split every write transaction
1522          * that does not start on an ADB to reduce disconnects.
1523          */
1524         if (nic->device_type == XFRAME_II_DEVICE) {
1525                 val64 = WREQ_SPLIT_MASK_SET_MASK(255);
1526                 writeq(val64, &bar0->wreq_split_mask);
1527         }
1528
1529         /* Setting Link stability period to 64 ms */
1530         if (nic->device_type == XFRAME_II_DEVICE) {
1531                 val64 = MISC_LINK_STABILITY_PRD(3);
1532                 writeq(val64, &bar0->misc_control);
1533         }
1534
1535         return SUCCESS;
1536 }
1537 #define LINK_UP_DOWN_INTERRUPT          1
1538 #define MAC_RMAC_ERR_TIMER              2
1539
1540 static int s2io_link_fault_indication(nic_t *nic)
1541 {
1542         if (nic->intr_type != INTA)
1543                 return MAC_RMAC_ERR_TIMER;
1544         if (nic->device_type == XFRAME_II_DEVICE)
1545                 return LINK_UP_DOWN_INTERRUPT;
1546         else
1547                 return MAC_RMAC_ERR_TIMER;
1548 }
1549
1550 /**
1551  *  en_dis_able_nic_intrs - Enable or Disable the interrupts
1552  *  @nic: device private variable,
1553  *  @mask: A mask indicating which Intr block must be modified and,
1554  *  @flag: A flag indicating whether to enable or disable the Intrs.
1555  *  Description: This function will either disable or enable the interrupts
1556  *  depending on the flag argument. The mask argument can be used to
1557  *  enable/disable any Intr block.
1558  *  Return Value: NONE.
1559  */
1560
1561 static void en_dis_able_nic_intrs(struct s2io_nic *nic, u16 mask, int flag)
1562 {
1563         XENA_dev_config_t __iomem *bar0 = nic->bar0;
1564         register u64 val64 = 0, temp64 = 0;
1565
1566         /*  Top level interrupt classification */
1567         /*  PIC Interrupts */
1568         if ((mask & (TX_PIC_INTR | RX_PIC_INTR))) {
1569                 /*  Enable PIC Intrs in the general intr mask register */
1570                 val64 = TXPIC_INT_M | PIC_RX_INT_M;
1571                 if (flag == ENABLE_INTRS) {
1572                         temp64 = readq(&bar0->general_int_mask);
1573                         temp64 &= ~((u64) val64);
1574                         writeq(temp64, &bar0->general_int_mask);
1575                         /*
1576                          * If Hercules adapter enable GPIO otherwise
1577                          * disabled all PCIX, Flash, MDIO, IIC and GPIO
1578                          * interrupts for now.
1579                          * TODO
1580                          */
1581                         if (s2io_link_fault_indication(nic) ==
1582                                         LINK_UP_DOWN_INTERRUPT ) {
1583                                 temp64 = readq(&bar0->pic_int_mask);
1584                                 temp64 &= ~((u64) PIC_INT_GPIO);
1585                                 writeq(temp64, &bar0->pic_int_mask);
1586                                 temp64 = readq(&bar0->gpio_int_mask);
1587                                 temp64 &= ~((u64) GPIO_INT_MASK_LINK_UP);
1588                                 writeq(temp64, &bar0->gpio_int_mask);
1589                         } else {
1590                                 writeq(DISABLE_ALL_INTRS, &bar0->pic_int_mask);
1591                         }
1592                         /*
1593                          * No MSI Support is available presently, so TTI and
1594                          * RTI interrupts are also disabled.
1595                          */
1596                 } else if (flag == DISABLE_INTRS) {
1597                         /*
1598                          * Disable PIC Intrs in the general
1599                          * intr mask register
1600                          */
1601                         writeq(DISABLE_ALL_INTRS, &bar0->pic_int_mask);
1602                         temp64 = readq(&bar0->general_int_mask);
1603                         val64 |= temp64;
1604                         writeq(val64, &bar0->general_int_mask);
1605                 }
1606         }
1607
1608         /*  DMA Interrupts */
1609         /*  Enabling/Disabling Tx DMA interrupts */
1610         if (mask & TX_DMA_INTR) {
1611                 /* Enable TxDMA Intrs in the general intr mask register */
1612                 val64 = TXDMA_INT_M;
1613                 if (flag == ENABLE_INTRS) {
1614                         temp64 = readq(&bar0->general_int_mask);
1615                         temp64 &= ~((u64) val64);
1616                         writeq(temp64, &bar0->general_int_mask);
1617                         /*
1618                          * Keep all interrupts other than PFC interrupt
1619                          * and PCC interrupt disabled in DMA level.
1620                          */
1621                         val64 = DISABLE_ALL_INTRS & ~(TXDMA_PFC_INT_M |
1622                                                       TXDMA_PCC_INT_M);
1623                         writeq(val64, &bar0->txdma_int_mask);
1624                         /*
1625                          * Enable only the MISC error 1 interrupt in PFC block
1626                          */
1627                         val64 = DISABLE_ALL_INTRS & (~PFC_MISC_ERR_1);
1628                         writeq(val64, &bar0->pfc_err_mask);
1629                         /*
1630                          * Enable only the FB_ECC error interrupt in PCC block
1631                          */
1632                         val64 = DISABLE_ALL_INTRS & (~PCC_FB_ECC_ERR);
1633                         writeq(val64, &bar0->pcc_err_mask);
1634                 } else if (flag == DISABLE_INTRS) {
1635                         /*
1636                          * Disable TxDMA Intrs in the general intr mask
1637                          * register
1638                          */
1639                         writeq(DISABLE_ALL_INTRS, &bar0->txdma_int_mask);
1640                         writeq(DISABLE_ALL_INTRS, &bar0->pfc_err_mask);
1641                         temp64 = readq(&bar0->general_int_mask);
1642                         val64 |= temp64;
1643                         writeq(val64, &bar0->general_int_mask);
1644                 }
1645         }
1646
1647         /*  Enabling/Disabling Rx DMA interrupts */
1648         if (mask & RX_DMA_INTR) {
1649                 /*  Enable RxDMA Intrs in the general intr mask register */
1650                 val64 = RXDMA_INT_M;
1651                 if (flag == ENABLE_INTRS) {
1652                         temp64 = readq(&bar0->general_int_mask);
1653                         temp64 &= ~((u64) val64);
1654                         writeq(temp64, &bar0->general_int_mask);
1655                         /*
1656                          * All RxDMA block interrupts are disabled for now
1657                          * TODO
1658                          */
1659                         writeq(DISABLE_ALL_INTRS, &bar0->rxdma_int_mask);
1660                 } else if (flag == DISABLE_INTRS) {
1661                         /*
1662                          * Disable RxDMA Intrs in the general intr mask
1663                          * register
1664                          */
1665                         writeq(DISABLE_ALL_INTRS, &bar0->rxdma_int_mask);
1666                         temp64 = readq(&bar0->general_int_mask);
1667                         val64 |= temp64;
1668                         writeq(val64, &bar0->general_int_mask);
1669                 }
1670         }
1671
1672         /*  MAC Interrupts */
1673         /*  Enabling/Disabling MAC interrupts */
1674         if (mask & (TX_MAC_INTR | RX_MAC_INTR)) {
1675                 val64 = TXMAC_INT_M | RXMAC_INT_M;
1676                 if (flag == ENABLE_INTRS) {
1677                         temp64 = readq(&bar0->general_int_mask);
1678                         temp64 &= ~((u64) val64);
1679                         writeq(temp64, &bar0->general_int_mask);
1680                         /*
1681                          * All MAC block error interrupts are disabled for now
1682                          * TODO
1683                          */
1684                 } else if (flag == DISABLE_INTRS) {
1685                         /*
1686                          * Disable MAC Intrs in the general intr mask register
1687                          */
1688                         writeq(DISABLE_ALL_INTRS, &bar0->mac_int_mask);
1689                         writeq(DISABLE_ALL_INTRS,
1690                                &bar0->mac_rmac_err_mask);
1691
1692                         temp64 = readq(&bar0->general_int_mask);
1693                         val64 |= temp64;
1694                         writeq(val64, &bar0->general_int_mask);
1695                 }
1696         }
1697
1698         /*  XGXS Interrupts */
1699         if (mask & (TX_XGXS_INTR | RX_XGXS_INTR)) {
1700                 val64 = TXXGXS_INT_M | RXXGXS_INT_M;
1701                 if (flag == ENABLE_INTRS) {
1702                         temp64 = readq(&bar0->general_int_mask);
1703                         temp64 &= ~((u64) val64);
1704                         writeq(temp64, &bar0->general_int_mask);
1705                         /*
1706                          * All XGXS block error interrupts are disabled for now
1707                          * TODO
1708                          */
1709                         writeq(DISABLE_ALL_INTRS, &bar0->xgxs_int_mask);
1710                 } else if (flag == DISABLE_INTRS) {
1711                         /*
1712                          * Disable MC Intrs in the general intr mask register
1713                          */
1714                         writeq(DISABLE_ALL_INTRS, &bar0->xgxs_int_mask);
1715                         temp64 = readq(&bar0->general_int_mask);
1716                         val64 |= temp64;
1717                         writeq(val64, &bar0->general_int_mask);
1718                 }
1719         }
1720
1721         /*  Memory Controller(MC) interrupts */
1722         if (mask & MC_INTR) {
1723                 val64 = MC_INT_M;
1724                 if (flag == ENABLE_INTRS) {
1725                         temp64 = readq(&bar0->general_int_mask);
1726                         temp64 &= ~((u64) val64);
1727                         writeq(temp64, &bar0->general_int_mask);
1728                         /*
1729                          * Enable all MC Intrs.
1730                          */
1731                         writeq(0x0, &bar0->mc_int_mask);
1732                         writeq(0x0, &bar0->mc_err_mask);
1733                 } else if (flag == DISABLE_INTRS) {
1734                         /*
1735                          * Disable MC Intrs in the general intr mask register
1736                          */
1737                         writeq(DISABLE_ALL_INTRS, &bar0->mc_int_mask);
1738                         temp64 = readq(&bar0->general_int_mask);
1739                         val64 |= temp64;
1740                         writeq(val64, &bar0->general_int_mask);
1741                 }
1742         }
1743
1744
1745         /*  Tx traffic interrupts */
1746         if (mask & TX_TRAFFIC_INTR) {
1747                 val64 = TXTRAFFIC_INT_M;
1748                 if (flag == ENABLE_INTRS) {
1749                         temp64 = readq(&bar0->general_int_mask);
1750                         temp64 &= ~((u64) val64);
1751                         writeq(temp64, &bar0->general_int_mask);
1752                         /*
1753                          * Enable all the Tx side interrupts
1754                          * writing 0 Enables all 64 TX interrupt levels
1755                          */
1756                         writeq(0x0, &bar0->tx_traffic_mask);
1757                 } else if (flag == DISABLE_INTRS) {
1758                         /*
1759                          * Disable Tx Traffic Intrs in the general intr mask
1760                          * register.
1761                          */
1762                         writeq(DISABLE_ALL_INTRS, &bar0->tx_traffic_mask);
1763                         temp64 = readq(&bar0->general_int_mask);
1764                         val64 |= temp64;
1765                         writeq(val64, &bar0->general_int_mask);
1766                 }
1767         }
1768
1769         /*  Rx traffic interrupts */
1770         if (mask & RX_TRAFFIC_INTR) {
1771                 val64 = RXTRAFFIC_INT_M;
1772                 if (flag == ENABLE_INTRS) {
1773                         temp64 = readq(&bar0->general_int_mask);
1774                         temp64 &= ~((u64) val64);
1775                         writeq(temp64, &bar0->general_int_mask);
1776                         /* writing 0 Enables all 8 RX interrupt levels */
1777                         writeq(0x0, &bar0->rx_traffic_mask);
1778                 } else if (flag == DISABLE_INTRS) {
1779                         /*
1780                          * Disable Rx Traffic Intrs in the general intr mask
1781                          * register.
1782                          */
1783                         writeq(DISABLE_ALL_INTRS, &bar0->rx_traffic_mask);
1784                         temp64 = readq(&bar0->general_int_mask);
1785                         val64 |= temp64;
1786                         writeq(val64, &bar0->general_int_mask);
1787                 }
1788         }
1789 }
1790
1791 static int check_prc_pcc_state(u64 val64, int flag, int rev_id, int herc)
1792 {
1793         int ret = 0;
1794
1795         if (flag == FALSE) {
1796                 if ((!herc && (rev_id >= 4)) || herc) {
1797                         if (!(val64 & ADAPTER_STATUS_RMAC_PCC_IDLE) &&
1798                             ((val64 & ADAPTER_STATUS_RC_PRC_QUIESCENT) ==
1799                              ADAPTER_STATUS_RC_PRC_QUIESCENT)) {
1800                                 ret = 1;
1801                         }
1802                 }else {
1803                         if (!(val64 & ADAPTER_STATUS_RMAC_PCC_FOUR_IDLE) &&
1804                             ((val64 & ADAPTER_STATUS_RC_PRC_QUIESCENT) ==
1805                              ADAPTER_STATUS_RC_PRC_QUIESCENT)) {
1806                                 ret = 1;
1807                         }
1808                 }
1809         } else {
1810                 if ((!herc && (rev_id >= 4)) || herc) {
1811                         if (((val64 & ADAPTER_STATUS_RMAC_PCC_IDLE) ==
1812                              ADAPTER_STATUS_RMAC_PCC_IDLE) &&
1813                             (!(val64 & ADAPTER_STATUS_RC_PRC_QUIESCENT) ||
1814                              ((val64 & ADAPTER_STATUS_RC_PRC_QUIESCENT) ==
1815                               ADAPTER_STATUS_RC_PRC_QUIESCENT))) {
1816                                 ret = 1;
1817                         }
1818                 } else {
1819                         if (((val64 & ADAPTER_STATUS_RMAC_PCC_FOUR_IDLE) ==
1820                              ADAPTER_STATUS_RMAC_PCC_FOUR_IDLE) &&
1821                             (!(val64 & ADAPTER_STATUS_RC_PRC_QUIESCENT) ||
1822                              ((val64 & ADAPTER_STATUS_RC_PRC_QUIESCENT) ==
1823                               ADAPTER_STATUS_RC_PRC_QUIESCENT))) {
1824                                 ret = 1;
1825                         }
1826                 }
1827         }
1828
1829         return ret;
1830 }
1831 /**
1832  *  verify_xena_quiescence - Checks whether the H/W is ready
1833  *  @val64 :  Value read from adapter status register.
1834  *  @flag : indicates if the adapter enable bit was ever written once
1835  *  before.
1836  *  Description: Returns whether the H/W is ready to go or not. Depending
1837  *  on whether adapter enable bit was written or not the comparison
1838  *  differs and the calling function passes the input argument flag to
1839  *  indicate this.
1840  *  Return: 1 If xena is quiescence
1841  *          0 If Xena is not quiescence
1842  */
1843
1844 static int verify_xena_quiescence(nic_t *sp, u64 val64, int flag)
1845 {
1846         int ret = 0, herc;
1847         u64 tmp64 = ~((u64) val64);
1848         int rev_id = get_xena_rev_id(sp->pdev);
1849
1850         herc = (sp->device_type == XFRAME_II_DEVICE);
1851         if (!
1852             (tmp64 &
1853              (ADAPTER_STATUS_TDMA_READY | ADAPTER_STATUS_RDMA_READY |
1854               ADAPTER_STATUS_PFC_READY | ADAPTER_STATUS_TMAC_BUF_EMPTY |
1855               ADAPTER_STATUS_PIC_QUIESCENT | ADAPTER_STATUS_MC_DRAM_READY |
1856               ADAPTER_STATUS_MC_QUEUES_READY | ADAPTER_STATUS_M_PLL_LOCK |
1857               ADAPTER_STATUS_P_PLL_LOCK))) {
1858                 ret = check_prc_pcc_state(val64, flag, rev_id, herc);
1859         }
1860
1861         return ret;
1862 }
1863
1864 /**
1865  * fix_mac_address -  Fix for Mac addr problem on Alpha platforms
1866  * @sp: Pointer to device specifc structure
1867  * Description :
1868  * New procedure to clear mac address reading  problems on Alpha platforms
1869  *
1870  */
1871
1872 static void fix_mac_address(nic_t * sp)
1873 {
1874         XENA_dev_config_t __iomem *bar0 = sp->bar0;
1875         u64 val64;
1876         int i = 0;
1877
1878         while (fix_mac[i] != END_SIGN) {
1879                 writeq(fix_mac[i++], &bar0->gpio_control);
1880                 udelay(10);
1881                 val64 = readq(&bar0->gpio_control);
1882         }
1883 }
1884
1885 /**
1886  *  start_nic - Turns the device on
1887  *  @nic : device private variable.
1888  *  Description:
1889  *  This function actually turns the device on. Before this  function is
1890  *  called,all Registers are configured from their reset states
1891  *  and shared memory is allocated but the NIC is still quiescent. On
1892  *  calling this function, the device interrupts are cleared and the NIC is
1893  *  literally switched on by writing into the adapter control register.
1894  *  Return Value:
1895  *  SUCCESS on success and -1 on failure.
1896  */
1897
1898 static int start_nic(struct s2io_nic *nic)
1899 {
1900         XENA_dev_config_t __iomem *bar0 = nic->bar0;
1901         struct net_device *dev = nic->dev;
1902         register u64 val64 = 0;
1903         u16 interruptible;
1904         u16 subid, i;
1905         mac_info_t *mac_control;
1906         struct config_param *config;
1907
1908         mac_control = &nic->mac_control;
1909         config = &nic->config;
1910
1911         /*  PRC Initialization and configuration */
1912         for (i = 0; i < config->rx_ring_num; i++) {
1913                 writeq((u64) mac_control->rings[i].rx_blocks[0].block_dma_addr,
1914                        &bar0->prc_rxd0_n[i]);
1915
1916                 val64 = readq(&bar0->prc_ctrl_n[i]);
1917                 if (nic->config.bimodal)
1918                         val64 |= PRC_CTRL_BIMODAL_INTERRUPT;
1919                 if (nic->rxd_mode == RXD_MODE_1)
1920                         val64 |= PRC_CTRL_RC_ENABLED;
1921                 else
1922                         val64 |= PRC_CTRL_RC_ENABLED | PRC_CTRL_RING_MODE_3;
1923                 writeq(val64, &bar0->prc_ctrl_n[i]);
1924         }
1925
1926         if (nic->rxd_mode == RXD_MODE_3B) {
1927                 /* Enabling 2 buffer mode by writing into Rx_pa_cfg reg. */
1928                 val64 = readq(&bar0->rx_pa_cfg);
1929                 val64 |= RX_PA_CFG_IGNORE_L2_ERR;
1930                 writeq(val64, &bar0->rx_pa_cfg);
1931         }
1932
1933         /*
1934          * Enabling MC-RLDRAM. After enabling the device, we timeout
1935          * for around 100ms, which is approximately the time required
1936          * for the device to be ready for operation.
1937          */
1938         val64 = readq(&bar0->mc_rldram_mrs);
1939         val64 |= MC_RLDRAM_QUEUE_SIZE_ENABLE | MC_RLDRAM_MRS_ENABLE;
1940         SPECIAL_REG_WRITE(val64, &bar0->mc_rldram_mrs, UF);
1941         val64 = readq(&bar0->mc_rldram_mrs);
1942
1943         msleep(100);    /* Delay by around 100 ms. */
1944
1945         /* Enabling ECC Protection. */
1946         val64 = readq(&bar0->adapter_control);
1947         val64 &= ~ADAPTER_ECC_EN;
1948         writeq(val64, &bar0->adapter_control);
1949
1950         /*
1951          * Clearing any possible Link state change interrupts that
1952          * could have popped up just before Enabling the card.
1953          */
1954         val64 = readq(&bar0->mac_rmac_err_reg);
1955         if (val64)
1956                 writeq(val64, &bar0->mac_rmac_err_reg);
1957
1958         /*
1959          * Verify if the device is ready to be enabled, if so enable
1960          * it.
1961          */
1962         val64 = readq(&bar0->adapter_status);
1963         if (!verify_xena_quiescence(nic, val64, nic->device_enabled_once)) {
1964                 DBG_PRINT(ERR_DBG, "%s: device is not ready, ", dev->name);
1965                 DBG_PRINT(ERR_DBG, "Adapter status reads: 0x%llx\n",
1966                           (unsigned long long) val64);
1967                 return FAILURE;
1968         }
1969
1970         /*  Enable select interrupts */
1971         if (nic->intr_type != INTA)
1972                 en_dis_able_nic_intrs(nic, ENA_ALL_INTRS, DISABLE_INTRS);
1973         else {
1974                 interruptible = TX_TRAFFIC_INTR | RX_TRAFFIC_INTR;
1975                 interruptible |= TX_PIC_INTR | RX_PIC_INTR;
1976                 interruptible |= TX_MAC_INTR | RX_MAC_INTR;
1977                 en_dis_able_nic_intrs(nic, interruptible, ENABLE_INTRS);
1978         }
1979
1980         /*
1981          * With some switches, link might be already up at this point.
1982          * Because of this weird behavior, when we enable laser,
1983          * we may not get link. We need to handle this. We cannot
1984          * figure out which switch is misbehaving. So we are forced to
1985          * make a global change.
1986          */
1987
1988         /* Enabling Laser. */
1989         val64 = readq(&bar0->adapter_control);
1990         val64 |= ADAPTER_EOI_TX_ON;
1991         writeq(val64, &bar0->adapter_control);
1992
1993         /* SXE-002: Initialize link and activity LED */
1994         subid = nic->pdev->subsystem_device;
1995         if (((subid & 0xFF) >= 0x07) &&
1996             (nic->device_type == XFRAME_I_DEVICE)) {
1997                 val64 = readq(&bar0->gpio_control);
1998                 val64 |= 0x0000800000000000ULL;
1999                 writeq(val64, &bar0->gpio_control);
2000                 val64 = 0x0411040400000000ULL;
2001                 writeq(val64, (void __iomem *)bar0 + 0x2700);
2002         }
2003
2004         /*
2005          * Don't see link state interrupts on certain switches, so
2006          * directly scheduling a link state task from here.
2007          */
2008         schedule_work(&nic->set_link_task);
2009
2010         return SUCCESS;
2011 }
2012 /**
2013  * s2io_txdl_getskb - Get the skb from txdl, unmap and return skb
2014  */
2015 static struct sk_buff *s2io_txdl_getskb(fifo_info_t *fifo_data, TxD_t *txdlp, int get_off)
2016 {
2017         nic_t *nic = fifo_data->nic;
2018         struct sk_buff *skb;
2019         TxD_t *txds;
2020         u16 j, frg_cnt;
2021
2022         txds = txdlp;
2023         if (txds->Host_Control == (u64)(long)nic->ufo_in_band_v) {
2024                 pci_unmap_single(nic->pdev, (dma_addr_t)
2025                         txds->Buffer_Pointer, sizeof(u64),
2026                         PCI_DMA_TODEVICE);
2027                 txds++;
2028         }
2029
2030         skb = (struct sk_buff *) ((unsigned long)
2031                         txds->Host_Control);
2032         if (!skb) {
2033                 memset(txdlp, 0, (sizeof(TxD_t) * fifo_data->max_txds));
2034                 return NULL;
2035         }
2036         pci_unmap_single(nic->pdev, (dma_addr_t)
2037                          txds->Buffer_Pointer,
2038                          skb->len - skb->data_len,
2039                          PCI_DMA_TODEVICE);
2040         frg_cnt = skb_shinfo(skb)->nr_frags;
2041         if (frg_cnt) {
2042                 txds++;
2043                 for (j = 0; j < frg_cnt; j++, txds++) {
2044                         skb_frag_t *frag = &skb_shinfo(skb)->frags[j];
2045                         if (!txds->Buffer_Pointer)
2046                                 break;
2047                         pci_unmap_page(nic->pdev, (dma_addr_t)
2048                                         txds->Buffer_Pointer,
2049                                        frag->size, PCI_DMA_TODEVICE);
2050                 }
2051         }
2052         txdlp->Host_Control = 0;
2053         return(skb);
2054 }
2055
2056 /**
2057  *  free_tx_buffers - Free all queued Tx buffers
2058  *  @nic : device private variable.
2059  *  Description:
2060  *  Free all queued Tx buffers.
2061  *  Return Value: void
2062 */
2063
2064 static void free_tx_buffers(struct s2io_nic *nic)
2065 {
2066         struct net_device *dev = nic->dev;
2067         struct sk_buff *skb;
2068         TxD_t *txdp;
2069         int i, j;
2070         mac_info_t *mac_control;
2071         struct config_param *config;
2072         int cnt = 0;
2073
2074         mac_control = &nic->mac_control;
2075         config = &nic->config;
2076
2077         for (i = 0; i < config->tx_fifo_num; i++) {
2078                 for (j = 0; j < config->tx_cfg[i].fifo_len - 1; j++) {
2079                         txdp = (TxD_t *) mac_control->fifos[i].list_info[j].
2080                             list_virt_addr;
2081                         skb = s2io_txdl_getskb(&mac_control->fifos[i], txdp, j);
2082                         if (skb) {
2083                                 dev_kfree_skb(skb);
2084                                 cnt++;
2085                         }
2086                 }
2087                 DBG_PRINT(INTR_DBG,
2088                           "%s:forcibly freeing %d skbs on FIFO%d\n",
2089                           dev->name, cnt, i);
2090                 mac_control->fifos[i].tx_curr_get_info.offset = 0;
2091                 mac_control->fifos[i].tx_curr_put_info.offset = 0;
2092         }
2093 }
2094
2095 /**
2096  *   stop_nic -  To stop the nic
2097  *   @nic ; device private variable.
2098  *   Description:
2099  *   This function does exactly the opposite of what the start_nic()
2100  *   function does. This function is called to stop the device.
2101  *   Return Value:
2102  *   void.
2103  */
2104
2105 static void stop_nic(struct s2io_nic *nic)
2106 {
2107         XENA_dev_config_t __iomem *bar0 = nic->bar0;
2108         register u64 val64 = 0;
2109         u16 interruptible, i;
2110         mac_info_t *mac_control;
2111         struct config_param *config;
2112
2113         mac_control = &nic->mac_control;
2114         config = &nic->config;
2115
2116         /*  Disable all interrupts */
2117         interruptible = TX_TRAFFIC_INTR | RX_TRAFFIC_INTR;
2118         interruptible |= TX_PIC_INTR | RX_PIC_INTR;
2119         interruptible |= TX_MAC_INTR | RX_MAC_INTR;
2120         en_dis_able_nic_intrs(nic, interruptible, DISABLE_INTRS);
2121
2122         /*  Disable PRCs */
2123         for (i = 0; i < config->rx_ring_num; i++) {
2124                 val64 = readq(&bar0->prc_ctrl_n[i]);
2125                 val64 &= ~((u64) PRC_CTRL_RC_ENABLED);
2126                 writeq(val64, &bar0->prc_ctrl_n[i]);
2127         }
2128 }
2129
2130 int fill_rxd_3buf(nic_t *nic, RxD_t *rxdp, struct sk_buff *skb)
2131 {
2132         struct net_device *dev = nic->dev;
2133         struct sk_buff *frag_list;
2134         void *tmp;
2135
2136         /* Buffer-1 receives L3/L4 headers */
2137         ((RxD3_t*)rxdp)->Buffer1_ptr = pci_map_single
2138                         (nic->pdev, skb->data, l3l4hdr_size + 4,
2139                         PCI_DMA_FROMDEVICE);
2140
2141         /* skb_shinfo(skb)->frag_list will have L4 data payload */
2142         skb_shinfo(skb)->frag_list = dev_alloc_skb(dev->mtu + ALIGN_SIZE);
2143         if (skb_shinfo(skb)->frag_list == NULL) {
2144                 DBG_PRINT(ERR_DBG, "%s: dev_alloc_skb failed\n ", dev->name);
2145                 return -ENOMEM ;
2146         }
2147         frag_list = skb_shinfo(skb)->frag_list;
2148         frag_list->next = NULL;
2149         tmp = (void *)ALIGN((long)frag_list->data, ALIGN_SIZE + 1);
2150         frag_list->data = tmp;
2151         frag_list->tail = tmp;
2152
2153         /* Buffer-2 receives L4 data payload */
2154         ((RxD3_t*)rxdp)->Buffer2_ptr = pci_map_single(nic->pdev,
2155                                 frag_list->data, dev->mtu,
2156                                 PCI_DMA_FROMDEVICE);
2157         rxdp->Control_2 |= SET_BUFFER1_SIZE_3(l3l4hdr_size + 4);
2158         rxdp->Control_2 |= SET_BUFFER2_SIZE_3(dev->mtu);
2159
2160         return SUCCESS;
2161 }
2162
2163 /**
2164  *  fill_rx_buffers - Allocates the Rx side skbs
2165  *  @nic:  device private variable
2166  *  @ring_no: ring number
2167  *  Description:
2168  *  The function allocates Rx side skbs and puts the physical
2169  *  address of these buffers into the RxD buffer pointers, so that the NIC
2170  *  can DMA the received frame into these locations.
2171  *  The NIC supports 3 receive modes, viz
2172  *  1. single buffer,
2173  *  2. three buffer and
2174  *  3. Five buffer modes.
2175  *  Each mode defines how many fragments the received frame will be split
2176  *  up into by the NIC. The frame is split into L3 header, L4 Header,
2177  *  L4 payload in three buffer mode and in 5 buffer mode, L4 payload itself
2178  *  is split into 3 fragments. As of now only single buffer mode is
2179  *  supported.
2180  *   Return Value:
2181  *  SUCCESS on success or an appropriate -ve value on failure.
2182  */
2183
2184 static int fill_rx_buffers(struct s2io_nic *nic, int ring_no)
2185 {
2186         struct net_device *dev = nic->dev;
2187         struct sk_buff *skb;
2188         RxD_t *rxdp;
2189         int off, off1, size, block_no, block_no1;
2190         u32 alloc_tab = 0;
2191         u32 alloc_cnt;
2192         mac_info_t *mac_control;
2193         struct config_param *config;
2194         u64 tmp;
2195         buffAdd_t *ba;
2196 #ifndef CONFIG_S2IO_NAPI
2197         unsigned long flags;
2198 #endif
2199         RxD_t *first_rxdp = NULL;
2200
2201         mac_control = &nic->mac_control;
2202         config = &nic->config;
2203         alloc_cnt = mac_control->rings[ring_no].pkt_cnt -
2204             atomic_read(&nic->rx_bufs_left[ring_no]);
2205
2206         while (alloc_tab < alloc_cnt) {
2207                 block_no = mac_control->rings[ring_no].rx_curr_put_info.
2208                     block_index;
2209                 block_no1 = mac_control->rings[ring_no].rx_curr_get_info.
2210                     block_index;
2211                 off = mac_control->rings[ring_no].rx_curr_put_info.offset;
2212                 off1 = mac_control->rings[ring_no].rx_curr_get_info.offset;
2213
2214                 rxdp = mac_control->rings[ring_no].
2215                                 rx_blocks[block_no].rxds[off].virt_addr;
2216
2217                 if ((block_no == block_no1) && (off == off1) &&
2218                                         (rxdp->Host_Control)) {
2219                         DBG_PRINT(INTR_DBG, "%s: Get and Put",
2220                                   dev->name);
2221                         DBG_PRINT(INTR_DBG, " info equated\n");
2222                         goto end;
2223                 }
2224                 if (off && (off == rxd_count[nic->rxd_mode])) {
2225                         mac_control->rings[ring_no].rx_curr_put_info.
2226                             block_index++;
2227                         if (mac_control->rings[ring_no].rx_curr_put_info.
2228                             block_index == mac_control->rings[ring_no].
2229                                         block_count)
2230                                 mac_control->rings[ring_no].rx_curr_put_info.
2231                                         block_index = 0;
2232                         block_no = mac_control->rings[ring_no].
2233                                         rx_curr_put_info.block_index;
2234                         if (off == rxd_count[nic->rxd_mode])
2235                                 off = 0;
2236                         mac_control->rings[ring_no].rx_curr_put_info.
2237                                 offset = off;
2238                         rxdp = mac_control->rings[ring_no].
2239                                 rx_blocks[block_no].block_virt_addr;
2240                         DBG_PRINT(INTR_DBG, "%s: Next block at: %p\n",
2241                                   dev->name, rxdp);
2242                 }
2243 #ifndef CONFIG_S2IO_NAPI
2244                 spin_lock_irqsave(&nic->put_lock, flags);
2245                 mac_control->rings[ring_no].put_pos =
2246                     (block_no * (rxd_count[nic->rxd_mode] + 1)) + off;
2247                 spin_unlock_irqrestore(&nic->put_lock, flags);
2248 #endif
2249                 if ((rxdp->Control_1 & RXD_OWN_XENA) &&
2250                         ((nic->rxd_mode >= RXD_MODE_3A) &&
2251                                 (rxdp->Control_2 & BIT(0)))) {
2252                         mac_control->rings[ring_no].rx_curr_put_info.
2253                                         offset = off;
2254                         goto end;
2255                 }
2256                 /* calculate size of skb based on ring mode */
2257                 size = dev->mtu + HEADER_ETHERNET_II_802_3_SIZE +
2258                                 HEADER_802_2_SIZE + HEADER_SNAP_SIZE;
2259                 if (nic->rxd_mode == RXD_MODE_1)
2260                         size += NET_IP_ALIGN;
2261                 else if (nic->rxd_mode == RXD_MODE_3B)
2262                         size = dev->mtu + ALIGN_SIZE + BUF0_LEN + 4;
2263                 else
2264                         size = l3l4hdr_size + ALIGN_SIZE + BUF0_LEN + 4;
2265
2266                 /* allocate skb */
2267                 skb = dev_alloc_skb(size);
2268                 if(!skb) {
2269                         DBG_PRINT(ERR_DBG, "%s: Out of ", dev->name);
2270                         DBG_PRINT(ERR_DBG, "memory to allocate SKBs\n");
2271                         if (first_rxdp) {
2272                                 wmb();
2273                                 first_rxdp->Control_1 |= RXD_OWN_XENA;
2274                         }
2275                         return -ENOMEM ;
2276                 }
2277                 if (nic->rxd_mode == RXD_MODE_1) {
2278                         /* 1 buffer mode - normal operation mode */
2279                         memset(rxdp, 0, sizeof(RxD1_t));
2280                         skb_reserve(skb, NET_IP_ALIGN);
2281                         ((RxD1_t*)rxdp)->Buffer0_ptr = pci_map_single
2282                             (nic->pdev, skb->data, size, PCI_DMA_FROMDEVICE);
2283                         rxdp->Control_2 &= (~MASK_BUFFER0_SIZE_1);
2284                         rxdp->Control_2 |= SET_BUFFER0_SIZE_1(size);
2285
2286                 } else if (nic->rxd_mode >= RXD_MODE_3A) {
2287                         /*
2288                          * 2 or 3 buffer mode -
2289                          * Both 2 buffer mode and 3 buffer mode provides 128
2290                          * byte aligned receive buffers.
2291                          *
2292                          * 3 buffer mode provides header separation where in
2293                          * skb->data will have L3/L4 headers where as
2294                          * skb_shinfo(skb)->frag_list will have the L4 data
2295                          * payload
2296                          */
2297
2298                         memset(rxdp, 0, sizeof(RxD3_t));
2299                         ba = &mac_control->rings[ring_no].ba[block_no][off];
2300                         skb_reserve(skb, BUF0_LEN);
2301                         tmp = (u64)(unsigned long) skb->data;
2302                         tmp += ALIGN_SIZE;
2303                         tmp &= ~ALIGN_SIZE;
2304                         skb->data = (void *) (unsigned long)tmp;
2305                         skb->tail = (void *) (unsigned long)tmp;
2306
2307                         ((RxD3_t*)rxdp)->Buffer0_ptr =
2308                             pci_map_single(nic->pdev, ba->ba_0, BUF0_LEN,
2309                                            PCI_DMA_FROMDEVICE);
2310                         rxdp->Control_2 = SET_BUFFER0_SIZE_3(BUF0_LEN);
2311                         if (nic->rxd_mode == RXD_MODE_3B) {
2312                                 /* Two buffer mode */
2313
2314                                 /*
2315                                  * Buffer2 will have L3/L4 header plus
2316                                  * L4 payload
2317                                  */
2318                                 ((RxD3_t*)rxdp)->Buffer2_ptr = pci_map_single
2319                                 (nic->pdev, skb->data, dev->mtu + 4,
2320                                                 PCI_DMA_FROMDEVICE);
2321
2322                                 /* Buffer-1 will be dummy buffer not used */
2323                                 ((RxD3_t*)rxdp)->Buffer1_ptr =
2324                                 pci_map_single(nic->pdev, ba->ba_1, BUF1_LEN,
2325                                         PCI_DMA_FROMDEVICE);
2326                                 rxdp->Control_2 |= SET_BUFFER1_SIZE_3(1);
2327                                 rxdp->Control_2 |= SET_BUFFER2_SIZE_3
2328                                                                 (dev->mtu + 4);
2329                         } else {
2330                                 /* 3 buffer mode */
2331                                 if (fill_rxd_3buf(nic, rxdp, skb) == -ENOMEM) {
2332                                         dev_kfree_skb_irq(skb);
2333                                         if (first_rxdp) {
2334                                                 wmb();
2335                                                 first_rxdp->Control_1 |=
2336                                                         RXD_OWN_XENA;
2337                                         }
2338                                         return -ENOMEM ;
2339                                 }
2340                         }
2341                         rxdp->Control_2 |= BIT(0);
2342                 }
2343                 rxdp->Host_Control = (unsigned long) (skb);
2344                 if (alloc_tab & ((1 << rxsync_frequency) - 1))
2345                         rxdp->Control_1 |= RXD_OWN_XENA;
2346                 off++;
2347                 if (off == (rxd_count[nic->rxd_mode] + 1))
2348                         off = 0;
2349                 mac_control->rings[ring_no].rx_curr_put_info.offset = off;
2350
2351                 rxdp->Control_2 |= SET_RXD_MARKER;
2352                 if (!(alloc_tab & ((1 << rxsync_frequency) - 1))) {
2353                         if (first_rxdp) {
2354                                 wmb();
2355                                 first_rxdp->Control_1 |= RXD_OWN_XENA;
2356                         }
2357                         first_rxdp = rxdp;
2358                 }
2359                 atomic_inc(&nic->rx_bufs_left[ring_no]);
2360                 alloc_tab++;
2361         }
2362
2363       end:
2364         /* Transfer ownership of first descriptor to adapter just before
2365          * exiting. Before that, use memory barrier so that ownership
2366          * and other fields are seen by adapter correctly.
2367          */
2368         if (first_rxdp) {
2369                 wmb();
2370                 first_rxdp->Control_1 |= RXD_OWN_XENA;
2371         }
2372
2373         return SUCCESS;
2374 }
2375
2376 static void free_rxd_blk(struct s2io_nic *sp, int ring_no, int blk)
2377 {
2378         struct net_device *dev = sp->dev;
2379         int j;
2380         struct sk_buff *skb;
2381         RxD_t *rxdp;
2382         mac_info_t *mac_control;
2383         buffAdd_t *ba;
2384
2385         mac_control = &sp->mac_control;
2386         for (j = 0 ; j < rxd_count[sp->rxd_mode]; j++) {
2387                 rxdp = mac_control->rings[ring_no].
2388                                 rx_blocks[blk].rxds[j].virt_addr;
2389                 skb = (struct sk_buff *)
2390                         ((unsigned long) rxdp->Host_Control);
2391                 if (!skb) {
2392                         continue;
2393                 }
2394                 if (sp->rxd_mode == RXD_MODE_1) {
2395                         pci_unmap_single(sp->pdev, (dma_addr_t)
2396                                  ((RxD1_t*)rxdp)->Buffer0_ptr,
2397                                  dev->mtu +
2398                                  HEADER_ETHERNET_II_802_3_SIZE
2399                                  + HEADER_802_2_SIZE +
2400                                  HEADER_SNAP_SIZE,
2401                                  PCI_DMA_FROMDEVICE);
2402                         memset(rxdp, 0, sizeof(RxD1_t));
2403                 } else if(sp->rxd_mode == RXD_MODE_3B) {
2404                         ba = &mac_control->rings[ring_no].
2405                                 ba[blk][j];
2406                         pci_unmap_single(sp->pdev, (dma_addr_t)
2407                                  ((RxD3_t*)rxdp)->Buffer0_ptr,
2408                                  BUF0_LEN,
2409                                  PCI_DMA_FROMDEVICE);
2410                         pci_unmap_single(sp->pdev, (dma_addr_t)
2411                                  ((RxD3_t*)rxdp)->Buffer1_ptr,
2412                                  BUF1_LEN,
2413                                  PCI_DMA_FROMDEVICE);
2414                         pci_unmap_single(sp->pdev, (dma_addr_t)
2415                                  ((RxD3_t*)rxdp)->Buffer2_ptr,
2416                                  dev->mtu + 4,
2417                                  PCI_DMA_FROMDEVICE);
2418                         memset(rxdp, 0, sizeof(RxD3_t));
2419                 } else {
2420                         pci_unmap_single(sp->pdev, (dma_addr_t)
2421                                 ((RxD3_t*)rxdp)->Buffer0_ptr, BUF0_LEN,
2422                                 PCI_DMA_FROMDEVICE);
2423                         pci_unmap_single(sp->pdev, (dma_addr_t)
2424                                 ((RxD3_t*)rxdp)->Buffer1_ptr,
2425                                 l3l4hdr_size + 4,
2426                                 PCI_DMA_FROMDEVICE);
2427                         pci_unmap_single(sp->pdev, (dma_addr_t)
2428                                 ((RxD3_t*)rxdp)->Buffer2_ptr, dev->mtu,
2429                                 PCI_DMA_FROMDEVICE);
2430                         memset(rxdp, 0, sizeof(RxD3_t));
2431                 }
2432                 dev_kfree_skb(skb);
2433                 atomic_dec(&sp->rx_bufs_left[ring_no]);
2434         }
2435 }
2436
2437 /**
2438  *  free_rx_buffers - Frees all Rx buffers
2439  *  @sp: device private variable.
2440  *  Description:
2441  *  This function will free all Rx buffers allocated by host.
2442  *  Return Value:
2443  *  NONE.
2444  */
2445
2446 static void free_rx_buffers(struct s2io_nic *sp)
2447 {
2448         struct net_device *dev = sp->dev;
2449         int i, blk = 0, buf_cnt = 0;
2450         mac_info_t *mac_control;
2451         struct config_param *config;
2452
2453         mac_control = &sp->mac_control;
2454         config = &sp->config;
2455
2456         for (i = 0; i < config->rx_ring_num; i++) {
2457                 for (blk = 0; blk < rx_ring_sz[i]; blk++)
2458                         free_rxd_blk(sp,i,blk);
2459
2460                 mac_control->rings[i].rx_curr_put_info.block_index = 0;
2461                 mac_control->rings[i].rx_curr_get_info.block_index = 0;
2462                 mac_control->rings[i].rx_curr_put_info.offset = 0;
2463                 mac_control->rings[i].rx_curr_get_info.offset = 0;
2464                 atomic_set(&sp->rx_bufs_left[i], 0);
2465                 DBG_PRINT(INIT_DBG, "%s:Freed 0x%x Rx Buffers on ring%d\n",
2466                           dev->name, buf_cnt, i);
2467         }
2468 }
2469
2470 /**
2471  * s2io_poll - Rx interrupt handler for NAPI support
2472  * @dev : pointer to the device structure.
2473  * @budget : The number of packets that were budgeted to be processed
2474  * during  one pass through the 'Poll" function.
2475  * Description:
2476  * Comes into picture only if NAPI support has been incorporated. It does
2477  * the same thing that rx_intr_handler does, but not in a interrupt context
2478  * also It will process only a given number of packets.
2479  * Return value:
2480  * 0 on success and 1 if there are No Rx packets to be processed.
2481  */
2482
2483 #if defined(CONFIG_S2IO_NAPI)
2484 static int s2io_poll(struct net_device *dev, int *budget)
2485 {
2486         nic_t *nic = dev->priv;
2487         int pkt_cnt = 0, org_pkts_to_process;
2488         mac_info_t *mac_control;
2489         struct config_param *config;
2490         XENA_dev_config_t __iomem *bar0 = nic->bar0;
2491         u64 val64;
2492         int i;
2493
2494         atomic_inc(&nic->isr_cnt);
2495         mac_control = &nic->mac_control;
2496         config = &nic->config;
2497
2498         nic->pkts_to_process = *budget;
2499         if (nic->pkts_to_process > dev->quota)
2500                 nic->pkts_to_process = dev->quota;
2501         org_pkts_to_process = nic->pkts_to_process;
2502
2503         val64 = readq(&bar0->rx_traffic_int);
2504         writeq(val64, &bar0->rx_traffic_int);
2505
2506         for (i = 0; i < config->rx_ring_num; i++) {
2507                 rx_intr_handler(&mac_control->rings[i]);
2508                 pkt_cnt = org_pkts_to_process - nic->pkts_to_process;
2509                 if (!nic->pkts_to_process) {
2510                         /* Quota for the current iteration has been met */
2511                         goto no_rx;
2512                 }
2513         }
2514         if (!pkt_cnt)
2515                 pkt_cnt = 1;
2516
2517         dev->quota -= pkt_cnt;
2518         *budget -= pkt_cnt;
2519         netif_rx_complete(dev);
2520
2521         for (i = 0; i < config->rx_ring_num; i++) {
2522                 if (fill_rx_buffers(nic, i) == -ENOMEM) {
2523                         DBG_PRINT(ERR_DBG, "%s:Out of memory", dev->name);
2524                         DBG_PRINT(ERR_DBG, " in Rx Poll!!\n");
2525                         break;
2526                 }
2527         }
2528         /* Re enable the Rx interrupts. */
2529         en_dis_able_nic_intrs(nic, RX_TRAFFIC_INTR, ENABLE_INTRS);
2530         atomic_dec(&nic->isr_cnt);
2531         return 0;
2532
2533 no_rx:
2534         dev->quota -= pkt_cnt;
2535         *budget -= pkt_cnt;
2536
2537         for (i = 0; i < config->rx_ring_num; i++) {
2538                 if (fill_rx_buffers(nic, i) == -ENOMEM) {
2539                         DBG_PRINT(ERR_DBG, "%s:Out of memory", dev->name);
2540                         DBG_PRINT(ERR_DBG, " in Rx Poll!!\n");
2541                         break;
2542                 }
2543         }
2544         atomic_dec(&nic->isr_cnt);
2545         return 1;
2546 }
2547 #endif
2548
2549 /**
2550  *  rx_intr_handler - Rx interrupt handler
2551  *  @nic: device private variable.
2552  *  Description:
2553  *  If the interrupt is because of a received frame or if the
2554  *  receive ring contains fresh as yet un-processed frames,this function is
2555  *  called. It picks out the RxD at which place the last Rx processing had
2556  *  stopped and sends the skb to the OSM's Rx handler and then increments
2557  *  the offset.
2558  *  Return Value:
2559  *  NONE.
2560  */
2561 static void rx_intr_handler(ring_info_t *ring_data)
2562 {
2563         nic_t *nic = ring_data->nic;
2564         struct net_device *dev = (struct net_device *) nic->dev;
2565         int get_block, put_block, put_offset;
2566         rx_curr_get_info_t get_info, put_info;
2567         RxD_t *rxdp;
2568         struct sk_buff *skb;
2569 #ifndef CONFIG_S2IO_NAPI
2570         int pkt_cnt = 0;
2571 #endif
2572         spin_lock(&nic->rx_lock);
2573         if (atomic_read(&nic->card_state) == CARD_DOWN) {
2574                 DBG_PRINT(INTR_DBG, "%s: %s going down for reset\n",
2575                           __FUNCTION__, dev->name);
2576                 spin_unlock(&nic->rx_lock);
2577                 return;
2578         }
2579
2580         get_info = ring_data->rx_curr_get_info;
2581         get_block = get_info.block_index;
2582         put_info = ring_data->rx_curr_put_info;
2583         put_block = put_info.block_index;
2584         rxdp = ring_data->rx_blocks[get_block].rxds[get_info.offset].virt_addr;
2585 #ifndef CONFIG_S2IO_NAPI
2586         spin_lock(&nic->put_lock);
2587         put_offset = ring_data->put_pos;
2588         spin_unlock(&nic->put_lock);
2589 #else
2590         put_offset = (put_block * (rxd_count[nic->rxd_mode] + 1)) +
2591                 put_info.offset;
2592 #endif
2593         while (RXD_IS_UP2DT(rxdp)) {
2594                 /* If your are next to put index then it's FIFO full condition */
2595                 if ((get_block == put_block) &&
2596                     (get_info.offset + 1) == put_info.offset) {
2597                         DBG_PRINT(ERR_DBG, "%s: Ring Full\n",dev->name);
2598                         break;
2599                 }
2600                 skb = (struct sk_buff *) ((unsigned long)rxdp->Host_Control);
2601                 if (skb == NULL) {
2602                         DBG_PRINT(ERR_DBG, "%s: The skb is ",
2603                                   dev->name);
2604                         DBG_PRINT(ERR_DBG, "Null in Rx Intr\n");
2605                         spin_unlock(&nic->rx_lock);
2606                         return;
2607                 }
2608                 if (nic->rxd_mode == RXD_MODE_1) {
2609                         pci_unmap_single(nic->pdev, (dma_addr_t)
2610                                  ((RxD1_t*)rxdp)->Buffer0_ptr,
2611                                  dev->mtu +
2612                                  HEADER_ETHERNET_II_802_3_SIZE +
2613                                  HEADER_802_2_SIZE +
2614                                  HEADER_SNAP_SIZE,
2615                                  PCI_DMA_FROMDEVICE);
2616                 } else if (nic->rxd_mode == RXD_MODE_3B) {
2617                         pci_unmap_single(nic->pdev, (dma_addr_t)
2618                                  ((RxD3_t*)rxdp)->Buffer0_ptr,
2619                                  BUF0_LEN, PCI_DMA_FROMDEVICE);
2620                         pci_unmap_single(nic->pdev, (dma_addr_t)
2621                                  ((RxD3_t*)rxdp)->Buffer1_ptr,
2622                                  BUF1_LEN, PCI_DMA_FROMDEVICE);
2623                         pci_unmap_single(nic->pdev, (dma_addr_t)
2624                                  ((RxD3_t*)rxdp)->Buffer2_ptr,
2625                                  dev->mtu + 4,
2626                                  PCI_DMA_FROMDEVICE);
2627                 } else {
2628                         pci_unmap_single(nic->pdev, (dma_addr_t)
2629                                          ((RxD3_t*)rxdp)->Buffer0_ptr, BUF0_LEN,
2630                                          PCI_DMA_FROMDEVICE);
2631                         pci_unmap_single(nic->pdev, (dma_addr_t)
2632                                          ((RxD3_t*)rxdp)->Buffer1_ptr,
2633                                          l3l4hdr_size + 4,
2634                                          PCI_DMA_FROMDEVICE);
2635                         pci_unmap_single(nic->pdev, (dma_addr_t)
2636                                          ((RxD3_t*)rxdp)->Buffer2_ptr,
2637                                          dev->mtu, PCI_DMA_FROMDEVICE);
2638                 }
2639                 rx_osm_handler(ring_data, rxdp);
2640                 get_info.offset++;
2641                 ring_data->rx_curr_get_info.offset = get_info.offset;
2642                 rxdp = ring_data->rx_blocks[get_block].
2643                                 rxds[get_info.offset].virt_addr;
2644                 if (get_info.offset == rxd_count[nic->rxd_mode]) {
2645                         get_info.offset = 0;
2646                         ring_data->rx_curr_get_info.offset = get_info.offset;
2647                         get_block++;
2648                         if (get_block == ring_data->block_count)
2649                                 get_block = 0;
2650                         ring_data->rx_curr_get_info.block_index = get_block;
2651                         rxdp = ring_data->rx_blocks[get_block].block_virt_addr;
2652                 }
2653
2654 #ifdef CONFIG_S2IO_NAPI
2655                 nic->pkts_to_process -= 1;
2656                 if (!nic->pkts_to_process)
2657                         break;
2658 #else
2659                 pkt_cnt++;
2660                 if ((indicate_max_pkts) && (pkt_cnt > indicate_max_pkts))
2661                         break;
2662 #endif
2663         }
2664         spin_unlock(&nic->rx_lock);
2665 }
2666
2667 /**
2668  *  tx_intr_handler - Transmit interrupt handler
2669  *  @nic : device private variable
2670  *  Description:
2671  *  If an interrupt was raised to indicate DMA complete of the
2672  *  Tx packet, this function is called. It identifies the last TxD
2673  *  whose buffer was freed and frees all skbs whose data have already
2674  *  DMA'ed into the NICs internal memory.
2675  *  Return Value:
2676  *  NONE
2677  */
2678
2679 static void tx_intr_handler(fifo_info_t *fifo_data)
2680 {
2681         nic_t *nic = fifo_data->nic;
2682         struct net_device *dev = (struct net_device *) nic->dev;
2683         tx_curr_get_info_t get_info, put_info;
2684         struct sk_buff *skb;
2685         TxD_t *txdlp;
2686
2687         get_info = fifo_data->tx_curr_get_info;
2688         put_info = fifo_data->tx_curr_put_info;
2689         txdlp = (TxD_t *) fifo_data->list_info[get_info.offset].
2690             list_virt_addr;
2691         while ((!(txdlp->Control_1 & TXD_LIST_OWN_XENA)) &&
2692                (get_info.offset != put_info.offset) &&
2693                (txdlp->Host_Control)) {
2694                 /* Check for TxD errors */
2695                 if (txdlp->Control_1 & TXD_T_CODE) {
2696                         unsigned long long err;
2697                         err = txdlp->Control_1 & TXD_T_CODE;
2698                         if ((err >> 48) == 0xA) {
2699                                 DBG_PRINT(TX_DBG, "TxD returned due \
2700 to loss of link\n");
2701                         }
2702                         else {
2703                                 DBG_PRINT(ERR_DBG, "***TxD error \
2704 %llx\n", err);
2705                         }
2706                 }
2707
2708                 skb = s2io_txdl_getskb(fifo_data, txdlp, get_info.offset);
2709                 if (skb == NULL) {
2710                         DBG_PRINT(ERR_DBG, "%s: Null skb ",
2711                         __FUNCTION__);
2712                         DBG_PRINT(ERR_DBG, "in Tx Free Intr\n");
2713                         return;
2714                 }
2715
2716                 /* Updating the statistics block */
2717                 nic->stats.tx_bytes += skb->len;
2718                 dev_kfree_skb_irq(skb);
2719
2720                 get_info.offset++;
2721                 get_info.offset %= get_info.fifo_len + 1;
2722                 txdlp = (TxD_t *) fifo_data->list_info
2723                     [get_info.offset].list_virt_addr;
2724                 fifo_data->tx_curr_get_info.offset =
2725                     get_info.offset;
2726         }
2727
2728         spin_lock(&nic->tx_lock);
2729         if (netif_queue_stopped(dev))
2730                 netif_wake_queue(dev);
2731         spin_unlock(&nic->tx_lock);
2732 }
2733
2734 /**
2735  *  alarm_intr_handler - Alarm Interrrupt handler
2736  *  @nic: device private variable
2737  *  Description: If the interrupt was neither because of Rx packet or Tx
2738  *  complete, this function is called. If the interrupt was to indicate
2739  *  a loss of link, the OSM link status handler is invoked for any other
2740  *  alarm interrupt the block that raised the interrupt is displayed
2741  *  and a H/W reset is issued.
2742  *  Return Value:
2743  *  NONE
2744 */
2745
2746 static void alarm_intr_handler(struct s2io_nic *nic)
2747 {
2748         struct net_device *dev = (struct net_device *) nic->dev;
2749         XENA_dev_config_t __iomem *bar0 = nic->bar0;
2750         register u64 val64 = 0, err_reg = 0;
2751
2752         /* Handling link status change error Intr */
2753         if (s2io_link_fault_indication(nic) == MAC_RMAC_ERR_TIMER) {
2754                 err_reg = readq(&bar0->mac_rmac_err_reg);
2755                 writeq(err_reg, &bar0->mac_rmac_err_reg);
2756                 if (err_reg & RMAC_LINK_STATE_CHANGE_INT) {
2757                         schedule_work(&nic->set_link_task);
2758                 }
2759         }
2760
2761         /* Handling Ecc errors */
2762         val64 = readq(&bar0->mc_err_reg);
2763         writeq(val64, &bar0->mc_err_reg);
2764         if (val64 & (MC_ERR_REG_ECC_ALL_SNG | MC_ERR_REG_ECC_ALL_DBL)) {
2765                 if (val64 & MC_ERR_REG_ECC_ALL_DBL) {
2766                         nic->mac_control.stats_info->sw_stat.
2767                                 double_ecc_errs++;
2768                         DBG_PRINT(INIT_DBG, "%s: Device indicates ",
2769                                   dev->name);
2770                         DBG_PRINT(INIT_DBG, "double ECC error!!\n");
2771                         if (nic->device_type != XFRAME_II_DEVICE) {
2772                                 /* Reset XframeI only if critical error */
2773                                 if (val64 & (MC_ERR_REG_MIRI_ECC_DB_ERR_0 |
2774                                              MC_ERR_REG_MIRI_ECC_DB_ERR_1)) {
2775                                         netif_stop_queue(dev);
2776                                         schedule_work(&nic->rst_timer_task);
2777                                 }
2778                         }
2779                 } else {
2780                         nic->mac_control.stats_info->sw_stat.
2781                                 single_ecc_errs++;
2782                 }
2783         }
2784
2785         /* In case of a serious error, the device will be Reset. */
2786         val64 = readq(&bar0->serr_source);
2787         if (val64 & SERR_SOURCE_ANY) {
2788                 DBG_PRINT(ERR_DBG, "%s: Device indicates ", dev->name);
2789                 DBG_PRINT(ERR_DBG, "serious error %llx!!\n",
2790                           (unsigned long long)val64);
2791                 netif_stop_queue(dev);
2792                 schedule_work(&nic->rst_timer_task);
2793         }
2794
2795         /*
2796          * Also as mentioned in the latest Errata sheets if the PCC_FB_ECC
2797          * Error occurs, the adapter will be recycled by disabling the
2798          * adapter enable bit and enabling it again after the device
2799          * becomes Quiescent.
2800          */
2801         val64 = readq(&bar0->pcc_err_reg);
2802         writeq(val64, &bar0->pcc_err_reg);
2803         if (val64 & PCC_FB_ECC_DB_ERR) {
2804                 u64 ac = readq(&bar0->adapter_control);
2805                 ac &= ~(ADAPTER_CNTL_EN);
2806                 writeq(ac, &bar0->adapter_control);
2807                 ac = readq(&bar0->adapter_control);
2808                 schedule_work(&nic->set_link_task);
2809         }
2810
2811         /* Other type of interrupts are not being handled now,  TODO */
2812 }
2813
2814 /**
2815  *  wait_for_cmd_complete - waits for a command to complete.
2816  *  @sp : private member of the device structure, which is a pointer to the
2817  *  s2io_nic structure.
2818  *  Description: Function that waits for a command to Write into RMAC
2819  *  ADDR DATA registers to be completed and returns either success or
2820  *  error depending on whether the command was complete or not.
2821  *  Return value:
2822  *   SUCCESS on success and FAILURE on failure.
2823  */
2824
2825 static int wait_for_cmd_complete(nic_t * sp)
2826 {
2827         XENA_dev_config_t __iomem *bar0 = sp->bar0;
2828         int ret = FAILURE, cnt = 0;
2829         u64 val64;
2830
2831         while (TRUE) {
2832                 val64 = readq(&bar0->rmac_addr_cmd_mem);
2833                 if (!(val64 & RMAC_ADDR_CMD_MEM_STROBE_CMD_EXECUTING)) {
2834                         ret = SUCCESS;
2835                         break;
2836                 }
2837                 msleep(50);
2838                 if (cnt++ > 10)
2839                         break;
2840         }
2841
2842         return ret;
2843 }
2844
2845 /**
2846  *  s2io_reset - Resets the card.
2847  *  @sp : private member of the device structure.
2848  *  Description: Function to Reset the card. This function then also
2849  *  restores the previously saved PCI configuration space registers as
2850  *  the card reset also resets the configuration space.
2851  *  Return value:
2852  *  void.
2853  */
2854
2855 void s2io_reset(nic_t * sp)
2856 {
2857         XENA_dev_config_t __iomem *bar0 = sp->bar0;
2858         u64 val64;
2859         u16 subid, pci_cmd;
2860
2861         /* Back up  the PCI-X CMD reg, dont want to lose MMRBC, OST settings */
2862         pci_read_config_word(sp->pdev, PCIX_COMMAND_REGISTER, &(pci_cmd));
2863
2864         val64 = SW_RESET_ALL;
2865         writeq(val64, &bar0->sw_reset);
2866
2867         /*
2868          * At this stage, if the PCI write is indeed completed, the
2869          * card is reset and so is the PCI Config space of the device.
2870          * So a read cannot be issued at this stage on any of the
2871          * registers to ensure the write into "sw_reset" register
2872          * has gone through.
2873          * Question: Is there any system call that will explicitly force
2874          * all the write commands still pending on the bus to be pushed
2875          * through?
2876          * As of now I'am just giving a 250ms delay and hoping that the
2877          * PCI write to sw_reset register is done by this time.
2878          */
2879         msleep(250);
2880
2881         /* Restore the PCI state saved during initialization. */
2882         pci_restore_state(sp->pdev);
2883         pci_write_config_word(sp->pdev, PCIX_COMMAND_REGISTER,
2884                                      pci_cmd);
2885         s2io_init_pci(sp);
2886
2887         msleep(250);
2888
2889         /* Set swapper to enable I/O register access */
2890         s2io_set_swapper(sp);
2891
2892         /* Restore the MSIX table entries from local variables */
2893         restore_xmsi_data(sp);
2894
2895         /* Clear certain PCI/PCI-X fields after reset */
2896         if (sp->device_type == XFRAME_II_DEVICE) {
2897                 /* Clear parity err detect bit */
2898                 pci_write_config_word(sp->pdev, PCI_STATUS, 0x8000);
2899
2900                 /* Clearing PCIX Ecc status register */
2901                 pci_write_config_dword(sp->pdev, 0x68, 0x7C);
2902
2903                 /* Clearing PCI_STATUS error reflected here */
2904                 writeq(BIT(62), &bar0->txpic_int_reg);
2905         }
2906
2907         /* Reset device statistics maintained by OS */
2908         memset(&sp->stats, 0, sizeof (struct net_device_stats));
2909
2910         /* SXE-002: Configure link and activity LED to turn it off */
2911         subid = sp->pdev->subsystem_device;
2912         if (((subid & 0xFF) >= 0x07) &&
2913             (sp->device_type == XFRAME_I_DEVICE)) {
2914                 val64 = readq(&bar0->gpio_control);
2915                 val64 |= 0x0000800000000000ULL;
2916                 writeq(val64, &bar0->gpio_control);
2917                 val64 = 0x0411040400000000ULL;
2918                 writeq(val64, (void __iomem *)bar0 + 0x2700);
2919         }
2920
2921         /*
2922          * Clear spurious ECC interrupts that would have occured on
2923          * XFRAME II cards after reset.
2924          */
2925         if (sp->device_type == XFRAME_II_DEVICE) {
2926                 val64 = readq(&bar0->pcc_err_reg);
2927                 writeq(val64, &bar0->pcc_err_reg);
2928         }
2929
2930         sp->device_enabled_once = FALSE;
2931 }
2932
2933 /**
2934  *  s2io_set_swapper - to set the swapper controle on the card
2935  *  @sp : private member of the device structure,
2936  *  pointer to the s2io_nic structure.
2937  *  Description: Function to set the swapper control on the card
2938  *  correctly depending on the 'endianness' of the system.
2939  *  Return value:
2940  *  SUCCESS on success and FAILURE on failure.
2941  */
2942
2943 int s2io_set_swapper(nic_t * sp)
2944 {
2945         struct net_device *dev = sp->dev;
2946         XENA_dev_config_t __iomem *bar0 = sp->bar0;
2947         u64 val64, valt, valr;
2948
2949         /*
2950          * Set proper endian settings and verify the same by reading
2951          * the PIF Feed-back register.
2952          */
2953
2954         val64 = readq(&bar0->pif_rd_swapper_fb);
2955         if (val64 != 0x0123456789ABCDEFULL) {
2956                 int i = 0;
2957                 u64 value[] = { 0xC30000C3C30000C3ULL,   /* FE=1, SE=1 */
2958                                 0x8100008181000081ULL,  /* FE=1, SE=0 */
2959                                 0x4200004242000042ULL,  /* FE=0, SE=1 */
2960                                 0};                     /* FE=0, SE=0 */
2961
2962                 while(i<4) {
2963                         writeq(value[i], &bar0->swapper_ctrl);
2964                         val64 = readq(&bar0->pif_rd_swapper_fb);
2965                         if (val64 == 0x0123456789ABCDEFULL)
2966                                 break;
2967                         i++;
2968                 }
2969                 if (i == 4) {
2970                         DBG_PRINT(ERR_DBG, "%s: Endian settings are wrong, ",
2971                                 dev->name);
2972                         DBG_PRINT(ERR_DBG, "feedback read %llx\n",
2973                                 (unsigned long long) val64);
2974                         return FAILURE;
2975                 }
2976                 valr = value[i];
2977         } else {
2978                 valr = readq(&bar0->swapper_ctrl);
2979         }
2980
2981         valt = 0x0123456789ABCDEFULL;
2982         writeq(valt, &bar0->xmsi_address);
2983         val64 = readq(&bar0->xmsi_address);
2984
2985         if(val64 != valt) {
2986                 int i = 0;
2987                 u64 value[] = { 0x00C3C30000C3C300ULL,  /* FE=1, SE=1 */
2988                                 0x0081810000818100ULL,  /* FE=1, SE=0 */
2989                                 0x0042420000424200ULL,  /* FE=0, SE=1 */
2990                                 0};                     /* FE=0, SE=0 */
2991
2992                 while(i<4) {
2993                         writeq((value[i] | valr), &bar0->swapper_ctrl);
2994                         writeq(valt, &bar0->xmsi_address);
2995                         val64 = readq(&bar0->xmsi_address);
2996                         if(val64 == valt)
2997                                 break;
2998                         i++;
2999                 }
3000                 if(i == 4) {
3001                         unsigned long long x = val64;
3002                         DBG_PRINT(ERR_DBG, "Write failed, Xmsi_addr ");
3003                         DBG_PRINT(ERR_DBG, "reads:0x%llx\n", x);
3004                         return FAILURE;
3005                 }
3006         }
3007         val64 = readq(&bar0->swapper_ctrl);
3008         val64 &= 0xFFFF000000000000ULL;
3009
3010 #ifdef  __BIG_ENDIAN
3011         /*
3012          * The device by default set to a big endian format, so a
3013          * big endian driver need not set anything.
3014          */
3015         val64 |= (SWAPPER_CTRL_TXP_FE |
3016                  SWAPPER_CTRL_TXP_SE |
3017                  SWAPPER_CTRL_TXD_R_FE |
3018                  SWAPPER_CTRL_TXD_W_FE |
3019                  SWAPPER_CTRL_TXF_R_FE |
3020                  SWAPPER_CTRL_RXD_R_FE |
3021                  SWAPPER_CTRL_RXD_W_FE |
3022                  SWAPPER_CTRL_RXF_W_FE |
3023                  SWAPPER_CTRL_XMSI_FE |
3024                  SWAPPER_CTRL_STATS_FE | SWAPPER_CTRL_STATS_SE);
3025         if (sp->intr_type == INTA)
3026                 val64 |= SWAPPER_CTRL_XMSI_SE;
3027         writeq(val64, &bar0->swapper_ctrl);
3028 #else
3029         /*
3030          * Initially we enable all bits to make it accessible by the
3031          * driver, then we selectively enable only those bits that
3032          * we want to set.
3033          */
3034         val64 |= (SWAPPER_CTRL_TXP_FE |
3035                  SWAPPER_CTRL_TXP_SE |
3036                  SWAPPER_CTRL_TXD_R_FE |
3037                  SWAPPER_CTRL_TXD_R_SE |
3038                  SWAPPER_CTRL_TXD_W_FE |
3039                  SWAPPER_CTRL_TXD_W_SE |
3040                  SWAPPER_CTRL_TXF_R_FE |
3041                  SWAPPER_CTRL_RXD_R_FE |
3042                  SWAPPER_CTRL_RXD_R_SE |
3043                  SWAPPER_CTRL_RXD_W_FE |
3044                  SWAPPER_CTRL_RXD_W_SE |
3045                  SWAPPER_CTRL_RXF_W_FE |
3046                  SWAPPER_CTRL_XMSI_FE |
3047                  SWAPPER_CTRL_STATS_FE | SWAPPER_CTRL_STATS_SE);
3048         if (sp->intr_type == INTA)
3049                 val64 |= SWAPPER_CTRL_XMSI_SE;
3050         writeq(val64, &bar0->swapper_ctrl);
3051 #endif
3052         val64 = readq(&bar0->swapper_ctrl);
3053
3054         /*
3055          * Verifying if endian settings are accurate by reading a
3056          * feedback register.
3057          */
3058         val64 = readq(&bar0->pif_rd_swapper_fb);
3059         if (val64 != 0x0123456789ABCDEFULL) {
3060                 /* Endian settings are incorrect, calls for another dekko. */
3061                 DBG_PRINT(ERR_DBG, "%s: Endian settings are wrong, ",
3062                           dev->name);
3063                 DBG_PRINT(ERR_DBG, "feedback read %llx\n",
3064                           (unsigned long long) val64);
3065                 return FAILURE;
3066         }
3067
3068         return SUCCESS;
3069 }
3070
3071 static int wait_for_msix_trans(nic_t *nic, int i)
3072 {
3073         XENA_dev_config_t __iomem *bar0 = nic->bar0;
3074         u64 val64;
3075         int ret = 0, cnt = 0;
3076
3077         do {
3078                 val64 = readq(&bar0->xmsi_access);
3079                 if (!(val64 & BIT(15)))
3080                         break;
3081                 mdelay(1);
3082                 cnt++;
3083         } while(cnt < 5);
3084         if (cnt == 5) {
3085                 DBG_PRINT(ERR_DBG, "XMSI # %d Access failed\n", i);
3086                 ret = 1;
3087         }
3088
3089         return ret;
3090 }
3091
3092 void restore_xmsi_data(nic_t *nic)
3093 {
3094         XENA_dev_config_t __iomem *bar0 = nic->bar0;
3095         u64 val64;
3096         int i;
3097
3098         for (i=0; i< MAX_REQUESTED_MSI_X; i++) {
3099                 writeq(nic->msix_info[i].addr, &bar0->xmsi_address);
3100                 writeq(nic->msix_info[i].data, &bar0->xmsi_data);
3101                 val64 = (BIT(7) | BIT(15) | vBIT(i, 26, 6));
3102                 writeq(val64, &bar0->xmsi_access);
3103                 if (wait_for_msix_trans(nic, i)) {
3104                         DBG_PRINT(ERR_DBG, "failed in %s\n", __FUNCTION__);
3105                         continue;
3106                 }
3107         }
3108 }
3109
3110 static void store_xmsi_data(nic_t *nic)
3111 {
3112         XENA_dev_config_t __iomem *bar0 = nic->bar0;
3113         u64 val64, addr, data;
3114         int i;
3115
3116         /* Store and display */
3117         for (i=0; i< MAX_REQUESTED_MSI_X; i++) {
3118                 val64 = (BIT(15) | vBIT(i, 26, 6));
3119                 writeq(val64, &bar0->xmsi_access);
3120                 if (wait_for_msix_trans(nic, i)) {
3121                         DBG_PRINT(ERR_DBG, "failed in %s\n", __FUNCTION__);
3122                         continue;
3123                 }
3124                 addr = readq(&bar0->xmsi_address);
3125                 data = readq(&bar0->xmsi_data);
3126                 if (addr && data) {
3127                         nic->msix_info[i].addr = addr;
3128                         nic->msix_info[i].data = data;
3129                 }
3130         }
3131 }
3132
3133 int s2io_enable_msi(nic_t *nic)
3134 {
3135         XENA_dev_config_t __iomem *bar0 = nic->bar0;
3136         u16 msi_ctrl, msg_val;
3137         struct config_param *config = &nic->config;
3138         struct net_device *dev = nic->dev;
3139         u64 val64, tx_mat, rx_mat;
3140         int i, err;
3141
3142         val64 = readq(&bar0->pic_control);
3143         val64 &= ~BIT(1);
3144         writeq(val64, &bar0->pic_control);
3145
3146         err = pci_enable_msi(nic->pdev);
3147         if (err) {
3148                 DBG_PRINT(ERR_DBG, "%s: enabling MSI failed\n",
3149                           nic->dev->name);
3150                 return err;
3151         }
3152
3153         /*
3154          * Enable MSI and use MSI-1 in stead of the standard MSI-0
3155          * for interrupt handling.
3156          */
3157         pci_read_config_word(nic->pdev, 0x4c, &msg_val);
3158         msg_val ^= 0x1;
3159         pci_write_config_word(nic->pdev, 0x4c, msg_val);
3160         pci_read_config_word(nic->pdev, 0x4c, &msg_val);
3161
3162         pci_read_config_word(nic->pdev, 0x42, &msi_ctrl);
3163         msi_ctrl |= 0x10;
3164         pci_write_config_word(nic->pdev, 0x42, msi_ctrl);
3165
3166         /* program MSI-1 into all usable Tx_Mat and Rx_Mat fields */
3167         tx_mat = readq(&bar0->tx_mat0_n[0]);
3168         for (i=0; i<config->tx_fifo_num; i++) {
3169                 tx_mat |= TX_MAT_SET(i, 1);
3170         }
3171         writeq(tx_mat, &bar0->tx_mat0_n[0]);
3172
3173         rx_mat = readq(&bar0->rx_mat);
3174         for (i=0; i<config->rx_ring_num; i++) {
3175                 rx_mat |= RX_MAT_SET(i, 1);
3176         }
3177         writeq(rx_mat, &bar0->rx_mat);
3178
3179         dev->irq = nic->pdev->irq;
3180         return 0;
3181 }
3182
3183 int s2io_enable_msi_x(nic_t *nic)
3184 {
3185         XENA_dev_config_t __iomem *bar0 = nic->bar0;
3186         u64 tx_mat, rx_mat;
3187         u16 msi_control; /* Temp variable */
3188         int ret, i, j, msix_indx = 1;
3189
3190         nic->entries = kmalloc(MAX_REQUESTED_MSI_X * sizeof(struct msix_entry),
3191                                GFP_KERNEL);
3192         if (nic->entries == NULL) {
3193                 DBG_PRINT(ERR_DBG, "%s: Memory allocation failed\n", __FUNCTION__);
3194                 return -ENOMEM;
3195         }
3196         memset(nic->entries, 0, MAX_REQUESTED_MSI_X * sizeof(struct msix_entry));
3197
3198         nic->s2io_entries =
3199                 kmalloc(MAX_REQUESTED_MSI_X * sizeof(struct s2io_msix_entry),
3200                                    GFP_KERNEL);
3201         if (nic->s2io_entries == NULL) {
3202                 DBG_PRINT(ERR_DBG, "%s: Memory allocation failed\n", __FUNCTION__);
3203                 kfree(nic->entries);
3204                 return -ENOMEM;
3205         }
3206         memset(nic->s2io_entries, 0,
3207                MAX_REQUESTED_MSI_X * sizeof(struct s2io_msix_entry));
3208
3209         for (i=0; i< MAX_REQUESTED_MSI_X; i++) {
3210                 nic->entries[i].entry = i;
3211                 nic->s2io_entries[i].entry = i;
3212                 nic->s2io_entries[i].arg = NULL;
3213                 nic->s2io_entries[i].in_use = 0;
3214         }
3215
3216         tx_mat = readq(&bar0->tx_mat0_n[0]);
3217         for (i=0; i<nic->config.tx_fifo_num; i++, msix_indx++) {
3218                 tx_mat |= TX_MAT_SET(i, msix_indx);
3219                 nic->s2io_entries[msix_indx].arg = &nic->mac_control.fifos[i];
3220                 nic->s2io_entries[msix_indx].type = MSIX_FIFO_TYPE;
3221                 nic->s2io_entries[msix_indx].in_use = MSIX_FLG;
3222         }
3223         writeq(tx_mat, &bar0->tx_mat0_n[0]);
3224
3225         if (!nic->config.bimodal) {
3226                 rx_mat = readq(&bar0->rx_mat);
3227                 for (j=0; j<nic->config.rx_ring_num; j++, msix_indx++) {
3228                         rx_mat |= RX_MAT_SET(j, msix_indx);
3229                         nic->s2io_entries[msix_indx].arg = &nic->mac_control.rings[j];
3230                         nic->s2io_entries[msix_indx].type = MSIX_RING_TYPE;
3231                         nic->s2io_entries[msix_indx].in_use = MSIX_FLG;
3232                 }
3233                 writeq(rx_mat, &bar0->rx_mat);
3234         } else {
3235                 tx_mat = readq(&bar0->tx_mat0_n[7]);
3236                 for (j=0; j<nic->config.rx_ring_num; j++, msix_indx++) {
3237                         tx_mat |= TX_MAT_SET(i, msix_indx);
3238                         nic->s2io_entries[msix_indx].arg = &nic->mac_control.rings[j];
3239                         nic->s2io_entries[msix_indx].type = MSIX_RING_TYPE;
3240                         nic->s2io_entries[msix_indx].in_use = MSIX_FLG;
3241                 }
3242                 writeq(tx_mat, &bar0->tx_mat0_n[7]);
3243         }
3244
3245         ret = pci_enable_msix(nic->pdev, nic->entries, MAX_REQUESTED_MSI_X);
3246         if (ret) {
3247                 DBG_PRINT(ERR_DBG, "%s: Enabling MSIX failed\n", nic->dev->name);
3248                 kfree(nic->entries);
3249                 kfree(nic->s2io_entries);
3250                 nic->entries = NULL;
3251                 nic->s2io_entries = NULL;
3252                 return -ENOMEM;
3253         }
3254
3255         /*
3256          * To enable MSI-X, MSI also needs to be enabled, due to a bug
3257          * in the herc NIC. (Temp change, needs to be removed later)
3258          */
3259         pci_read_config_word(nic->pdev, 0x42, &msi_control);
3260         msi_control |= 0x1; /* Enable MSI */
3261         pci_write_config_word(nic->pdev, 0x42, msi_control);
3262
3263         return 0;
3264 }
3265
3266 /* ********************************************************* *
3267  * Functions defined below concern the OS part of the driver *
3268  * ********************************************************* */
3269
3270 /**
3271  *  s2io_open - open entry point of the driver
3272  *  @dev : pointer to the device structure.
3273  *  Description:
3274  *  This function is the open entry point of the driver. It mainly calls a
3275  *  function to allocate Rx buffers and inserts them into the buffer
3276  *  descriptors and then enables the Rx part of the NIC.
3277  *  Return value:
3278  *  0 on success and an appropriate (-)ve integer as defined in errno.h
3279  *   file on failure.
3280  */
3281
3282 static int s2io_open(struct net_device *dev)
3283 {
3284         nic_t *sp = dev->priv;
3285         int err = 0;
3286         int i;
3287         u16 msi_control; /* Temp variable */
3288
3289         /*
3290          * Make sure you have link off by default every time
3291          * Nic is initialized
3292          */
3293         netif_carrier_off(dev);
3294         sp->last_link_state = 0;
3295
3296         /* Initialize H/W and enable interrupts */
3297         if (s2io_card_up(sp)) {
3298                 DBG_PRINT(ERR_DBG, "%s: H/W initialization failed\n",
3299                           dev->name);
3300                 err = -ENODEV;
3301                 goto hw_init_failed;
3302         }
3303
3304         /* Store the values of the MSIX table in the nic_t structure */
3305         store_xmsi_data(sp);
3306
3307         /* After proper initialization of H/W, register ISR */
3308         if (sp->intr_type == MSI) {
3309                 err = request_irq((int) sp->pdev->irq, s2io_msi_handle,
3310                         SA_SHIRQ, sp->name, dev);
3311                 if (err) {
3312                         DBG_PRINT(ERR_DBG, "%s: MSI registration \
3313 failed\n", dev->name);
3314                         goto isr_registration_failed;
3315                 }
3316         }
3317         if (sp->intr_type == MSI_X) {
3318                 for (i=1; (sp->s2io_entries[i].in_use == MSIX_FLG); i++) {
3319                         if (sp->s2io_entries[i].type == MSIX_FIFO_TYPE) {
3320                                 sprintf(sp->desc1, "%s:MSI-X-%d-TX",
3321                                         dev->name, i);
3322                                 err = request_irq(sp->entries[i].vector,
3323                                           s2io_msix_fifo_handle, 0, sp->desc1,
3324                                           sp->s2io_entries[i].arg);
3325                                 DBG_PRINT(ERR_DBG, "%s @ 0x%llx\n", sp->desc1,
3326                                     (unsigned long long)sp->msix_info[i].addr);
3327                         } else {
3328                                 sprintf(sp->desc2, "%s:MSI-X-%d-RX",
3329                                         dev->name, i);
3330                                 err = request_irq(sp->entries[i].vector,
3331                                           s2io_msix_ring_handle, 0, sp->desc2,
3332                                           sp->s2io_entries[i].arg);
3333                                 DBG_PRINT(ERR_DBG, "%s @ 0x%llx\n", sp->desc2,
3334                                      (unsigned long long)sp->msix_info[i].addr);
3335                         }
3336                         if (err) {
3337                                 DBG_PRINT(ERR_DBG, "%s: MSI-X-%d registration \
3338 failed\n", dev->name, i);
3339                                 DBG_PRINT(ERR_DBG, "Returned: %d\n", err);
3340                                 goto isr_registration_failed;
3341                         }
3342                         sp->s2io_entries[i].in_use = MSIX_REGISTERED_SUCCESS;
3343                 }
3344         }
3345         if (sp->intr_type == INTA) {
3346                 err = request_irq((int) sp->pdev->irq, s2io_isr, SA_SHIRQ,
3347                                 sp->name, dev);
3348                 if (err) {
3349                         DBG_PRINT(ERR_DBG, "%s: ISR registration failed\n",
3350                                   dev->name);
3351                         goto isr_registration_failed;
3352                 }
3353         }
3354
3355         if (s2io_set_mac_addr(dev, dev->dev_addr) == FAILURE) {
3356                 DBG_PRINT(ERR_DBG, "Set Mac Address Failed\n");
3357                 err = -ENODEV;
3358                 goto setting_mac_address_failed;
3359         }
3360
3361         netif_start_queue(dev);
3362         return 0;
3363
3364 setting_mac_address_failed:
3365         if (sp->intr_type != MSI_X)
3366                 free_irq(sp->pdev->irq, dev);
3367 isr_registration_failed:
3368         del_timer_sync(&sp->alarm_timer);
3369         if (sp->intr_type == MSI_X) {
3370                 if (sp->device_type == XFRAME_II_DEVICE) {
3371                         for (i=1; (sp->s2io_entries[i].in_use ==
3372                                 MSIX_REGISTERED_SUCCESS); i++) {
3373                                 int vector = sp->entries[i].vector;
3374                                 void *arg = sp->s2io_entries[i].arg;
3375
3376                                 free_irq(vector, arg);
3377                         }
3378                         pci_disable_msix(sp->pdev);
3379
3380                         /* Temp */
3381                         pci_read_config_word(sp->pdev, 0x42, &msi_control);
3382                         msi_control &= 0xFFFE; /* Disable MSI */
3383                         pci_write_config_word(sp->pdev, 0x42, msi_control);
3384                 }
3385         }
3386         else if (sp->intr_type == MSI)
3387                 pci_disable_msi(sp->pdev);
3388         s2io_reset(sp);
3389 hw_init_failed:
3390         if (sp->intr_type == MSI_X) {
3391                 if (sp->entries)
3392                         kfree(sp->entries);
3393                 if (sp->s2io_entries)
3394                         kfree(sp->s2io_entries);
3395         }
3396         return err;
3397 }
3398
3399 /**
3400  *  s2io_close -close entry point of the driver
3401  *  @dev : device pointer.
3402  *  Description:
3403  *  This is the stop entry point of the driver. It needs to undo exactly
3404  *  whatever was done by the open entry point,thus it's usually referred to
3405  *  as the close function.Among other things this function mainly stops the
3406  *  Rx side of the NIC and frees all the Rx buffers in the Rx rings.
3407  *  Return value:
3408  *  0 on success and an appropriate (-)ve integer as defined in errno.h
3409  *  file on failure.
3410  */
3411
3412 static int s2io_close(struct net_device *dev)
3413 {
3414         nic_t *sp = dev->priv;
3415         int i;
3416         u16 msi_control;
3417
3418         flush_scheduled_work();
3419         netif_stop_queue(dev);
3420         /* Reset card, kill tasklet and free Tx and Rx buffers. */
3421         s2io_card_down(sp);
3422
3423         if (sp->intr_type == MSI_X) {
3424                 if (sp->device_type == XFRAME_II_DEVICE) {
3425                         for (i=1; (sp->s2io_entries[i].in_use ==
3426                                         MSIX_REGISTERED_SUCCESS); i++) {
3427                                 int vector = sp->entries[i].vector;
3428                                 void *arg = sp->s2io_entries[i].arg;
3429
3430                                 free_irq(vector, arg);
3431                         }
3432                         pci_read_config_word(sp->pdev, 0x42, &msi_control);
3433                         msi_control &= 0xFFFE; /* Disable MSI */
3434                         pci_write_config_word(sp->pdev, 0x42, msi_control);
3435
3436                         pci_disable_msix(sp->pdev);
3437                 }
3438         }
3439         else {
3440                 free_irq(sp->pdev->irq, dev);
3441                 if (sp->intr_type == MSI)
3442                         pci_disable_msi(sp->pdev);
3443         }
3444         sp->device_close_flag = TRUE;   /* Device is shut down. */
3445         return 0;
3446 }
3447
3448 /**
3449  *  s2io_xmit - Tx entry point of te driver
3450  *  @skb : the socket buffer containing the Tx data.
3451  *  @dev : device pointer.
3452  *  Description :
3453  *  This function is the Tx entry point of the driver. S2IO NIC supports
3454  *  certain protocol assist features on Tx side, namely  CSO, S/G, LSO.
3455  *  NOTE: when device cant queue the pkt,just the trans_start variable will
3456  *  not be upadted.
3457  *  Return value:
3458  *  0 on success & 1 on failure.
3459  */
3460
3461 static int s2io_xmit(struct sk_buff *skb, struct net_device *dev)
3462 {
3463         nic_t *sp = dev->priv;
3464         u16 frg_cnt, frg_len, i, queue, queue_len, put_off, get_off;
3465         register u64 val64;
3466         TxD_t *txdp;
3467         TxFIFO_element_t __iomem *tx_fifo;
3468         unsigned long flags;
3469 #ifdef NETIF_F_TSO
3470         int mss;
3471 #endif
3472         u16 vlan_tag = 0;
3473         int vlan_priority = 0;
3474         mac_info_t *mac_control;
3475         struct config_param *config;
3476
3477         mac_control = &sp->mac_control;
3478         config = &sp->config;
3479
3480         DBG_PRINT(TX_DBG, "%s: In Neterion Tx routine\n", dev->name);
3481         spin_lock_irqsave(&sp->tx_lock, flags);
3482         if (atomic_read(&sp->card_state) == CARD_DOWN) {
3483                 DBG_PRINT(TX_DBG, "%s: Card going down for reset\n",
3484                           dev->name);
3485                 spin_unlock_irqrestore(&sp->tx_lock, flags);
3486                 dev_kfree_skb(skb);
3487                 return 0;
3488         }
3489
3490         queue = 0;
3491
3492         /* Get Fifo number to Transmit based on vlan priority */
3493         if (sp->vlgrp && vlan_tx_tag_present(skb)) {
3494                 vlan_tag = vlan_tx_tag_get(skb);
3495                 vlan_priority = vlan_tag >> 13;
3496                 queue = config->fifo_mapping[vlan_priority];
3497         }
3498
3499         put_off = (u16) mac_control->fifos[queue].tx_curr_put_info.offset;
3500         get_off = (u16) mac_control->fifos[queue].tx_curr_get_info.offset;
3501         txdp = (TxD_t *) mac_control->fifos[queue].list_info[put_off].
3502                 list_virt_addr;
3503
3504         queue_len = mac_control->fifos[queue].tx_curr_put_info.fifo_len + 1;
3505         /* Avoid "put" pointer going beyond "get" pointer */
3506         if (txdp->Host_Control || (((put_off + 1) % queue_len) == get_off)) {
3507                 DBG_PRINT(TX_DBG, "Error in xmit, No free TXDs.\n");
3508                 netif_stop_queue(dev);
3509                 dev_kfree_skb(skb);
3510                 spin_unlock_irqrestore(&sp->tx_lock, flags);
3511                 return 0;
3512         }
3513
3514         /* A buffer with no data will be dropped */
3515         if (!skb->len) {
3516                 DBG_PRINT(TX_DBG, "%s:Buffer has no data..\n", dev->name);
3517                 dev_kfree_skb(skb);
3518                 spin_unlock_irqrestore(&sp->tx_lock, flags);
3519                 return 0;
3520         }
3521
3522         txdp->Control_1 = 0;
3523         txdp->Control_2 = 0;
3524 #ifdef NETIF_F_TSO
3525         mss = skb_shinfo(skb)->tso_size;
3526         if (mss) {
3527                 txdp->Control_1 |= TXD_TCP_LSO_EN;
3528                 txdp->Control_1 |= TXD_TCP_LSO_MSS(mss);
3529         }
3530 #endif
3531         if (skb->ip_summed == CHECKSUM_HW) {
3532                 txdp->Control_2 |=
3533                     (TXD_TX_CKO_IPV4_EN | TXD_TX_CKO_TCP_EN |
3534                      TXD_TX_CKO_UDP_EN);
3535         }
3536         txdp->Control_1 |= TXD_GATHER_CODE_FIRST;
3537         txdp->Control_1 |= TXD_LIST_OWN_XENA;
3538         txdp->Control_2 |= config->tx_intr_type;
3539
3540         if (sp->vlgrp && vlan_tx_tag_present(skb)) {
3541                 txdp->Control_2 |= TXD_VLAN_ENABLE;
3542                 txdp->Control_2 |= TXD_VLAN_TAG(vlan_tag);
3543         }
3544
3545         frg_len = skb->len - skb->data_len;
3546         if (skb_shinfo(skb)->ufo_size) {
3547                 int ufo_size;
3548
3549                 ufo_size = skb_shinfo(skb)->ufo_size;
3550                 ufo_size &= ~7;
3551                 txdp->Control_1 |= TXD_UFO_EN;
3552                 txdp->Control_1 |= TXD_UFO_MSS(ufo_size);
3553                 txdp->Control_1 |= TXD_BUFFER0_SIZE(8);
3554 #ifdef __BIG_ENDIAN
3555                 sp->ufo_in_band_v[put_off] =
3556                                 (u64)skb_shinfo(skb)->ip6_frag_id;
3557 #else
3558                 sp->ufo_in_band_v[put_off] =
3559                                 (u64)skb_shinfo(skb)->ip6_frag_id << 32;
3560 #endif
3561                 txdp->Host_Control = (unsigned long)sp->ufo_in_band_v;
3562                 txdp->Buffer_Pointer = pci_map_single(sp->pdev,
3563                                         sp->ufo_in_band_v,
3564                                         sizeof(u64), PCI_DMA_TODEVICE);
3565                 txdp++;
3566                 txdp->Control_1 = 0;
3567                 txdp->Control_2 = 0;
3568         }
3569
3570         txdp->Buffer_Pointer = pci_map_single
3571             (sp->pdev, skb->data, frg_len, PCI_DMA_TODEVICE);
3572         txdp->Host_Control = (unsigned long) skb;
3573         txdp->Control_1 |= TXD_BUFFER0_SIZE(frg_len);
3574
3575         if (skb_shinfo(skb)->ufo_size)
3576                 txdp->Control_1 |= TXD_UFO_EN;
3577
3578         frg_cnt = skb_shinfo(skb)->nr_frags;
3579         /* For fragmented SKB. */
3580         for (i = 0; i < frg_cnt; i++) {
3581                 skb_frag_t *frag = &skb_shinfo(skb)->frags[i];
3582                 /* A '0' length fragment will be ignored */
3583                 if (!frag->size)
3584                         continue;
3585                 txdp++;
3586                 txdp->Buffer_Pointer = (u64) pci_map_page
3587                     (sp->pdev, frag->page, frag->page_offset,
3588                      frag->size, PCI_DMA_TODEVICE);
3589                 txdp->Control_1 |= TXD_BUFFER0_SIZE(frag->size);
3590                 if (skb_shinfo(skb)->ufo_size)
3591                         txdp->Control_1 |= TXD_UFO_EN;
3592         }
3593         txdp->Control_1 |= TXD_GATHER_CODE_LAST;
3594
3595         if (skb_shinfo(skb)->ufo_size)
3596                 frg_cnt++; /* as Txd0 was used for inband header */
3597
3598         tx_fifo = mac_control->tx_FIFO_start[queue];
3599         val64 = mac_control->fifos[queue].list_info[put_off].list_phy_addr;
3600         writeq(val64, &tx_fifo->TxDL_Pointer);
3601
3602         val64 = (TX_FIFO_LAST_TXD_NUM(frg_cnt) | TX_FIFO_FIRST_LIST |
3603                  TX_FIFO_LAST_LIST);
3604
3605 #ifdef NETIF_F_TSO
3606         if (mss)
3607                 val64 |= TX_FIFO_SPECIAL_FUNC;
3608 #endif
3609         if (skb_shinfo(skb)->ufo_size)
3610                 val64 |= TX_FIFO_SPECIAL_FUNC;
3611         writeq(val64, &tx_fifo->List_Control);
3612
3613         mmiowb();
3614
3615         put_off++;
3616         put_off %= mac_control->fifos[queue].tx_curr_put_info.fifo_len + 1;
3617         mac_control->fifos[queue].tx_curr_put_info.offset = put_off;
3618
3619         /* Avoid "put" pointer going beyond "get" pointer */
3620         if (((put_off + 1) % queue_len) == get_off) {
3621                 DBG_PRINT(TX_DBG,
3622                           "No free TxDs for xmit, Put: 0x%x Get:0x%x\n",
3623                           put_off, get_off);
3624                 netif_stop_queue(dev);
3625         }
3626
3627         dev->trans_start = jiffies;
3628         spin_unlock_irqrestore(&sp->tx_lock, flags);
3629
3630         return 0;
3631 }
3632
3633 static void
3634 s2io_alarm_handle(unsigned long data)
3635 {
3636         nic_t *sp = (nic_t *)data;
3637
3638         alarm_intr_handler(sp);
3639         mod_timer(&sp->alarm_timer, jiffies + HZ / 2);
3640 }
3641
3642 static irqreturn_t
3643 s2io_msi_handle(int irq, void *dev_id, struct pt_regs *regs)
3644 {
3645         struct net_device *dev = (struct net_device *) dev_id;
3646         nic_t *sp = dev->priv;
3647         int i;
3648         int ret;
3649         mac_info_t *mac_control;
3650         struct config_param *config;
3651
3652         atomic_inc(&sp->isr_cnt);
3653         mac_control = &sp->mac_control;
3654         config = &sp->config;
3655         DBG_PRINT(INTR_DBG, "%s: MSI handler\n", __FUNCTION__);
3656
3657         /* If Intr is because of Rx Traffic */
3658         for (i = 0; i < config->rx_ring_num; i++)
3659                 rx_intr_handler(&mac_control->rings[i]);
3660
3661         /* If Intr is because of Tx Traffic */
3662         for (i = 0; i < config->tx_fifo_num; i++)
3663                 tx_intr_handler(&mac_control->fifos[i]);
3664
3665         /*
3666          * If the Rx buffer count is below the panic threshold then
3667          * reallocate the buffers from the interrupt handler itself,
3668          * else schedule a tasklet to reallocate the buffers.
3669          */
3670         for (i = 0; i < config->rx_ring_num; i++) {
3671                 int rxb_size = atomic_read(&sp->rx_bufs_left[i]);
3672                 int level = rx_buffer_level(sp, rxb_size, i);
3673
3674                 if ((level == PANIC) && (!TASKLET_IN_USE)) {
3675                         DBG_PRINT(INTR_DBG, "%s: Rx BD hit ", dev->name);
3676                         DBG_PRINT(INTR_DBG, "PANIC levels\n");
3677                         if ((ret = fill_rx_buffers(sp, i)) == -ENOMEM) {
3678                                 DBG_PRINT(ERR_DBG, "%s:Out of memory",
3679                                           dev->name);
3680                                 DBG_PRINT(ERR_DBG, " in ISR!!\n");
3681                                 clear_bit(0, (&sp->tasklet_status));
3682                                 atomic_dec(&sp->isr_cnt);
3683                                 return IRQ_HANDLED;
3684                         }
3685                         clear_bit(0, (&sp->tasklet_status));
3686                 } else if (level == LOW) {
3687                         tasklet_schedule(&sp->task);
3688                 }
3689         }
3690
3691         atomic_dec(&sp->isr_cnt);
3692         return IRQ_HANDLED;
3693 }
3694
3695 static irqreturn_t
3696 s2io_msix_ring_handle(int irq, void *dev_id, struct pt_regs *regs)
3697 {
3698         ring_info_t *ring = (ring_info_t *)dev_id;
3699         nic_t *sp = ring->nic;
3700         int rxb_size, level, rng_n;
3701
3702         atomic_inc(&sp->isr_cnt);
3703         rx_intr_handler(ring);
3704
3705         rng_n = ring->ring_no;
3706         rxb_size = atomic_read(&sp->rx_bufs_left[rng_n]);
3707         level = rx_buffer_level(sp, rxb_size, rng_n);
3708
3709         if ((level == PANIC) && (!TASKLET_IN_USE)) {
3710                 int ret;
3711                 DBG_PRINT(INTR_DBG, "%s: Rx BD hit ", __FUNCTION__);
3712                 DBG_PRINT(INTR_DBG, "PANIC levels\n");
3713                 if ((ret = fill_rx_buffers(sp, rng_n)) == -ENOMEM) {
3714                         DBG_PRINT(ERR_DBG, "Out of memory in %s",
3715                                   __FUNCTION__);
3716                         clear_bit(0, (&sp->tasklet_status));
3717                         return IRQ_HANDLED;
3718                 }
3719                 clear_bit(0, (&sp->tasklet_status));
3720         } else if (level == LOW) {
3721                 tasklet_schedule(&sp->task);
3722         }
3723         atomic_dec(&sp->isr_cnt);
3724
3725         return IRQ_HANDLED;
3726 }
3727
3728 static irqreturn_t
3729 s2io_msix_fifo_handle(int irq, void *dev_id, struct pt_regs *regs)
3730 {
3731         fifo_info_t *fifo = (fifo_info_t *)dev_id;
3732         nic_t *sp = fifo->nic;
3733
3734         atomic_inc(&sp->isr_cnt);
3735         tx_intr_handler(fifo);
3736         atomic_dec(&sp->isr_cnt);
3737         return IRQ_HANDLED;
3738 }
3739
3740 static void s2io_txpic_intr_handle(nic_t *sp)
3741 {
3742         XENA_dev_config_t __iomem *bar0 = sp->bar0;
3743         u64 val64;
3744
3745         val64 = readq(&bar0->pic_int_status);
3746         if (val64 & PIC_INT_GPIO) {
3747                 val64 = readq(&bar0->gpio_int_reg);
3748                 if ((val64 & GPIO_INT_REG_LINK_DOWN) &&
3749                     (val64 & GPIO_INT_REG_LINK_UP)) {
3750                         val64 |=  GPIO_INT_REG_LINK_DOWN;
3751                         val64 |= GPIO_INT_REG_LINK_UP;
3752                         writeq(val64, &bar0->gpio_int_reg);
3753                         goto masking;
3754                 }
3755
3756                 if (((sp->last_link_state == LINK_UP) &&
3757                         (val64 & GPIO_INT_REG_LINK_DOWN)) ||
3758                 ((sp->last_link_state == LINK_DOWN) &&
3759                 (val64 & GPIO_INT_REG_LINK_UP))) {
3760                         val64 = readq(&bar0->gpio_int_mask);
3761                         val64 |=  GPIO_INT_MASK_LINK_DOWN;
3762                         val64 |= GPIO_INT_MASK_LINK_UP;
3763                         writeq(val64, &bar0->gpio_int_mask);
3764                         s2io_set_link((unsigned long)sp);
3765                 }
3766 masking:
3767                 if (sp->last_link_state == LINK_UP) {
3768                         /*enable down interrupt */
3769                         val64 = readq(&bar0->gpio_int_mask);
3770                         /* unmasks link down intr */
3771                         val64 &=  ~GPIO_INT_MASK_LINK_DOWN;
3772                         /* masks link up intr */
3773                         val64 |= GPIO_INT_MASK_LINK_UP;
3774                         writeq(val64, &bar0->gpio_int_mask);
3775                 } else {
3776                         /*enable UP Interrupt */
3777                         val64 = readq(&bar0->gpio_int_mask);
3778                         /* unmasks link up interrupt */
3779                         val64 &= ~GPIO_INT_MASK_LINK_UP;
3780                         /* masks link down interrupt */
3781                         val64 |=  GPIO_INT_MASK_LINK_DOWN;
3782                         writeq(val64, &bar0->gpio_int_mask);
3783                 }
3784         }
3785 }
3786
3787 /**
3788  *  s2io_isr - ISR handler of the device .
3789  *  @irq: the irq of the device.
3790  *  @dev_id: a void pointer to the dev structure of the NIC.
3791  *  @pt_regs: pointer to the registers pushed on the stack.
3792  *  Description:  This function is the ISR handler of the device. It
3793  *  identifies the reason for the interrupt and calls the relevant
3794  *  service routines. As a contongency measure, this ISR allocates the
3795  *  recv buffers, if their numbers are below the panic value which is
3796  *  presently set to 25% of the original number of rcv buffers allocated.
3797  *  Return value:
3798  *   IRQ_HANDLED: will be returned if IRQ was handled by this routine
3799  *   IRQ_NONE: will be returned if interrupt is not from our device
3800  */
3801 static irqreturn_t s2io_isr(int irq, void *dev_id, struct pt_regs *regs)
3802 {
3803         struct net_device *dev = (struct net_device *) dev_id;
3804         nic_t *sp = dev->priv;
3805         XENA_dev_config_t __iomem *bar0 = sp->bar0;
3806         int i;
3807         u64 reason = 0, val64;
3808         mac_info_t *mac_control;
3809         struct config_param *config;
3810
3811         atomic_inc(&sp->isr_cnt);
3812         mac_control = &sp->mac_control;
3813         config = &sp->config;
3814
3815         /*
3816          * Identify the cause for interrupt and call the appropriate
3817          * interrupt handler. Causes for the interrupt could be;
3818          * 1. Rx of packet.
3819          * 2. Tx complete.
3820          * 3. Link down.
3821          * 4. Error in any functional blocks of the NIC.
3822          */
3823         reason = readq(&bar0->general_int_status);
3824
3825         if (!reason) {
3826                 /* The interrupt was not raised by Xena. */
3827                 atomic_dec(&sp->isr_cnt);
3828                 return IRQ_NONE;
3829         }
3830
3831 #ifdef CONFIG_S2IO_NAPI
3832         if (reason & GEN_INTR_RXTRAFFIC) {
3833                 if (netif_rx_schedule_prep(dev)) {
3834                         en_dis_able_nic_intrs(sp, RX_TRAFFIC_INTR,
3835                                               DISABLE_INTRS);
3836                         __netif_rx_schedule(dev);
3837                 }
3838         }
3839 #else
3840         /* If Intr is because of Rx Traffic */
3841         if (reason & GEN_INTR_RXTRAFFIC) {
3842                 /*
3843                  * rx_traffic_int reg is an R1 register, writing all 1's
3844                  * will ensure that the actual interrupt causing bit get's
3845                  * cleared and hence a read can be avoided.
3846                  */
3847                 val64 = 0xFFFFFFFFFFFFFFFFULL;
3848                 writeq(val64, &bar0->rx_traffic_int);
3849                 for (i = 0; i < config->rx_ring_num; i++) {
3850                         rx_intr_handler(&mac_control->rings[i]);
3851                 }
3852         }
3853 #endif
3854
3855         /* If Intr is because of Tx Traffic */
3856         if (reason & GEN_INTR_TXTRAFFIC) {
3857                 /*
3858                  * tx_traffic_int reg is an R1 register, writing all 1's
3859                  * will ensure that the actual interrupt causing bit get's
3860                  * cleared and hence a read can be avoided.
3861                  */
3862                 val64 = 0xFFFFFFFFFFFFFFFFULL;
3863                 writeq(val64, &bar0->tx_traffic_int);
3864
3865                 for (i = 0; i < config->tx_fifo_num; i++)
3866                         tx_intr_handler(&mac_control->fifos[i]);
3867         }
3868
3869         if (reason & GEN_INTR_TXPIC)
3870                 s2io_txpic_intr_handle(sp);
3871         /*
3872          * If the Rx buffer count is below the panic threshold then
3873          * reallocate the buffers from the interrupt handler itself,
3874          * else schedule a tasklet to reallocate the buffers.
3875          */
3876 #ifndef CONFIG_S2IO_NAPI
3877         for (i = 0; i < config->rx_ring_num; i++) {
3878                 int ret;
3879                 int rxb_size = atomic_read(&sp->rx_bufs_left[i]);
3880                 int level = rx_buffer_level(sp, rxb_size, i);
3881
3882                 if ((level == PANIC) && (!TASKLET_IN_USE)) {
3883                         DBG_PRINT(INTR_DBG, "%s: Rx BD hit ", dev->name);
3884                         DBG_PRINT(INTR_DBG, "PANIC levels\n");
3885                         if ((ret = fill_rx_buffers(sp, i)) == -ENOMEM) {
3886                                 DBG_PRINT(ERR_DBG, "%s:Out of memory",
3887                                           dev->name);
3888                                 DBG_PRINT(ERR_DBG, " in ISR!!\n");
3889                                 clear_bit(0, (&sp->tasklet_status));
3890                                 atomic_dec(&sp->isr_cnt);
3891                                 return IRQ_HANDLED;
3892                         }
3893                         clear_bit(0, (&sp->tasklet_status));
3894                 } else if (level == LOW) {
3895                         tasklet_schedule(&sp->task);
3896                 }
3897         }
3898 #endif
3899
3900         atomic_dec(&sp->isr_cnt);
3901         return IRQ_HANDLED;
3902 }
3903
3904 /**
3905  * s2io_updt_stats -
3906  */
3907 static void s2io_updt_stats(nic_t *sp)
3908 {
3909         XENA_dev_config_t __iomem *bar0 = sp->bar0;
3910         u64 val64;
3911         int cnt = 0;
3912
3913         if (atomic_read(&sp->card_state) == CARD_UP) {
3914                 /* Apprx 30us on a 133 MHz bus */
3915                 val64 = SET_UPDT_CLICKS(10) |
3916                         STAT_CFG_ONE_SHOT_EN | STAT_CFG_STAT_EN;
3917                 writeq(val64, &bar0->stat_cfg);
3918                 do {
3919                         udelay(100);
3920                         val64 = readq(&bar0->stat_cfg);
3921                         if (!(val64 & BIT(0)))
3922                                 break;
3923                         cnt++;
3924                         if (cnt == 5)
3925                                 break; /* Updt failed */
3926                 } while(1);
3927         }
3928 }
3929
3930 /**
3931  *  s2io_get_stats - Updates the device statistics structure.
3932  *  @dev : pointer to the device structure.
3933  *  Description:
3934  *  This function updates the device statistics structure in the s2io_nic
3935  *  structure and returns a pointer to the same.
3936  *  Return value:
3937  *  pointer to the updated net_device_stats structure.
3938  */
3939
3940 static struct net_device_stats *s2io_get_stats(struct net_device *dev)
3941 {
3942         nic_t *sp = dev->priv;
3943         mac_info_t *mac_control;
3944         struct config_param *config;
3945
3946
3947         mac_control = &sp->mac_control;
3948         config = &sp->config;
3949
3950         /* Configure Stats for immediate updt */
3951         s2io_updt_stats(sp);
3952
3953         sp->stats.tx_packets =
3954                 le32_to_cpu(mac_control->stats_info->tmac_frms);
3955         sp->stats.tx_errors =
3956                 le32_to_cpu(mac_control->stats_info->tmac_any_err_frms);
3957         sp->stats.rx_errors =
3958                 le32_to_cpu(mac_control->stats_info->rmac_drop_frms);
3959         sp->stats.multicast =
3960                 le32_to_cpu(mac_control->stats_info->rmac_vld_mcst_frms);
3961         sp->stats.rx_length_errors =
3962                 le32_to_cpu(mac_control->stats_info->rmac_long_frms);
3963
3964         return (&sp->stats);
3965 }
3966
3967 /**
3968  *  s2io_set_multicast - entry point for multicast address enable/disable.
3969  *  @dev : pointer to the device structure
3970  *  Description:
3971  *  This function is a driver entry point which gets called by the kernel
3972  *  whenever multicast addresses must be enabled/disabled. This also gets
3973  *  called to set/reset promiscuous mode. Depending on the deivce flag, we
3974  *  determine, if multicast address must be enabled or if promiscuous mode
3975  *  is to be disabled etc.
3976  *  Return value:
3977  *  void.
3978  */
3979
3980 static void s2io_set_multicast(struct net_device *dev)
3981 {
3982         int i, j, prev_cnt;
3983         struct dev_mc_list *mclist;
3984         nic_t *sp = dev->priv;
3985         XENA_dev_config_t __iomem *bar0 = sp->bar0;
3986         u64 val64 = 0, multi_mac = 0x010203040506ULL, mask =
3987             0xfeffffffffffULL;
3988         u64 dis_addr = 0xffffffffffffULL, mac_addr = 0;
3989         void __iomem *add;
3990
3991         if ((dev->flags & IFF_ALLMULTI) && (!sp->m_cast_flg)) {
3992                 /*  Enable all Multicast addresses */
3993                 writeq(RMAC_ADDR_DATA0_MEM_ADDR(multi_mac),
3994                        &bar0->rmac_addr_data0_mem);
3995                 writeq(RMAC_ADDR_DATA1_MEM_MASK(mask),
3996                        &bar0->rmac_addr_data1_mem);
3997                 val64 = RMAC_ADDR_CMD_MEM_WE |
3998                     RMAC_ADDR_CMD_MEM_STROBE_NEW_CMD |
3999                     RMAC_ADDR_CMD_MEM_OFFSET(MAC_MC_ALL_MC_ADDR_OFFSET);
4000                 writeq(val64, &bar0->rmac_addr_cmd_mem);
4001                 /* Wait till command completes */
4002                 wait_for_cmd_complete(sp);
4003
4004                 sp->m_cast_flg = 1;
4005                 sp->all_multi_pos = MAC_MC_ALL_MC_ADDR_OFFSET;
4006         } else if ((dev->flags & IFF_ALLMULTI) && (sp->m_cast_flg)) {
4007                 /*  Disable all Multicast addresses */
4008                 writeq(RMAC_ADDR_DATA0_MEM_ADDR(dis_addr),
4009                        &bar0->rmac_addr_data0_mem);
4010                 writeq(RMAC_ADDR_DATA1_MEM_MASK(0x0),
4011                        &bar0->rmac_addr_data1_mem);
4012                 val64 = RMAC_ADDR_CMD_MEM_WE |
4013                     RMAC_ADDR_CMD_MEM_STROBE_NEW_CMD |
4014                     RMAC_ADDR_CMD_MEM_OFFSET(sp->all_multi_pos);
4015                 writeq(val64, &bar0->rmac_addr_cmd_mem);
4016                 /* Wait till command completes */
4017                 wait_for_cmd_complete(sp);
4018
4019                 sp->m_cast_flg = 0;
4020                 sp->all_multi_pos = 0;
4021         }
4022
4023         if ((dev->flags & IFF_PROMISC) && (!sp->promisc_flg)) {
4024                 /*  Put the NIC into promiscuous mode */
4025                 add = &bar0->mac_cfg;
4026                 val64 = readq(&bar0->mac_cfg);
4027                 val64 |= MAC_CFG_RMAC_PROM_ENABLE;
4028
4029                 writeq(RMAC_CFG_KEY(0x4C0D), &bar0->rmac_cfg_key);
4030                 writel((u32) val64, add);
4031                 writeq(RMAC_CFG_KEY(0x4C0D), &bar0->rmac_cfg_key);
4032                 writel((u32) (val64 >> 32), (add + 4));
4033
4034                 val64 = readq(&bar0->mac_cfg);
4035                 sp->promisc_flg = 1;
4036                 DBG_PRINT(INFO_DBG, "%s: entered promiscuous mode\n",
4037                           dev->name);
4038         } else if (!(dev->flags & IFF_PROMISC) && (sp->promisc_flg)) {
4039                 /*  Remove the NIC from promiscuous mode */
4040                 add = &bar0->mac_cfg;
4041                 val64 = readq(&bar0->mac_cfg);
4042                 val64 &= ~MAC_CFG_RMAC_PROM_ENABLE;
4043
4044                 writeq(RMAC_CFG_KEY(0x4C0D), &bar0->rmac_cfg_key);
4045                 writel((u32) val64, add);
4046                 writeq(RMAC_CFG_KEY(0x4C0D), &bar0->rmac_cfg_key);
4047                 writel((u32) (val64 >> 32), (add + 4));
4048
4049                 val64 = readq(&bar0->mac_cfg);
4050                 sp->promisc_flg = 0;
4051                 DBG_PRINT(INFO_DBG, "%s: left promiscuous mode\n",
4052                           dev->name);
4053         }
4054
4055         /*  Update individual M_CAST address list */
4056         if ((!sp->m_cast_flg) && dev->mc_count) {
4057                 if (dev->mc_count >
4058                     (MAX_ADDRS_SUPPORTED - MAC_MC_ADDR_START_OFFSET - 1)) {
4059                         DBG_PRINT(ERR_DBG, "%s: No more Rx filters ",
4060                                   dev->name);
4061                         DBG_PRINT(ERR_DBG, "can be added, please enable ");
4062                         DBG_PRINT(ERR_DBG, "ALL_MULTI instead\n");
4063                         return;
4064                 }
4065
4066                 prev_cnt = sp->mc_addr_count;
4067                 sp->mc_addr_count = dev->mc_count;
4068
4069                 /* Clear out the previous list of Mc in the H/W. */
4070                 for (i = 0; i < prev_cnt; i++) {
4071                         writeq(RMAC_ADDR_DATA0_MEM_ADDR(dis_addr),
4072                                &bar0->rmac_addr_data0_mem);
4073                         writeq(RMAC_ADDR_DATA1_MEM_MASK(0ULL),
4074                                 &bar0->rmac_addr_data1_mem);
4075                         val64 = RMAC_ADDR_CMD_MEM_WE |
4076                             RMAC_ADDR_CMD_MEM_STROBE_NEW_CMD |
4077                             RMAC_ADDR_CMD_MEM_OFFSET
4078                             (MAC_MC_ADDR_START_OFFSET + i);
4079                         writeq(val64, &bar0->rmac_addr_cmd_mem);
4080
4081                         /* Wait for command completes */
4082                         if (wait_for_cmd_complete(sp)) {
4083                                 DBG_PRINT(ERR_DBG, "%s: Adding ",
4084                                           dev->name);
4085                                 DBG_PRINT(ERR_DBG, "Multicasts failed\n");
4086                                 return;
4087                         }
4088                 }
4089
4090                 /* Create the new Rx filter list and update the same in H/W. */
4091                 for (i = 0, mclist = dev->mc_list; i < dev->mc_count;
4092                      i++, mclist = mclist->next) {
4093                         memcpy(sp->usr_addrs[i].addr, mclist->dmi_addr,
4094                                ETH_ALEN);
4095                         for (j = 0; j < ETH_ALEN; j++) {
4096                                 mac_addr |= mclist->dmi_addr[j];
4097                                 mac_addr <<= 8;
4098                         }
4099                         mac_addr >>= 8;
4100                         writeq(RMAC_ADDR_DATA0_MEM_ADDR(mac_addr),
4101                                &bar0->rmac_addr_data0_mem);
4102                         writeq(RMAC_ADDR_DATA1_MEM_MASK(0ULL),
4103                                 &bar0->rmac_addr_data1_mem);
4104                         val64 = RMAC_ADDR_CMD_MEM_WE |
4105                             RMAC_ADDR_CMD_MEM_STROBE_NEW_CMD |
4106                             RMAC_ADDR_CMD_MEM_OFFSET
4107                             (i + MAC_MC_ADDR_START_OFFSET);
4108                         writeq(val64, &bar0->rmac_addr_cmd_mem);
4109
4110                         /* Wait for command completes */
4111                         if (wait_for_cmd_complete(sp)) {
4112                                 DBG_PRINT(ERR_DBG, "%s: Adding ",
4113                                           dev->name);
4114                                 DBG_PRINT(ERR_DBG, "Multicasts failed\n");
4115                                 return;
4116                         }
4117                 }
4118         }
4119 }
4120
4121 /**
4122  *  s2io_set_mac_addr - Programs the Xframe mac address
4123  *  @dev : pointer to the device structure.
4124  *  @addr: a uchar pointer to the new mac address which is to be set.
4125  *  Description : This procedure will program the Xframe to receive
4126  *  frames with new Mac Address
4127  *  Return value: SUCCESS on success and an appropriate (-)ve integer
4128  *  as defined in errno.h file on failure.
4129  */
4130
4131 int s2io_set_mac_addr(struct net_device *dev, u8 * addr)
4132 {
4133         nic_t *sp = dev->priv;
4134         XENA_dev_config_t __iomem *bar0 = sp->bar0;
4135         register u64 val64, mac_addr = 0;
4136         int i;
4137
4138         /*
4139          * Set the new MAC address as the new unicast filter and reflect this
4140          * change on the device address registered with the OS. It will be
4141          * at offset 0.
4142          */
4143         for (i = 0; i < ETH_ALEN; i++) {
4144                 mac_addr <<= 8;
4145                 mac_addr |= addr[i];
4146         }
4147
4148         writeq(RMAC_ADDR_DATA0_MEM_ADDR(mac_addr),
4149                &bar0->rmac_addr_data0_mem);
4150
4151         val64 =
4152             RMAC_ADDR_CMD_MEM_WE | RMAC_ADDR_CMD_MEM_STROBE_NEW_CMD |
4153             RMAC_ADDR_CMD_MEM_OFFSET(0);
4154         writeq(val64, &bar0->rmac_addr_cmd_mem);
4155         /* Wait till command completes */
4156         if (wait_for_cmd_complete(sp)) {
4157                 DBG_PRINT(ERR_DBG, "%s: set_mac_addr failed\n", dev->name);
4158                 return FAILURE;
4159         }
4160
4161         return SUCCESS;
4162 }
4163
4164 /**
4165  * s2io_ethtool_sset - Sets different link parameters.
4166  * @sp : private member of the device structure, which is a pointer to the  * s2io_nic structure.
4167  * @info: pointer to the structure with parameters given by ethtool to set
4168  * link information.
4169  * Description:
4170  * The function sets different link parameters provided by the user onto
4171  * the NIC.
4172  * Return value:
4173  * 0 on success.
4174 */
4175
4176 static int s2io_ethtool_sset(struct net_device *dev,
4177                              struct ethtool_cmd *info)
4178 {
4179         nic_t *sp = dev->priv;
4180         if ((info->autoneg == AUTONEG_ENABLE) ||
4181             (info->speed != SPEED_10000) || (info->duplex != DUPLEX_FULL))
4182                 return -EINVAL;
4183         else {
4184                 s2io_close(sp->dev);
4185                 s2io_open(sp->dev);
4186         }
4187
4188         return 0;
4189 }
4190
4191 /**
4192  * s2io_ethtol_gset - Return link specific information.
4193  * @sp : private member of the device structure, pointer to the
4194  *      s2io_nic structure.
4195  * @info : pointer to the structure with parameters given by ethtool
4196  * to return link information.
4197  * Description:
4198  * Returns link specific information like speed, duplex etc.. to ethtool.
4199  * Return value :
4200  * return 0 on success.
4201  */
4202
4203 static int s2io_ethtool_gset(struct net_device *dev, struct ethtool_cmd *info)
4204 {
4205         nic_t *sp = dev->priv;
4206         info->supported = (SUPPORTED_10000baseT_Full | SUPPORTED_FIBRE);
4207         info->advertising = (SUPPORTED_10000baseT_Full | SUPPORTED_FIBRE);
4208         info->port = PORT_FIBRE;
4209         /* info->transceiver?? TODO */
4210
4211         if (netif_carrier_ok(sp->dev)) {
4212                 info->speed = 10000;
4213                 info->duplex = DUPLEX_FULL;
4214         } else {
4215                 info->speed = -1;
4216                 info->duplex = -1;
4217         }
4218
4219         info->autoneg = AUTONEG_DISABLE;
4220         return 0;
4221 }
4222
4223 /**
4224  * s2io_ethtool_gdrvinfo - Returns driver specific information.
4225  * @sp : private member of the device structure, which is a pointer to the
4226  * s2io_nic structure.
4227  * @info : pointer to the structure with parameters given by ethtool to
4228  * return driver information.
4229  * Description:
4230  * Returns driver specefic information like name, version etc.. to ethtool.
4231  * Return value:
4232  *  void
4233  */
4234
4235 static void s2io_ethtool_gdrvinfo(struct net_device *dev,
4236                                   struct ethtool_drvinfo *info)
4237 {
4238         nic_t *sp = dev->priv;
4239
4240         strncpy(info->driver, s2io_driver_name, sizeof(info->driver));
4241         strncpy(info->version, s2io_driver_version, sizeof(info->version));
4242         strncpy(info->fw_version, "", sizeof(info->fw_version));
4243         strncpy(info->bus_info, pci_name(sp->pdev), sizeof(info->bus_info));
4244         info->regdump_len = XENA_REG_SPACE;
4245         info->eedump_len = XENA_EEPROM_SPACE;
4246         info->testinfo_len = S2IO_TEST_LEN;
4247         info->n_stats = S2IO_STAT_LEN;
4248 }
4249
4250 /**
4251  *  s2io_ethtool_gregs - dumps the entire space of Xfame into the buffer.
4252  *  @sp: private member of the device structure, which is a pointer to the
4253  *  s2io_nic structure.
4254  *  @regs : pointer to the structure with parameters given by ethtool for
4255  *  dumping the registers.
4256  *  @reg_space: The input argumnet into which all the registers are dumped.
4257  *  Description:
4258  *  Dumps the entire register space of xFrame NIC into the user given
4259  *  buffer area.
4260  * Return value :
4261  * void .
4262 */
4263
4264 static void s2io_ethtool_gregs(struct net_device *dev,
4265                                struct ethtool_regs *regs, void *space)
4266 {
4267         int i;
4268         u64 reg;
4269         u8 *reg_space = (u8 *) space;
4270         nic_t *sp = dev->priv;
4271
4272         regs->len = XENA_REG_SPACE;
4273         regs->version = sp->pdev->subsystem_device;
4274
4275         for (i = 0; i < regs->len; i += 8) {
4276                 reg = readq(sp->bar0 + i);
4277                 memcpy((reg_space + i), &reg, 8);
4278         }
4279 }
4280
4281 /**
4282  *  s2io_phy_id  - timer function that alternates adapter LED.
4283  *  @data : address of the private member of the device structure, which
4284  *  is a pointer to the s2io_nic structure, provided as an u32.
4285  * Description: This is actually the timer function that alternates the
4286  * adapter LED bit of the adapter control bit to set/reset every time on
4287  * invocation. The timer is set for 1/2 a second, hence tha NIC blinks
4288  *  once every second.
4289 */
4290 static void s2io_phy_id(unsigned long data)
4291 {
4292         nic_t *sp = (nic_t *) data;
4293         XENA_dev_config_t __iomem *bar0 = sp->bar0;
4294         u64 val64 = 0;
4295         u16 subid;
4296
4297         subid = sp->pdev->subsystem_device;
4298         if ((sp->device_type == XFRAME_II_DEVICE) ||
4299                    ((subid & 0xFF) >= 0x07)) {
4300                 val64 = readq(&bar0->gpio_control);
4301                 val64 ^= GPIO_CTRL_GPIO_0;
4302                 writeq(val64, &bar0->gpio_control);
4303         } else {
4304                 val64 = readq(&bar0->adapter_control);
4305                 val64 ^= ADAPTER_LED_ON;
4306                 writeq(val64, &bar0->adapter_control);
4307         }
4308
4309         mod_timer(&sp->id_timer, jiffies + HZ / 2);
4310 }
4311
4312 /**
4313  * s2io_ethtool_idnic - To physically identify the nic on the system.
4314  * @sp : private member of the device structure, which is a pointer to the
4315  * s2io_nic structure.
4316  * @id : pointer to the structure with identification parameters given by
4317  * ethtool.
4318  * Description: Used to physically identify the NIC on the system.
4319  * The Link LED will blink for a time specified by the user for
4320  * identification.
4321  * NOTE: The Link has to be Up to be able to blink the LED. Hence
4322  * identification is possible only if it's link is up.
4323  * Return value:
4324  * int , returns 0 on success
4325  */
4326
4327 static int s2io_ethtool_idnic(struct net_device *dev, u32 data)
4328 {
4329         u64 val64 = 0, last_gpio_ctrl_val;
4330         nic_t *sp = dev->priv;
4331         XENA_dev_config_t __iomem *bar0 = sp->bar0;
4332         u16 subid;
4333
4334         subid = sp->pdev->subsystem_device;
4335         last_gpio_ctrl_val = readq(&bar0->gpio_control);
4336         if ((sp->device_type == XFRAME_I_DEVICE) &&
4337                 ((subid & 0xFF) < 0x07)) {
4338                 val64 = readq(&bar0->adapter_control);
4339                 if (!(val64 & ADAPTER_CNTL_EN)) {
4340                         printk(KERN_ERR
4341                                "Adapter Link down, cannot blink LED\n");
4342                         return -EFAULT;
4343                 }
4344         }
4345         if (sp->id_timer.function == NULL) {
4346                 init_timer(&sp->id_timer);
4347                 sp->id_timer.function = s2io_phy_id;
4348                 sp->id_timer.data = (unsigned long) sp;
4349         }
4350         mod_timer(&sp->id_timer, jiffies);
4351         if (data)
4352                 msleep_interruptible(data * HZ);
4353         else
4354                 msleep_interruptible(MAX_FLICKER_TIME);
4355         del_timer_sync(&sp->id_timer);
4356
4357         if (CARDS_WITH_FAULTY_LINK_INDICATORS(sp->device_type, subid)) {
4358                 writeq(last_gpio_ctrl_val, &bar0->gpio_control);
4359                 last_gpio_ctrl_val = readq(&bar0->gpio_control);
4360         }
4361
4362         return 0;
4363 }
4364
4365 /**
4366  * s2io_ethtool_getpause_data -Pause frame frame generation and reception.
4367  * @sp : private member of the device structure, which is a pointer to the
4368  *      s2io_nic structure.
4369  * @ep : pointer to the structure with pause parameters given by ethtool.
4370  * Description:
4371  * Returns the Pause frame generation and reception capability of the NIC.
4372  * Return value:
4373  *  void
4374  */
4375 static void s2io_ethtool_getpause_data(struct net_device *dev,
4376                                        struct ethtool_pauseparam *ep)
4377 {
4378         u64 val64;
4379         nic_t *sp = dev->priv;
4380         XENA_dev_config_t __iomem *bar0 = sp->bar0;
4381
4382         val64 = readq(&bar0->rmac_pause_cfg);
4383         if (val64 & RMAC_PAUSE_GEN_ENABLE)
4384                 ep->tx_pause = TRUE;
4385         if (val64 & RMAC_PAUSE_RX_ENABLE)
4386                 ep->rx_pause = TRUE;
4387         ep->autoneg = FALSE;
4388 }
4389
4390 /**
4391  * s2io_ethtool_setpause_data -  set/reset pause frame generation.
4392  * @sp : private member of the device structure, which is a pointer to the
4393  *      s2io_nic structure.
4394  * @ep : pointer to the structure with pause parameters given by ethtool.
4395  * Description:
4396  * It can be used to set or reset Pause frame generation or reception
4397  * support of the NIC.
4398  * Return value:
4399  * int, returns 0 on Success
4400  */
4401
4402 static int s2io_ethtool_setpause_data(struct net_device *dev,
4403                                struct ethtool_pauseparam *ep)
4404 {
4405         u64 val64;
4406         nic_t *sp = dev->priv;
4407         XENA_dev_config_t __iomem *bar0 = sp->bar0;
4408
4409         val64 = readq(&bar0->rmac_pause_cfg);
4410         if (ep->tx_pause)
4411                 val64 |= RMAC_PAUSE_GEN_ENABLE;
4412         else
4413                 val64 &= ~RMAC_PAUSE_GEN_ENABLE;
4414         if (ep->rx_pause)
4415                 val64 |= RMAC_PAUSE_RX_ENABLE;
4416         else
4417                 val64 &= ~RMAC_PAUSE_RX_ENABLE;
4418         writeq(val64, &bar0->rmac_pause_cfg);
4419         return 0;
4420 }
4421
4422 /**
4423  * read_eeprom - reads 4 bytes of data from user given offset.
4424  * @sp : private member of the device structure, which is a pointer to the
4425  *      s2io_nic structure.
4426  * @off : offset at which the data must be written
4427  * @data : Its an output parameter where the data read at the given
4428  *      offset is stored.
4429  * Description:
4430  * Will read 4 bytes of data from the user given offset and return the
4431  * read data.
4432  * NOTE: Will allow to read only part of the EEPROM visible through the
4433  *   I2C bus.
4434  * Return value:
4435  *  -1 on failure and 0 on success.
4436  */
4437
4438 #define S2IO_DEV_ID             5
4439 static int read_eeprom(nic_t * sp, int off, u64 * data)
4440 {
4441         int ret = -1;
4442         u32 exit_cnt = 0;
4443         u64 val64;
4444         XENA_dev_config_t __iomem *bar0 = sp->bar0;
4445
4446         if (sp->device_type == XFRAME_I_DEVICE) {
4447                 val64 = I2C_CONTROL_DEV_ID(S2IO_DEV_ID) | I2C_CONTROL_ADDR(off) |
4448                     I2C_CONTROL_BYTE_CNT(0x3) | I2C_CONTROL_READ |
4449                     I2C_CONTROL_CNTL_START;
4450                 SPECIAL_REG_WRITE(val64, &bar0->i2c_control, LF);
4451
4452                 while (exit_cnt < 5) {
4453                         val64 = readq(&bar0->i2c_control);
4454                         if (I2C_CONTROL_CNTL_END(val64)) {
4455                                 *data = I2C_CONTROL_GET_DATA(val64);
4456                                 ret = 0;
4457                                 break;
4458                         }
4459                         msleep(50);
4460                         exit_cnt++;
4461                 }
4462         }
4463
4464         if (sp->device_type == XFRAME_II_DEVICE) {
4465                 val64 = SPI_CONTROL_KEY(0x9) | SPI_CONTROL_SEL1 |
4466                         SPI_CONTROL_BYTECNT(0x3) |
4467                         SPI_CONTROL_CMD(0x3) | SPI_CONTROL_ADDR(off);
4468                 SPECIAL_REG_WRITE(val64, &bar0->spi_control, LF);
4469                 val64 |= SPI_CONTROL_REQ;
4470                 SPECIAL_REG_WRITE(val64, &bar0->spi_control, LF);
4471                 while (exit_cnt < 5) {
4472                         val64 = readq(&bar0->spi_control);
4473                         if (val64 & SPI_CONTROL_NACK) {
4474                                 ret = 1;
4475                                 break;
4476                         } else if (val64 & SPI_CONTROL_DONE) {
4477                                 *data = readq(&bar0->spi_data);
4478                                 *data &= 0xffffff;
4479                                 ret = 0;
4480                                 break;
4481                         }
4482                         msleep(50);
4483                         exit_cnt++;
4484                 }
4485         }
4486         return ret;
4487 }
4488
4489 /**
4490  *  write_eeprom - actually writes the relevant part of the data value.
4491  *  @sp : private member of the device structure, which is a pointer to the
4492  *       s2io_nic structure.
4493  *  @off : offset at which the data must be written
4494  *  @data : The data that is to be written
4495  *  @cnt : Number of bytes of the data that are actually to be written into
4496  *  the Eeprom. (max of 3)
4497  * Description:
4498  *  Actually writes the relevant part of the data value into the Eeprom
4499  *  through the I2C bus.
4500  * Return value:
4501  *  0 on success, -1 on failure.
4502  */
4503
4504 static int write_eeprom(nic_t * sp, int off, u64 data, int cnt)
4505 {
4506         int exit_cnt = 0, ret = -1;
4507         u64 val64;
4508         XENA_dev_config_t __iomem *bar0 = sp->bar0;
4509
4510         if (sp->device_type == XFRAME_I_DEVICE) {
4511                 val64 = I2C_CONTROL_DEV_ID(S2IO_DEV_ID) | I2C_CONTROL_ADDR(off) |
4512                     I2C_CONTROL_BYTE_CNT(cnt) | I2C_CONTROL_SET_DATA((u32)data) |
4513                     I2C_CONTROL_CNTL_START;
4514                 SPECIAL_REG_WRITE(val64, &bar0->i2c_control, LF);
4515
4516                 while (exit_cnt < 5) {
4517                         val64 = readq(&bar0->i2c_control);
4518                         if (I2C_CONTROL_CNTL_END(val64)) {
4519                                 if (!(val64 & I2C_CONTROL_NACK))
4520                                         ret = 0;
4521                                 break;
4522                         }
4523                         msleep(50);
4524                         exit_cnt++;
4525                 }
4526         }
4527
4528         if (sp->device_type == XFRAME_II_DEVICE) {
4529                 int write_cnt = (cnt == 8) ? 0 : cnt;
4530                 writeq(SPI_DATA_WRITE(data,(cnt<<3)), &bar0->spi_data);
4531
4532                 val64 = SPI_CONTROL_KEY(0x9) | SPI_CONTROL_SEL1 |
4533                         SPI_CONTROL_BYTECNT(write_cnt) |
4534                         SPI_CONTROL_CMD(0x2) | SPI_CONTROL_ADDR(off);
4535                 SPECIAL_REG_WRITE(val64, &bar0->spi_control, LF);
4536                 val64 |= SPI_CONTROL_REQ;
4537                 SPECIAL_REG_WRITE(val64, &bar0->spi_control, LF);
4538                 while (exit_cnt < 5) {
4539                         val64 = readq(&bar0->spi_control);
4540                         if (val64 & SPI_CONTROL_NACK) {
4541                                 ret = 1;
4542                                 break;
4543                         } else if (val64 & SPI_CONTROL_DONE) {
4544                                 ret = 0;
4545                                 break;
4546                         }
4547                         msleep(50);
4548                         exit_cnt++;
4549                 }
4550         }
4551         return ret;
4552 }
4553
4554 /**
4555  *  s2io_ethtool_geeprom  - reads the value stored in the Eeprom.
4556  *  @sp : private member of the device structure, which is a pointer to the *       s2io_nic structure.
4557  *  @eeprom : pointer to the user level structure provided by ethtool,
4558  *  containing all relevant information.
4559  *  @data_buf : user defined value to be written into Eeprom.
4560  *  Description: Reads the values stored in the Eeprom at given offset
4561  *  for a given length. Stores these values int the input argument data
4562  *  buffer 'data_buf' and returns these to the caller (ethtool.)
4563  *  Return value:
4564  *  int  0 on success
4565  */
4566
4567 static int s2io_ethtool_geeprom(struct net_device *dev,
4568                          struct ethtool_eeprom *eeprom, u8 * data_buf)
4569 {
4570         u32 i, valid;
4571         u64 data;
4572         nic_t *sp = dev->priv;
4573
4574         eeprom->magic = sp->pdev->vendor | (sp->pdev->device << 16);
4575
4576         if ((eeprom->offset + eeprom->len) > (XENA_EEPROM_SPACE))
4577                 eeprom->len = XENA_EEPROM_SPACE - eeprom->offset;
4578
4579         for (i = 0; i < eeprom->len; i += 4) {
4580                 if (read_eeprom(sp, (eeprom->offset + i), &data)) {
4581                         DBG_PRINT(ERR_DBG, "Read of EEPROM failed\n");
4582                         return -EFAULT;
4583                 }
4584                 valid = INV(data);
4585                 memcpy((data_buf + i), &valid, 4);
4586         }
4587         return 0;
4588 }
4589
4590 /**
4591  *  s2io_ethtool_seeprom - tries to write the user provided value in Eeprom
4592  *  @sp : private member of the device structure, which is a pointer to the
4593  *  s2io_nic structure.
4594  *  @eeprom : pointer to the user level structure provided by ethtool,
4595  *  containing all relevant information.
4596  *  @data_buf ; user defined value to be written into Eeprom.
4597  *  Description:
4598  *  Tries to write the user provided value in the Eeprom, at the offset
4599  *  given by the user.
4600  *  Return value:
4601  *  0 on success, -EFAULT on failure.
4602  */
4603
4604 static int s2io_ethtool_seeprom(struct net_device *dev,
4605                                 struct ethtool_eeprom *eeprom,
4606                                 u8 * data_buf)
4607 {
4608         int len = eeprom->len, cnt = 0;
4609         u64 valid = 0, data;
4610         nic_t *sp = dev->priv;
4611
4612         if (eeprom->magic != (sp->pdev->vendor | (sp->pdev->device << 16))) {
4613                 DBG_PRINT(ERR_DBG,
4614                           "ETHTOOL_WRITE_EEPROM Err: Magic value ");
4615                 DBG_PRINT(ERR_DBG, "is wrong, Its not 0x%x\n",
4616                           eeprom->magic);
4617                 return -EFAULT;
4618         }
4619
4620         while (len) {
4621                 data = (u32) data_buf[cnt] & 0x000000FF;
4622                 if (data) {
4623                         valid = (u32) (data << 24);
4624                 } else
4625                         valid = data;
4626
4627                 if (write_eeprom(sp, (eeprom->offset + cnt), valid, 0)) {
4628                         DBG_PRINT(ERR_DBG,
4629                                   "ETHTOOL_WRITE_EEPROM Err: Cannot ");
4630                         DBG_PRINT(ERR_DBG,
4631                                   "write into the specified offset\n");
4632                         return -EFAULT;
4633                 }
4634                 cnt++;
4635                 len--;
4636         }
4637
4638         return 0;
4639 }
4640
4641 /**
4642  * s2io_register_test - reads and writes into all clock domains.
4643  * @sp : private member of the device structure, which is a pointer to the
4644  * s2io_nic structure.
4645  * @data : variable that returns the result of each of the test conducted b
4646  * by the driver.
4647  * Description:
4648  * Read and write into all clock domains. The NIC has 3 clock domains,
4649  * see that registers in all the three regions are accessible.
4650  * Return value:
4651  * 0 on success.
4652  */
4653
4654 static int s2io_register_test(nic_t * sp, uint64_t * data)
4655 {
4656         XENA_dev_config_t __iomem *bar0 = sp->bar0;
4657         u64 val64 = 0, exp_val;
4658         int fail = 0;
4659
4660         val64 = readq(&bar0->pif_rd_swapper_fb);
4661         if (val64 != 0x123456789abcdefULL) {
4662                 fail = 1;
4663                 DBG_PRINT(INFO_DBG, "Read Test level 1 fails\n");
4664         }
4665
4666         val64 = readq(&bar0->rmac_pause_cfg);
4667         if (val64 != 0xc000ffff00000000ULL) {
4668                 fail = 1;
4669                 DBG_PRINT(INFO_DBG, "Read Test level 2 fails\n");
4670         }
4671
4672         val64 = readq(&bar0->rx_queue_cfg);
4673         if (sp->device_type == XFRAME_II_DEVICE)
4674                 exp_val = 0x0404040404040404ULL;
4675         else
4676                 exp_val = 0x0808080808080808ULL;
4677         if (val64 != exp_val) {
4678                 fail = 1;
4679                 DBG_PRINT(INFO_DBG, "Read Test level 3 fails\n");
4680         }
4681
4682         val64 = readq(&bar0->xgxs_efifo_cfg);
4683         if (val64 != 0x000000001923141EULL) {
4684                 fail = 1;
4685                 DBG_PRINT(INFO_DBG, "Read Test level 4 fails\n");
4686         }
4687
4688         val64 = 0x5A5A5A5A5A5A5A5AULL;
4689         writeq(val64, &bar0->xmsi_data);
4690         val64 = readq(&bar0->xmsi_data);
4691         if (val64 != 0x5A5A5A5A5A5A5A5AULL) {
4692                 fail = 1;
4693                 DBG_PRINT(ERR_DBG, "Write Test level 1 fails\n");
4694         }
4695
4696         val64 = 0xA5A5A5A5A5A5A5A5ULL;
4697         writeq(val64, &bar0->xmsi_data);
4698         val64 = readq(&bar0->xmsi_data);
4699         if (val64 != 0xA5A5A5A5A5A5A5A5ULL) {
4700                 fail = 1;
4701                 DBG_PRINT(ERR_DBG, "Write Test level 2 fails\n");
4702         }
4703
4704         *data = fail;
4705         return fail;
4706 }
4707
4708 /**
4709  * s2io_eeprom_test - to verify that EEprom in the xena can be programmed.
4710  * @sp : private member of the device structure, which is a pointer to the
4711  * s2io_nic structure.
4712  * @data:variable that returns the result of each of the test conducted by
4713  * the driver.
4714  * Description:
4715  * Verify that EEPROM in the xena can be programmed using I2C_CONTROL
4716  * register.
4717  * Return value:
4718  * 0 on success.
4719  */
4720
4721 static int s2io_eeprom_test(nic_t * sp, uint64_t * data)
4722 {
4723         int fail = 0;
4724         u64 ret_data, org_4F0, org_7F0;
4725         u8 saved_4F0 = 0, saved_7F0 = 0;
4726         struct net_device *dev = sp->dev;
4727
4728         /* Test Write Error at offset 0 */
4729         /* Note that SPI interface allows write access to all areas
4730          * of EEPROM. Hence doing all negative testing only for Xframe I.
4731          */
4732         if (sp->device_type == XFRAME_I_DEVICE)
4733                 if (!write_eeprom(sp, 0, 0, 3))
4734                         fail = 1;
4735
4736         /* Save current values at offsets 0x4F0 and 0x7F0 */
4737         if (!read_eeprom(sp, 0x4F0, &org_4F0))
4738                 saved_4F0 = 1;
4739         if (!read_eeprom(sp, 0x7F0, &org_7F0))
4740                 saved_7F0 = 1;
4741
4742         /* Test Write at offset 4f0 */
4743         if (write_eeprom(sp, 0x4F0, 0x012345, 3))
4744                 fail = 1;
4745         if (read_eeprom(sp, 0x4F0, &ret_data))
4746                 fail = 1;
4747
4748         if (ret_data != 0x012345) {
4749                 DBG_PRINT(ERR_DBG, "%s: eeprom test error at offset 0x4F0. "
4750                         "Data written %llx Data read %llx\n",
4751                         dev->name, (unsigned long long)0x12345,
4752                         (unsigned long long)ret_data);
4753                 fail = 1;
4754         }
4755
4756         /* Reset the EEPROM data go FFFF */
4757         write_eeprom(sp, 0x4F0, 0xFFFFFF, 3);
4758
4759         /* Test Write Request Error at offset 0x7c */
4760         if (sp->device_type == XFRAME_I_DEVICE)
4761                 if (!write_eeprom(sp, 0x07C, 0, 3))
4762                         fail = 1;
4763
4764         /* Test Write Request at offset 0x7f0 */
4765         if (write_eeprom(sp, 0x7F0, 0x012345, 3))
4766                 fail = 1;
4767         if (read_eeprom(sp, 0x7F0, &ret_data))
4768                 fail = 1;
4769
4770         if (ret_data != 0x012345) {
4771                 DBG_PRINT(ERR_DBG, "%s: eeprom test error at offset 0x7F0. "
4772                         "Data written %llx Data read %llx\n",
4773                         dev->name, (unsigned long long)0x12345,
4774                         (unsigned long long)ret_data);
4775                 fail = 1;
4776         }
4777
4778         /* Reset the EEPROM data go FFFF */
4779         write_eeprom(sp, 0x7F0, 0xFFFFFF, 3);
4780
4781         if (sp->device_type == XFRAME_I_DEVICE) {
4782                 /* Test Write Error at offset 0x80 */
4783                 if (!write_eeprom(sp, 0x080, 0, 3))
4784                         fail = 1;
4785
4786                 /* Test Write Error at offset 0xfc */
4787                 if (!write_eeprom(sp, 0x0FC, 0, 3))
4788                         fail = 1;
4789
4790                 /* Test Write Error at offset 0x100 */
4791                 if (!write_eeprom(sp, 0x100, 0, 3))
4792                         fail = 1;
4793
4794                 /* Test Write Error at offset 4ec */
4795                 if (!write_eeprom(sp, 0x4EC, 0, 3))
4796                         fail = 1;
4797         }
4798
4799         /* Restore values at offsets 0x4F0 and 0x7F0 */
4800         if (saved_4F0)
4801                 write_eeprom(sp, 0x4F0, org_4F0, 3);
4802         if (saved_7F0)
4803                 write_eeprom(sp, 0x7F0, org_7F0, 3);
4804
4805         *data = fail;
4806         return fail;
4807 }
4808
4809 /**
4810  * s2io_bist_test - invokes the MemBist test of the card .
4811  * @sp : private member of the device structure, which is a pointer to the
4812  * s2io_nic structure.
4813  * @data:variable that returns the result of each of the test conducted by
4814  * the driver.
4815  * Description:
4816  * This invokes the MemBist test of the card. We give around
4817  * 2 secs time for the Test to complete. If it's still not complete
4818  * within this peiod, we consider that the test failed.
4819  * Return value:
4820  * 0 on success and -1 on failure.
4821  */
4822
4823 static int s2io_bist_test(nic_t * sp, uint64_t * data)
4824 {
4825         u8 bist = 0;
4826         int cnt = 0, ret = -1;
4827
4828         pci_read_config_byte(sp->pdev, PCI_BIST, &bist);
4829         bist |= PCI_BIST_START;
4830         pci_write_config_word(sp->pdev, PCI_BIST, bist);
4831
4832         while (cnt < 20) {
4833                 pci_read_config_byte(sp->pdev, PCI_BIST, &bist);
4834                 if (!(bist & PCI_BIST_START)) {
4835                         *data = (bist & PCI_BIST_CODE_MASK);
4836                         ret = 0;
4837                         break;
4838                 }
4839                 msleep(100);
4840                 cnt++;
4841         }
4842
4843         return ret;
4844 }
4845
4846 /**
4847  * s2io-link_test - verifies the link state of the nic
4848  * @sp ; private member of the device structure, which is a pointer to the
4849  * s2io_nic structure.
4850  * @data: variable that returns the result of each of the test conducted by
4851  * the driver.
4852  * Description:
4853  * The function verifies the link state of the NIC and updates the input
4854  * argument 'data' appropriately.
4855  * Return value:
4856  * 0 on success.
4857  */
4858
4859 static int s2io_link_test(nic_t * sp, uint64_t * data)
4860 {
4861         XENA_dev_config_t __iomem *bar0 = sp->bar0;
4862         u64 val64;
4863
4864         val64 = readq(&bar0->adapter_status);
4865         if (val64 & ADAPTER_STATUS_RMAC_LOCAL_FAULT)
4866                 *data = 1;
4867
4868         return 0;
4869 }
4870
4871 /**
4872  * s2io_rldram_test - offline test for access to the RldRam chip on the NIC
4873  * @sp - private member of the device structure, which is a pointer to the
4874  * s2io_nic structure.
4875  * @data - variable that returns the result of each of the test
4876  * conducted by the driver.
4877  * Description:
4878  *  This is one of the offline test that tests the read and write
4879  *  access to the RldRam chip on the NIC.
4880  * Return value:
4881  *  0 on success.
4882  */
4883
4884 static int s2io_rldram_test(nic_t * sp, uint64_t * data)
4885 {
4886         XENA_dev_config_t __iomem *bar0 = sp->bar0;
4887         u64 val64;
4888         int cnt, iteration = 0, test_fail = 0;
4889
4890         val64 = readq(&bar0->adapter_control);
4891         val64 &= ~ADAPTER_ECC_EN;
4892         writeq(val64, &bar0->adapter_control);
4893
4894         val64 = readq(&bar0->mc_rldram_test_ctrl);
4895         val64 |= MC_RLDRAM_TEST_MODE;
4896         SPECIAL_REG_WRITE(val64, &bar0->mc_rldram_test_ctrl, LF);
4897
4898         val64 = readq(&bar0->mc_rldram_mrs);
4899         val64 |= MC_RLDRAM_QUEUE_SIZE_ENABLE;
4900         SPECIAL_REG_WRITE(val64, &bar0->mc_rldram_mrs, UF);
4901
4902         val64 |= MC_RLDRAM_MRS_ENABLE;
4903         SPECIAL_REG_WRITE(val64, &bar0->mc_rldram_mrs, UF);
4904
4905         while (iteration < 2) {
4906                 val64 = 0x55555555aaaa0000ULL;
4907                 if (iteration == 1) {
4908                         val64 ^= 0xFFFFFFFFFFFF0000ULL;
4909                 }
4910                 writeq(val64, &bar0->mc_rldram_test_d0);
4911
4912                 val64 = 0xaaaa5a5555550000ULL;
4913                 if (iteration == 1) {
4914                         val64 ^= 0xFFFFFFFFFFFF0000ULL;
4915                 }
4916                 writeq(val64, &bar0->mc_rldram_test_d1);
4917
4918                 val64 = 0x55aaaaaaaa5a0000ULL;
4919                 if (iteration == 1) {
4920                         val64 ^= 0xFFFFFFFFFFFF0000ULL;
4921                 }
4922                 writeq(val64, &bar0->mc_rldram_test_d2);
4923
4924                 val64 = (u64) (0x0000003ffffe0100ULL);
4925                 writeq(val64, &bar0->mc_rldram_test_add);
4926
4927                 val64 = MC_RLDRAM_TEST_MODE | MC_RLDRAM_TEST_WRITE |
4928                         MC_RLDRAM_TEST_GO;
4929                 SPECIAL_REG_WRITE(val64, &bar0->mc_rldram_test_ctrl, LF);
4930
4931                 for (cnt = 0; cnt < 5; cnt++) {
4932                         val64 = readq(&bar0->mc_rldram_test_ctrl);
4933                         if (val64 & MC_RLDRAM_TEST_DONE)
4934                                 break;
4935                         msleep(200);
4936                 }
4937
4938                 if (cnt == 5)
4939                         break;
4940
4941                 val64 = MC_RLDRAM_TEST_MODE | MC_RLDRAM_TEST_GO;
4942                 SPECIAL_REG_WRITE(val64, &bar0->mc_rldram_test_ctrl, LF);
4943
4944                 for (cnt = 0; cnt < 5; cnt++) {
4945                         val64 = readq(&bar0->mc_rldram_test_ctrl);
4946                         if (val64 & MC_RLDRAM_TEST_DONE)
4947                                 break;
4948                         msleep(500);
4949                 }
4950
4951                 if (cnt == 5)
4952                         break;
4953
4954                 val64 = readq(&bar0->mc_rldram_test_ctrl);
4955                 if (!(val64 & MC_RLDRAM_TEST_PASS))
4956                         test_fail = 1;
4957
4958                 iteration++;
4959         }
4960
4961         *data = test_fail;
4962
4963         /* Bring the adapter out of test mode */
4964         SPECIAL_REG_WRITE(0, &bar0->mc_rldram_test_ctrl, LF);
4965
4966         return test_fail;
4967 }
4968
4969 /**
4970  *  s2io_ethtool_test - conducts 6 tsets to determine the health of card.
4971  *  @sp : private member of the device structure, which is a pointer to the
4972  *  s2io_nic structure.
4973  *  @ethtest : pointer to a ethtool command specific structure that will be
4974  *  returned to the user.
4975  *  @data : variable that returns the result of each of the test
4976  * conducted by the driver.
4977  * Description:
4978  *  This function conducts 6 tests ( 4 offline and 2 online) to determine
4979  *  the health of the card.
4980  * Return value:
4981  *  void
4982  */
4983
4984 static void s2io_ethtool_test(struct net_device *dev,
4985                               struct ethtool_test *ethtest,
4986                               uint64_t * data)
4987 {
4988         nic_t *sp = dev->priv;
4989         int orig_state = netif_running(sp->dev);
4990
4991         if (ethtest->flags == ETH_TEST_FL_OFFLINE) {
4992                 /* Offline Tests. */
4993                 if (orig_state)
4994                         s2io_close(sp->dev);
4995
4996                 if (s2io_register_test(sp, &data[0]))
4997                         ethtest->flags |= ETH_TEST_FL_FAILED;
4998
4999                 s2io_reset(sp);
5000
5001                 if (s2io_rldram_test(sp, &data[3]))
5002                         ethtest->flags |= ETH_TEST_FL_FAILED;
5003
5004                 s2io_reset(sp);
5005
5006                 if (s2io_eeprom_test(sp, &data[1]))
5007                         ethtest->flags |= ETH_TEST_FL_FAILED;
5008
5009                 if (s2io_bist_test(sp, &data[4]))
5010                         ethtest->flags |= ETH_TEST_FL_FAILED;
5011
5012                 if (orig_state)
5013                         s2io_open(sp->dev);
5014
5015                 data[2] = 0;
5016         } else {
5017                 /* Online Tests. */
5018                 if (!orig_state) {
5019                         DBG_PRINT(ERR_DBG,
5020                                   "%s: is not up, cannot run test\n",
5021                                   dev->name);
5022                         data[0] = -1;
5023                         data[1] = -1;
5024                         data[2] = -1;
5025                         data[3] = -1;
5026                         data[4] = -1;
5027                 }
5028
5029                 if (s2io_link_test(sp, &data[2]))
5030                         ethtest->flags |= ETH_TEST_FL_FAILED;
5031
5032                 data[0] = 0;
5033                 data[1] = 0;
5034                 data[3] = 0;
5035                 data[4] = 0;
5036         }
5037 }
5038
5039 static void s2io_get_ethtool_stats(struct net_device *dev,
5040                                    struct ethtool_stats *estats,
5041                                    u64 * tmp_stats)
5042 {
5043         int i = 0;
5044         nic_t *sp = dev->priv;
5045         StatInfo_t *stat_info = sp->mac_control.stats_info;
5046
5047         s2io_updt_stats(sp);
5048         tmp_stats[i++] =
5049                 (u64)le32_to_cpu(stat_info->tmac_frms_oflow) << 32  |
5050                 le32_to_cpu(stat_info->tmac_frms);
5051         tmp_stats[i++] =
5052                 (u64)le32_to_cpu(stat_info->tmac_data_octets_oflow) << 32 |
5053                 le32_to_cpu(stat_info->tmac_data_octets);
5054         tmp_stats[i++] = le64_to_cpu(stat_info->tmac_drop_frms);
5055         tmp_stats[i++] =
5056                 (u64)le32_to_cpu(stat_info->tmac_mcst_frms_oflow) << 32 |
5057                 le32_to_cpu(stat_info->tmac_mcst_frms);
5058         tmp_stats[i++] =
5059                 (u64)le32_to_cpu(stat_info->tmac_bcst_frms_oflow) << 32 |
5060                 le32_to_cpu(stat_info->tmac_bcst_frms);
5061         tmp_stats[i++] = le64_to_cpu(stat_info->tmac_pause_ctrl_frms);
5062         tmp_stats[i++] =
5063                 (u64)le32_to_cpu(stat_info->tmac_any_err_frms_oflow) << 32 |
5064                 le32_to_cpu(stat_info->tmac_any_err_frms);
5065         tmp_stats[i++] = le64_to_cpu(stat_info->tmac_vld_ip_octets);
5066         tmp_stats[i++] =
5067                 (u64)le32_to_cpu(stat_info->tmac_vld_ip_oflow) << 32 |
5068                 le32_to_cpu(stat_info->tmac_vld_ip);
5069         tmp_stats[i++] =
5070                 (u64)le32_to_cpu(stat_info->tmac_drop_ip_oflow) << 32 |
5071                 le32_to_cpu(stat_info->tmac_drop_ip);
5072         tmp_stats[i++] =
5073                 (u64)le32_to_cpu(stat_info->tmac_icmp_oflow) << 32 |
5074                 le32_to_cpu(stat_info->tmac_icmp);
5075         tmp_stats[i++] =
5076                 (u64)le32_to_cpu(stat_info->tmac_rst_tcp_oflow) << 32 |
5077                 le32_to_cpu(stat_info->tmac_rst_tcp);
5078         tmp_stats[i++] = le64_to_cpu(stat_info->tmac_tcp);
5079         tmp_stats[i++] = (u64)le32_to_cpu(stat_info->tmac_udp_oflow) << 32 |
5080                 le32_to_cpu(stat_info->tmac_udp);
5081         tmp_stats[i++] =
5082                 (u64)le32_to_cpu(stat_info->rmac_vld_frms_oflow) << 32 |
5083                 le32_to_cpu(stat_info->rmac_vld_frms);
5084         tmp_stats[i++] =
5085                 (u64)le32_to_cpu(stat_info->rmac_data_octets_oflow) << 32 |
5086                 le32_to_cpu(stat_info->rmac_data_octets);
5087         tmp_stats[i++] = le64_to_cpu(stat_info->rmac_fcs_err_frms);
5088         tmp_stats[i++] = le64_to_cpu(stat_info->rmac_drop_frms);
5089         tmp_stats[i++] =
5090                 (u64)le32_to_cpu(stat_info->rmac_vld_mcst_frms_oflow) << 32 |
5091                 le32_to_cpu(stat_info->rmac_vld_mcst_frms);
5092         tmp_stats[i++] =
5093                 (u64)le32_to_cpu(stat_info->rmac_vld_bcst_frms_oflow) << 32 |
5094                 le32_to_cpu(stat_info->rmac_vld_bcst_frms);
5095         tmp_stats[i++] = le32_to_cpu(stat_info->rmac_in_rng_len_err_frms);
5096         tmp_stats[i++] = le64_to_cpu(stat_info->rmac_long_frms);
5097         tmp_stats[i++] = le64_to_cpu(stat_info->rmac_pause_ctrl_frms);
5098         tmp_stats[i++] =
5099                 (u64)le32_to_cpu(stat_info->rmac_discarded_frms_oflow) << 32 |
5100                 le32_to_cpu(stat_info->rmac_discarded_frms);
5101         tmp_stats[i++] =
5102                 (u64)le32_to_cpu(stat_info->rmac_usized_frms_oflow) << 32 |
5103                 le32_to_cpu(stat_info->rmac_usized_frms);
5104         tmp_stats[i++] =
5105                 (u64)le32_to_cpu(stat_info->rmac_osized_frms_oflow) << 32 |
5106                 le32_to_cpu(stat_info->rmac_osized_frms);
5107         tmp_stats[i++] =
5108                 (u64)le32_to_cpu(stat_info->rmac_frag_frms_oflow) << 32 |
5109                 le32_to_cpu(stat_info->rmac_frag_frms);
5110         tmp_stats[i++] =
5111                 (u64)le32_to_cpu(stat_info->rmac_jabber_frms_oflow) << 32 |
5112                 le32_to_cpu(stat_info->rmac_jabber_frms);
5113         tmp_stats[i++] = (u64)le32_to_cpu(stat_info->rmac_ip_oflow) << 32 |
5114                 le32_to_cpu(stat_info->rmac_ip);
5115         tmp_stats[i++] = le64_to_cpu(stat_info->rmac_ip_octets);
5116         tmp_stats[i++] = le32_to_cpu(stat_info->rmac_hdr_err_ip);
5117         tmp_stats[i++] = (u64)le32_to_cpu(stat_info->rmac_drop_ip_oflow) << 32 |
5118                 le32_to_cpu(stat_info->rmac_drop_ip);
5119         tmp_stats[i++] = (u64)le32_to_cpu(stat_info->rmac_icmp_oflow) << 32 |
5120                 le32_to_cpu(stat_info->rmac_icmp);
5121         tmp_stats[i++] = le64_to_cpu(stat_info->rmac_tcp);
5122         tmp_stats[i++] = (u64)le32_to_cpu(stat_info->rmac_udp_oflow) << 32 |
5123                 le32_to_cpu(stat_info->rmac_udp);
5124         tmp_stats[i++] =
5125                 (u64)le32_to_cpu(stat_info->rmac_err_drp_udp_oflow) << 32 |
5126                 le32_to_cpu(stat_info->rmac_err_drp_udp);
5127         tmp_stats[i++] =
5128                 (u64)le32_to_cpu(stat_info->rmac_pause_cnt_oflow) << 32 |
5129                 le32_to_cpu(stat_info->rmac_pause_cnt);
5130         tmp_stats[i++] =
5131                 (u64)le32_to_cpu(stat_info->rmac_accepted_ip_oflow) << 32 |
5132                 le32_to_cpu(stat_info->rmac_accepted_ip);
5133         tmp_stats[i++] = le32_to_cpu(stat_info->rmac_err_tcp);
5134         tmp_stats[i++] = 0;
5135         tmp_stats[i++] = stat_info->sw_stat.single_ecc_errs;
5136         tmp_stats[i++] = stat_info->sw_stat.double_ecc_errs;
5137 }
5138
5139 static int s2io_ethtool_get_regs_len(struct net_device *dev)
5140 {
5141         return (XENA_REG_SPACE);
5142 }
5143
5144
5145 static u32 s2io_ethtool_get_rx_csum(struct net_device * dev)
5146 {
5147         nic_t *sp = dev->priv;
5148
5149         return (sp->rx_csum);
5150 }
5151
5152 static int s2io_ethtool_set_rx_csum(struct net_device *dev, u32 data)
5153 {
5154         nic_t *sp = dev->priv;
5155
5156         if (data)
5157                 sp->rx_csum = 1;
5158         else
5159                 sp->rx_csum = 0;
5160
5161         return 0;
5162 }
5163
5164 static int s2io_get_eeprom_len(struct net_device *dev)
5165 {
5166         return (XENA_EEPROM_SPACE);
5167 }
5168
5169 static int s2io_ethtool_self_test_count(struct net_device *dev)
5170 {
5171         return (S2IO_TEST_LEN);
5172 }
5173
5174 static void s2io_ethtool_get_strings(struct net_device *dev,
5175                                      u32 stringset, u8 * data)
5176 {
5177         switch (stringset) {
5178         case ETH_SS_TEST:
5179                 memcpy(data, s2io_gstrings, S2IO_STRINGS_LEN);
5180                 break;
5181         case ETH_SS_STATS:
5182                 memcpy(data, &ethtool_stats_keys,
5183                        sizeof(ethtool_stats_keys));
5184         }
5185 }
5186 static int s2io_ethtool_get_stats_count(struct net_device *dev)
5187 {
5188         return (S2IO_STAT_LEN);
5189 }
5190
5191 static int s2io_ethtool_op_set_tx_csum(struct net_device *dev, u32 data)
5192 {
5193         if (data)
5194                 dev->features |= NETIF_F_IP_CSUM;
5195         else
5196                 dev->features &= ~NETIF_F_IP_CSUM;
5197
5198         return 0;
5199 }
5200
5201
5202 static struct ethtool_ops netdev_ethtool_ops = {
5203         .get_settings = s2io_ethtool_gset,
5204         .set_settings = s2io_ethtool_sset,
5205         .get_drvinfo = s2io_ethtool_gdrvinfo,
5206         .get_regs_len = s2io_ethtool_get_regs_len,
5207         .get_regs = s2io_ethtool_gregs,
5208         .get_link = ethtool_op_get_link,
5209         .get_eeprom_len = s2io_get_eeprom_len,
5210         .get_eeprom = s2io_ethtool_geeprom,
5211         .set_eeprom = s2io_ethtool_seeprom,
5212         .get_pauseparam = s2io_ethtool_getpause_data,
5213         .set_pauseparam = s2io_ethtool_setpause_data,
5214         .get_rx_csum = s2io_ethtool_get_rx_csum,
5215         .set_rx_csum = s2io_ethtool_set_rx_csum,
5216         .get_tx_csum = ethtool_op_get_tx_csum,
5217         .set_tx_csum = s2io_ethtool_op_set_tx_csum,
5218         .get_sg = ethtool_op_get_sg,
5219         .set_sg = ethtool_op_set_sg,
5220 #ifdef NETIF_F_TSO
5221         .get_tso = ethtool_op_get_tso,
5222         .set_tso = ethtool_op_set_tso,
5223 #endif
5224         .get_ufo = ethtool_op_get_ufo,
5225         .set_ufo = ethtool_op_set_ufo,
5226         .self_test_count = s2io_ethtool_self_test_count,
5227         .self_test = s2io_ethtool_test,
5228         .get_strings = s2io_ethtool_get_strings,
5229         .phys_id = s2io_ethtool_idnic,
5230         .get_stats_count = s2io_ethtool_get_stats_count,
5231         .get_ethtool_stats = s2io_get_ethtool_stats
5232 };
5233
5234 /**
5235  *  s2io_ioctl - Entry point for the Ioctl
5236  *  @dev :  Device pointer.
5237  *  @ifr :  An IOCTL specefic structure, that can contain a pointer to
5238  *  a proprietary structure used to pass information to the driver.
5239  *  @cmd :  This is used to distinguish between the different commands that
5240  *  can be passed to the IOCTL functions.
5241  *  Description:
5242  *  Currently there are no special functionality supported in IOCTL, hence
5243  *  function always return EOPNOTSUPPORTED
5244  */
5245
5246 static int s2io_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
5247 {
5248         return -EOPNOTSUPP;
5249 }
5250
5251 /**
5252  *  s2io_change_mtu - entry point to change MTU size for the device.
5253  *   @dev : device pointer.
5254  *   @new_mtu : the new MTU size for the device.
5255  *   Description: A driver entry point to change MTU size for the device.
5256  *   Before changing the MTU the device must be stopped.
5257  *  Return value:
5258  *   0 on success and an appropriate (-)ve integer as defined in errno.h
5259  *   file on failure.
5260  */
5261
5262 static int s2io_change_mtu(struct net_device *dev, int new_mtu)
5263 {
5264         nic_t *sp = dev->priv;
5265
5266         if ((new_mtu < MIN_MTU) || (new_mtu > S2IO_JUMBO_SIZE)) {
5267                 DBG_PRINT(ERR_DBG, "%s: MTU size is invalid.\n",
5268                           dev->name);
5269                 return -EPERM;
5270         }
5271
5272         dev->mtu = new_mtu;
5273         if (netif_running(dev)) {
5274                 s2io_card_down(sp);
5275                 netif_stop_queue(dev);
5276                 if (s2io_card_up(sp)) {
5277                         DBG_PRINT(ERR_DBG, "%s: Device bring up failed\n",
5278                                   __FUNCTION__);
5279                 }
5280                 if (netif_queue_stopped(dev))
5281                         netif_wake_queue(dev);
5282         } else { /* Device is down */
5283                 XENA_dev_config_t __iomem *bar0 = sp->bar0;
5284                 u64 val64 = new_mtu;
5285
5286                 writeq(vBIT(val64, 2, 14), &bar0->rmac_max_pyld_len);
5287         }
5288
5289         return 0;
5290 }
5291
5292 /**
5293  *  s2io_tasklet - Bottom half of the ISR.
5294  *  @dev_adr : address of the device structure in dma_addr_t format.
5295  *  Description:
5296  *  This is the tasklet or the bottom half of the ISR. This is
5297  *  an extension of the ISR which is scheduled by the scheduler to be run
5298  *  when the load on the CPU is low. All low priority tasks of the ISR can
5299  *  be pushed into the tasklet. For now the tasklet is used only to
5300  *  replenish the Rx buffers in the Rx buffer descriptors.
5301  *  Return value:
5302  *  void.
5303  */
5304
5305 static void s2io_tasklet(unsigned long dev_addr)
5306 {
5307         struct net_device *dev = (struct net_device *) dev_addr;
5308         nic_t *sp = dev->priv;
5309         int i, ret;
5310         mac_info_t *mac_control;
5311         struct config_param *config;
5312
5313         mac_control = &sp->mac_control;
5314         config = &sp->config;
5315
5316         if (!TASKLET_IN_USE) {
5317                 for (i = 0; i < config->rx_ring_num; i++) {
5318                         ret = fill_rx_buffers(sp, i);
5319                         if (ret == -ENOMEM) {
5320                                 DBG_PRINT(ERR_DBG, "%s: Out of ",
5321                                           dev->name);
5322                                 DBG_PRINT(ERR_DBG, "memory in tasklet\n");
5323                                 break;
5324                         } else if (ret == -EFILL) {
5325                                 DBG_PRINT(ERR_DBG,
5326                                           "%s: Rx Ring %d is full\n",
5327                                           dev->name, i);
5328                                 break;
5329                         }
5330                 }
5331                 clear_bit(0, (&sp->tasklet_status));
5332         }
5333 }
5334
5335 /**
5336  * s2io_set_link - Set the LInk status
5337  * @data: long pointer to device private structue
5338  * Description: Sets the link status for the adapter
5339  */
5340
5341 static void s2io_set_link(unsigned long data)
5342 {
5343         nic_t *nic = (nic_t *) data;
5344         struct net_device *dev = nic->dev;
5345         XENA_dev_config_t __iomem *bar0 = nic->bar0;
5346         register u64 val64;
5347         u16 subid;
5348
5349         if (test_and_set_bit(0, &(nic->link_state))) {
5350                 /* The card is being reset, no point doing anything */
5351                 return;
5352         }
5353
5354         subid = nic->pdev->subsystem_device;
5355         if (s2io_link_fault_indication(nic) == MAC_RMAC_ERR_TIMER) {
5356                 /*
5357                  * Allow a small delay for the NICs self initiated
5358                  * cleanup to complete.
5359                  */
5360                 msleep(100);
5361         }
5362
5363         val64 = readq(&bar0->adapter_status);
5364         if (verify_xena_quiescence(nic, val64, nic->device_enabled_once)) {
5365                 if (LINK_IS_UP(val64)) {
5366                         val64 = readq(&bar0->adapter_control);
5367                         val64 |= ADAPTER_CNTL_EN;
5368                         writeq(val64, &bar0->adapter_control);
5369                         if (CARDS_WITH_FAULTY_LINK_INDICATORS(nic->device_type,
5370                                                              subid)) {
5371                                 val64 = readq(&bar0->gpio_control);
5372                                 val64 |= GPIO_CTRL_GPIO_0;
5373                                 writeq(val64, &bar0->gpio_control);
5374                                 val64 = readq(&bar0->gpio_control);
5375                         } else {
5376                                 val64 |= ADAPTER_LED_ON;
5377                                 writeq(val64, &bar0->adapter_control);
5378                         }
5379                         if (s2io_link_fault_indication(nic) ==
5380                                                 MAC_RMAC_ERR_TIMER) {
5381                                 val64 = readq(&bar0->adapter_status);
5382                                 if (!LINK_IS_UP(val64)) {
5383                                         DBG_PRINT(ERR_DBG, "%s:", dev->name);
5384                                         DBG_PRINT(ERR_DBG, " Link down");
5385                                         DBG_PRINT(ERR_DBG, "after ");
5386                                         DBG_PRINT(ERR_DBG, "enabling ");
5387                                         DBG_PRINT(ERR_DBG, "device \n");
5388                                 }
5389                         }
5390                         if (nic->device_enabled_once == FALSE) {
5391                                 nic->device_enabled_once = TRUE;
5392                         }
5393                         s2io_link(nic, LINK_UP);
5394                 } else {
5395                         if (CARDS_WITH_FAULTY_LINK_INDICATORS(nic->device_type,
5396                                                               subid)) {
5397                                 val64 = readq(&bar0->gpio_control);
5398                                 val64 &= ~GPIO_CTRL_GPIO_0;
5399                                 writeq(val64, &bar0->gpio_control);
5400                                 val64 = readq(&bar0->gpio_control);
5401                         }
5402                         s2io_link(nic, LINK_DOWN);
5403                 }
5404         } else {                /* NIC is not Quiescent. */
5405                 DBG_PRINT(ERR_DBG, "%s: Error: ", dev->name);
5406                 DBG_PRINT(ERR_DBG, "device is not Quiescent\n");
5407                 netif_stop_queue(dev);
5408         }
5409         clear_bit(0, &(nic->link_state));
5410 }
5411
5412 static void s2io_card_down(nic_t * sp)
5413 {
5414         int cnt = 0;
5415         XENA_dev_config_t __iomem *bar0 = sp->bar0;
5416         unsigned long flags;
5417         register u64 val64 = 0;
5418
5419         del_timer_sync(&sp->alarm_timer);
5420         /* If s2io_set_link task is executing, wait till it completes. */
5421         while (test_and_set_bit(0, &(sp->link_state))) {
5422                 msleep(50);
5423         }
5424         atomic_set(&sp->card_state, CARD_DOWN);
5425
5426         /* disable Tx and Rx traffic on the NIC */
5427         stop_nic(sp);
5428
5429         /* Kill tasklet. */
5430         tasklet_kill(&sp->task);
5431
5432         /* Check if the device is Quiescent and then Reset the NIC */
5433         do {
5434                 val64 = readq(&bar0->adapter_status);
5435                 if (verify_xena_quiescence(sp, val64, sp->device_enabled_once)) {
5436                         break;
5437                 }
5438
5439                 msleep(50);
5440                 cnt++;
5441                 if (cnt == 10) {
5442                         DBG_PRINT(ERR_DBG,
5443                                   "s2io_close:Device not Quiescent ");
5444                         DBG_PRINT(ERR_DBG, "adaper status reads 0x%llx\n",
5445                                   (unsigned long long) val64);
5446                         break;
5447                 }
5448         } while (1);
5449         s2io_reset(sp);
5450
5451         /* Waiting till all Interrupt handlers are complete */
5452         cnt = 0;
5453         do {
5454                 msleep(10);
5455                 if (!atomic_read(&sp->isr_cnt))
5456                         break;
5457                 cnt++;
5458         } while(cnt < 5);
5459
5460         spin_lock_irqsave(&sp->tx_lock, flags);
5461         /* Free all Tx buffers */
5462         free_tx_buffers(sp);
5463         spin_unlock_irqrestore(&sp->tx_lock, flags);
5464
5465         /* Free all Rx buffers */
5466         spin_lock_irqsave(&sp->rx_lock, flags);
5467         free_rx_buffers(sp);
5468         spin_unlock_irqrestore(&sp->rx_lock, flags);
5469
5470         clear_bit(0, &(sp->link_state));
5471 }
5472
5473 static int s2io_card_up(nic_t * sp)
5474 {
5475         int i, ret = 0;
5476         mac_info_t *mac_control;
5477         struct config_param *config;
5478         struct net_device *dev = (struct net_device *) sp->dev;
5479
5480         /* Initialize the H/W I/O registers */
5481         if (init_nic(sp) != 0) {
5482                 DBG_PRINT(ERR_DBG, "%s: H/W initialization failed\n",
5483                           dev->name);
5484                 return -ENODEV;
5485         }
5486
5487         if (sp->intr_type == MSI)
5488                 ret = s2io_enable_msi(sp);
5489         else if (sp->intr_type == MSI_X)
5490                 ret = s2io_enable_msi_x(sp);
5491         if (ret) {
5492                 DBG_PRINT(ERR_DBG, "%s: Defaulting to INTA\n", dev->name);
5493                 sp->intr_type = INTA;
5494         }
5495
5496         /*
5497          * Initializing the Rx buffers. For now we are considering only 1
5498          * Rx ring and initializing buffers into 30 Rx blocks
5499          */
5500         mac_control = &sp->mac_control;
5501         config = &sp->config;
5502
5503         for (i = 0; i < config->rx_ring_num; i++) {
5504                 if ((ret = fill_rx_buffers(sp, i))) {
5505                         DBG_PRINT(ERR_DBG, "%s: Out of memory in Open\n",
5506                                   dev->name);
5507                         s2io_reset(sp);
5508                         free_rx_buffers(sp);
5509                         return -ENOMEM;
5510                 }
5511                 DBG_PRINT(INFO_DBG, "Buf in ring:%d is %d:\n", i,
5512                           atomic_read(&sp->rx_bufs_left[i]));
5513         }
5514
5515         /* Setting its receive mode */
5516         s2io_set_multicast(dev);
5517
5518         /* Enable tasklet for the device */
5519         tasklet_init(&sp->task, s2io_tasklet, (unsigned long) dev);
5520
5521         /* Enable Rx Traffic and interrupts on the NIC */
5522         if (start_nic(sp)) {
5523                 DBG_PRINT(ERR_DBG, "%s: Starting NIC failed\n", dev->name);
5524                 tasklet_kill(&sp->task);
5525                 s2io_reset(sp);
5526                 free_irq(dev->irq, dev);
5527                 free_rx_buffers(sp);
5528                 return -ENODEV;
5529         }
5530
5531         S2IO_TIMER_CONF(sp->alarm_timer, s2io_alarm_handle, sp, (HZ/2));
5532
5533         atomic_set(&sp->card_state, CARD_UP);
5534         return 0;
5535 }
5536
5537 /**
5538  * s2io_restart_nic - Resets the NIC.
5539  * @data : long pointer to the device private structure
5540  * Description:
5541  * This function is scheduled to be run by the s2io_tx_watchdog
5542  * function after 0.5 secs to reset the NIC. The idea is to reduce
5543  * the run time of the watch dog routine which is run holding a
5544  * spin lock.
5545  */
5546
5547 static void s2io_restart_nic(unsigned long data)
5548 {
5549         struct net_device *dev = (struct net_device *) data;
5550         nic_t *sp = dev->priv;
5551
5552         s2io_card_down(sp);
5553         if (s2io_card_up(sp)) {
5554                 DBG_PRINT(ERR_DBG, "%s: Device bring up failed\n",
5555                           dev->name);
5556         }
5557         netif_wake_queue(dev);
5558         DBG_PRINT(ERR_DBG, "%s: was reset by Tx watchdog timer\n",
5559                   dev->name);
5560
5561 }
5562
5563 /**
5564  *  s2io_tx_watchdog - Watchdog for transmit side.
5565  *  @dev : Pointer to net device structure
5566  *  Description:
5567  *  This function is triggered if the Tx Queue is stopped
5568  *  for a pre-defined amount of time when the Interface is still up.
5569  *  If the Interface is jammed in such a situation, the hardware is
5570  *  reset (by s2io_close) and restarted again (by s2io_open) to
5571  *  overcome any problem that might have been caused in the hardware.
5572  *  Return value:
5573  *  void
5574  */
5575
5576 static void s2io_tx_watchdog(struct net_device *dev)
5577 {
5578         nic_t *sp = dev->priv;
5579
5580         if (netif_carrier_ok(dev)) {
5581                 schedule_work(&sp->rst_timer_task);
5582         }
5583 }
5584
5585 /**
5586  *   rx_osm_handler - To perform some OS related operations on SKB.
5587  *   @sp: private member of the device structure,pointer to s2io_nic structure.
5588  *   @skb : the socket buffer pointer.
5589  *   @len : length of the packet
5590  *   @cksum : FCS checksum of the frame.
5591  *   @ring_no : the ring from which this RxD was extracted.
5592  *   Description:
5593  *   This function is called by the Tx interrupt serivce routine to perform
5594  *   some OS related operations on the SKB before passing it to the upper
5595  *   layers. It mainly checks if the checksum is OK, if so adds it to the
5596  *   SKBs cksum variable, increments the Rx packet count and passes the SKB
5597  *   to the upper layer. If the checksum is wrong, it increments the Rx
5598  *   packet error count, frees the SKB and returns error.
5599  *   Return value:
5600  *   SUCCESS on success and -1 on failure.
5601  */
5602 static int rx_osm_handler(ring_info_t *ring_data, RxD_t * rxdp)
5603 {
5604         nic_t *sp = ring_data->nic;
5605         struct net_device *dev = (struct net_device *) sp->dev;
5606         struct sk_buff *skb = (struct sk_buff *)
5607                 ((unsigned long) rxdp->Host_Control);
5608         int ring_no = ring_data->ring_no;
5609         u16 l3_csum, l4_csum;
5610
5611         skb->dev = dev;
5612         if (rxdp->Control_1 & RXD_T_CODE) {
5613                 unsigned long long err = rxdp->Control_1 & RXD_T_CODE;
5614                 DBG_PRINT(ERR_DBG, "%s: Rx error Value: 0x%llx\n",
5615                           dev->name, err);
5616                 dev_kfree_skb(skb);
5617                 sp->stats.rx_crc_errors++;
5618                 atomic_dec(&sp->rx_bufs_left[ring_no]);
5619                 rxdp->Host_Control = 0;
5620                 return 0;
5621         }
5622
5623         /* Updating statistics */
5624         rxdp->Host_Control = 0;
5625         sp->rx_pkt_count++;
5626         sp->stats.rx_packets++;
5627         if (sp->rxd_mode == RXD_MODE_1) {
5628                 int len = RXD_GET_BUFFER0_SIZE_1(rxdp->Control_2);
5629
5630                 sp->stats.rx_bytes += len;
5631                 skb_put(skb, len);
5632
5633         } else if (sp->rxd_mode >= RXD_MODE_3A) {
5634                 int get_block = ring_data->rx_curr_get_info.block_index;
5635                 int get_off = ring_data->rx_curr_get_info.offset;
5636                 int buf0_len = RXD_GET_BUFFER0_SIZE_3(rxdp->Control_2);
5637                 int buf2_len = RXD_GET_BUFFER2_SIZE_3(rxdp->Control_2);
5638                 unsigned char *buff = skb_push(skb, buf0_len);
5639
5640                 buffAdd_t *ba = &ring_data->ba[get_block][get_off];
5641                 sp->stats.rx_bytes += buf0_len + buf2_len;
5642                 memcpy(buff, ba->ba_0, buf0_len);
5643
5644                 if (sp->rxd_mode == RXD_MODE_3A) {
5645                         int buf1_len = RXD_GET_BUFFER1_SIZE_3(rxdp->Control_2);
5646
5647                         skb_put(skb, buf1_len);
5648                         skb->len += buf2_len;
5649                         skb->data_len += buf2_len;
5650                         skb->truesize += buf2_len;
5651                         skb_put(skb_shinfo(skb)->frag_list, buf2_len);
5652                         sp->stats.rx_bytes += buf1_len;
5653
5654                 } else
5655                         skb_put(skb, buf2_len);
5656         }
5657
5658         if ((rxdp->Control_1 & TCP_OR_UDP_FRAME) &&
5659             (sp->rx_csum)) {
5660                 l3_csum = RXD_GET_L3_CKSUM(rxdp->Control_1);
5661                 l4_csum = RXD_GET_L4_CKSUM(rxdp->Control_1);
5662                 if ((l3_csum == L3_CKSUM_OK) && (l4_csum == L4_CKSUM_OK)) {
5663                         /*
5664                          * NIC verifies if the Checksum of the received
5665                          * frame is Ok or not and accordingly returns
5666                          * a flag in the RxD.
5667                          */
5668                         skb->ip_summed = CHECKSUM_UNNECESSARY;
5669                 } else {
5670                         /*
5671                          * Packet with erroneous checksum, let the
5672                          * upper layers deal with it.
5673                          */
5674                         skb->ip_summed = CHECKSUM_NONE;
5675                 }
5676         } else {
5677                 skb->ip_summed = CHECKSUM_NONE;
5678         }
5679
5680         skb->protocol = eth_type_trans(skb, dev);
5681 #ifdef CONFIG_S2IO_NAPI
5682         if (sp->vlgrp && RXD_GET_VLAN_TAG(rxdp->Control_2)) {
5683                 /* Queueing the vlan frame to the upper layer */
5684                 vlan_hwaccel_receive_skb(skb, sp->vlgrp,
5685                         RXD_GET_VLAN_TAG(rxdp->Control_2));
5686         } else {
5687                 netif_receive_skb(skb);
5688         }
5689 #else
5690         if (sp->vlgrp && RXD_GET_VLAN_TAG(rxdp->Control_2)) {
5691                 /* Queueing the vlan frame to the upper layer */
5692                 vlan_hwaccel_rx(skb, sp->vlgrp,
5693                         RXD_GET_VLAN_TAG(rxdp->Control_2));
5694         } else {
5695                 netif_rx(skb);
5696         }
5697 #endif
5698         dev->last_rx = jiffies;
5699         atomic_dec(&sp->rx_bufs_left[ring_no]);
5700         return SUCCESS;
5701 }
5702
5703 /**
5704  *  s2io_link - stops/starts the Tx queue.
5705  *  @sp : private member of the device structure, which is a pointer to the
5706  *  s2io_nic structure.
5707  *  @link : inidicates whether link is UP/DOWN.
5708  *  Description:
5709  *  This function stops/starts the Tx queue depending on whether the link
5710  *  status of the NIC is is down or up. This is called by the Alarm
5711  *  interrupt handler whenever a link change interrupt comes up.
5712  *  Return value:
5713  *  void.
5714  */
5715
5716 void s2io_link(nic_t * sp, int link)
5717 {
5718         struct net_device *dev = (struct net_device *) sp->dev;
5719
5720         if (link != sp->last_link_state) {
5721                 if (link == LINK_DOWN) {
5722                         DBG_PRINT(ERR_DBG, "%s: Link down\n", dev->name);
5723                         netif_carrier_off(dev);
5724                 } else {
5725                         DBG_PRINT(ERR_DBG, "%s: Link Up\n", dev->name);
5726                         netif_carrier_on(dev);
5727                 }
5728         }
5729         sp->last_link_state = link;
5730 }
5731
5732 /**
5733  *  get_xena_rev_id - to identify revision ID of xena.
5734  *  @pdev : PCI Dev structure
5735  *  Description:
5736  *  Function to identify the Revision ID of xena.
5737  *  Return value:
5738  *  returns the revision ID of the device.
5739  */
5740
5741 int get_xena_rev_id(struct pci_dev *pdev)
5742 {
5743         u8 id = 0;
5744         int ret;
5745         ret = pci_read_config_byte(pdev, PCI_REVISION_ID, (u8 *) & id);
5746         return id;
5747 }
5748
5749 /**
5750  *  s2io_init_pci -Initialization of PCI and PCI-X configuration registers .
5751  *  @sp : private member of the device structure, which is a pointer to the
5752  *  s2io_nic structure.
5753  *  Description:
5754  *  This function initializes a few of the PCI and PCI-X configuration registers
5755  *  with recommended values.
5756  *  Return value:
5757  *  void
5758  */
5759
5760 static void s2io_init_pci(nic_t * sp)
5761 {
5762         u16 pci_cmd = 0, pcix_cmd = 0;
5763
5764         /* Enable Data Parity Error Recovery in PCI-X command register. */
5765         pci_read_config_word(sp->pdev, PCIX_COMMAND_REGISTER,
5766                              &(pcix_cmd));
5767         pci_write_config_word(sp->pdev, PCIX_COMMAND_REGISTER,
5768                               (pcix_cmd | 1));
5769         pci_read_config_word(sp->pdev, PCIX_COMMAND_REGISTER,
5770                              &(pcix_cmd));
5771
5772         /* Set the PErr Response bit in PCI command register. */
5773         pci_read_config_word(sp->pdev, PCI_COMMAND, &pci_cmd);
5774         pci_write_config_word(sp->pdev, PCI_COMMAND,
5775                               (pci_cmd | PCI_COMMAND_PARITY));
5776         pci_read_config_word(sp->pdev, PCI_COMMAND, &pci_cmd);
5777
5778         /* Forcibly disabling relaxed ordering capability of the card. */
5779         pcix_cmd &= 0xfffd;
5780         pci_write_config_word(sp->pdev, PCIX_COMMAND_REGISTER,
5781                               pcix_cmd);
5782         pci_read_config_word(sp->pdev, PCIX_COMMAND_REGISTER,
5783                              &(pcix_cmd));
5784 }
5785
5786 MODULE_AUTHOR("Raghavendra Koushik <raghavendra.koushik@neterion.com>");
5787 MODULE_LICENSE("GPL");
5788 MODULE_VERSION(DRV_VERSION);
5789
5790 module_param(tx_fifo_num, int, 0);
5791 module_param(rx_ring_num, int, 0);
5792 module_param(rx_ring_mode, int, 0);
5793 module_param_array(tx_fifo_len, uint, NULL, 0);
5794 module_param_array(rx_ring_sz, uint, NULL, 0);
5795 module_param_array(rts_frm_len, uint, NULL, 0);
5796 module_param(use_continuous_tx_intrs, int, 1);
5797 module_param(rmac_pause_time, int, 0);
5798 module_param(mc_pause_threshold_q0q3, int, 0);
5799 module_param(mc_pause_threshold_q4q7, int, 0);
5800 module_param(shared_splits, int, 0);
5801 module_param(tmac_util_period, int, 0);
5802 module_param(rmac_util_period, int, 0);
5803 module_param(bimodal, bool, 0);
5804 module_param(l3l4hdr_size, int , 0);
5805 #ifndef CONFIG_S2IO_NAPI
5806 module_param(indicate_max_pkts, int, 0);
5807 #endif
5808 module_param(rxsync_frequency, int, 0);
5809 module_param(intr_type, int, 0);
5810
5811 /**
5812  *  s2io_init_nic - Initialization of the adapter .
5813  *  @pdev : structure containing the PCI related information of the device.
5814  *  @pre: List of PCI devices supported by the driver listed in s2io_tbl.
5815  *  Description:
5816  *  The function initializes an adapter identified by the pci_dec structure.
5817  *  All OS related initialization including memory and device structure and
5818  *  initlaization of the device private variable is done. Also the swapper
5819  *  control register is initialized to enable read and write into the I/O
5820  *  registers of the device.
5821  *  Return value:
5822  *  returns 0 on success and negative on failure.
5823  */
5824
5825 static int __devinit
5826 s2io_init_nic(struct pci_dev *pdev, const struct pci_device_id *pre)
5827 {
5828         nic_t *sp;
5829         struct net_device *dev;
5830         int i, j, ret;
5831         int dma_flag = FALSE;
5832         u32 mac_up, mac_down;
5833         u64 val64 = 0, tmp64 = 0;
5834         XENA_dev_config_t __iomem *bar0 = NULL;
5835         u16 subid;
5836         mac_info_t *mac_control;
5837         struct config_param *config;
5838         int mode;
5839         u8 dev_intr_type = intr_type;
5840
5841 #ifdef CONFIG_S2IO_NAPI
5842         if (dev_intr_type != INTA) {
5843                 DBG_PRINT(ERR_DBG, "NAPI cannot be enabled when MSI/MSI-X \
5844 is enabled. Defaulting to INTA\n");
5845                 dev_intr_type = INTA;
5846         }
5847         else
5848                 DBG_PRINT(ERR_DBG, "NAPI support has been enabled\n");
5849 #endif
5850
5851         if ((ret = pci_enable_device(pdev))) {
5852                 DBG_PRINT(ERR_DBG,
5853                           "s2io_init_nic: pci_enable_device failed\n");
5854                 return ret;
5855         }
5856
5857         if (!pci_set_dma_mask(pdev, DMA_64BIT_MASK)) {
5858                 DBG_PRINT(INIT_DBG, "s2io_init_nic: Using 64bit DMA\n");
5859                 dma_flag = TRUE;
5860                 if (pci_set_consistent_dma_mask
5861                     (pdev, DMA_64BIT_MASK)) {
5862                         DBG_PRINT(ERR_DBG,
5863                                   "Unable to obtain 64bit DMA for \
5864                                         consistent allocations\n");
5865                         pci_disable_device(pdev);
5866                         return -ENOMEM;
5867                 }
5868         } else if (!pci_set_dma_mask(pdev, DMA_32BIT_MASK)) {
5869                 DBG_PRINT(INIT_DBG, "s2io_init_nic: Using 32bit DMA\n");
5870         } else {
5871                 pci_disable_device(pdev);
5872                 return -ENOMEM;
5873         }
5874
5875         if ((dev_intr_type == MSI_X) &&
5876                         ((pdev->device != PCI_DEVICE_ID_HERC_WIN) &&
5877                         (pdev->device != PCI_DEVICE_ID_HERC_UNI))) {
5878                 DBG_PRINT(ERR_DBG, "Xframe I does not support MSI_X. \
5879 Defaulting to INTA\n");
5880                 dev_intr_type = INTA;
5881         }
5882         if (dev_intr_type != MSI_X) {
5883                 if (pci_request_regions(pdev, s2io_driver_name)) {
5884                         DBG_PRINT(ERR_DBG, "Request Regions failed\n"),
5885                             pci_disable_device(pdev);
5886                         return -ENODEV;
5887                 }
5888         }
5889         else {
5890                 if (!(request_mem_region(pci_resource_start(pdev, 0),
5891                          pci_resource_len(pdev, 0), s2io_driver_name))) {
5892                         DBG_PRINT(ERR_DBG, "bar0 Request Regions failed\n");
5893                         pci_disable_device(pdev);
5894                         return -ENODEV;
5895                 }
5896                 if (!(request_mem_region(pci_resource_start(pdev, 2),
5897                          pci_resource_len(pdev, 2), s2io_driver_name))) {
5898                         DBG_PRINT(ERR_DBG, "bar1 Request Regions failed\n");
5899                         release_mem_region(pci_resource_start(pdev, 0),
5900                                    pci_resource_len(pdev, 0));
5901                         pci_disable_device(pdev);
5902                         return -ENODEV;
5903                 }
5904         }
5905
5906         dev = alloc_etherdev(sizeof(nic_t));
5907         if (dev == NULL) {
5908                 DBG_PRINT(ERR_DBG, "Device allocation failed\n");
5909                 pci_disable_device(pdev);
5910                 pci_release_regions(pdev);
5911                 return -ENODEV;
5912         }
5913
5914         pci_set_master(pdev);
5915         pci_set_drvdata(pdev, dev);
5916         SET_MODULE_OWNER(dev);
5917         SET_NETDEV_DEV(dev, &pdev->dev);
5918
5919         /*  Private member variable initialized to s2io NIC structure */
5920         sp = dev->priv;
5921         memset(sp, 0, sizeof(nic_t));
5922         sp->dev = dev;
5923         sp->pdev = pdev;
5924         sp->high_dma_flag = dma_flag;
5925         sp->device_enabled_once = FALSE;
5926         if (rx_ring_mode == 1)
5927                 sp->rxd_mode = RXD_MODE_1;
5928         if (rx_ring_mode == 2)
5929                 sp->rxd_mode = RXD_MODE_3B;
5930         if (rx_ring_mode == 3)
5931                 sp->rxd_mode = RXD_MODE_3A;
5932
5933         sp->intr_type = dev_intr_type;
5934
5935         if ((pdev->device == PCI_DEVICE_ID_HERC_WIN) ||
5936                 (pdev->device == PCI_DEVICE_ID_HERC_UNI))
5937                 sp->device_type = XFRAME_II_DEVICE;
5938         else
5939                 sp->device_type = XFRAME_I_DEVICE;
5940
5941
5942         /* Initialize some PCI/PCI-X fields of the NIC. */
5943         s2io_init_pci(sp);
5944
5945         /*
5946          * Setting the device configuration parameters.
5947          * Most of these parameters can be specified by the user during
5948          * module insertion as they are module loadable parameters. If
5949          * these parameters are not not specified during load time, they
5950          * are initialized with default values.
5951          */
5952         mac_control = &sp->mac_control;
5953         config = &sp->config;
5954
5955         /* Tx side parameters. */
5956         if (tx_fifo_len[0] == 0)
5957                 tx_fifo_len[0] = DEFAULT_FIFO_LEN; /* Default value. */
5958         config->tx_fifo_num = tx_fifo_num;
5959         for (i = 0; i < MAX_TX_FIFOS; i++) {
5960                 config->tx_cfg[i].fifo_len = tx_fifo_len[i];
5961                 config->tx_cfg[i].fifo_priority = i;
5962         }
5963
5964         /* mapping the QoS priority to the configured fifos */
5965         for (i = 0; i < MAX_TX_FIFOS; i++)
5966                 config->fifo_mapping[i] = fifo_map[config->tx_fifo_num][i];
5967
5968         config->tx_intr_type = TXD_INT_TYPE_UTILZ;
5969         for (i = 0; i < config->tx_fifo_num; i++) {
5970                 config->tx_cfg[i].f_no_snoop =
5971                     (NO_SNOOP_TXD | NO_SNOOP_TXD_BUFFER);
5972                 if (config->tx_cfg[i].fifo_len < 65) {
5973                         config->tx_intr_type = TXD_INT_TYPE_PER_LIST;
5974                         break;
5975                 }
5976         }
5977         /* + 2 because one Txd for skb->data and one Txd for UFO */
5978         config->max_txds = MAX_SKB_FRAGS + 2;
5979
5980         /* Rx side parameters. */
5981         if (rx_ring_sz[0] == 0)
5982                 rx_ring_sz[0] = SMALL_BLK_CNT; /* Default value. */
5983         config->rx_ring_num = rx_ring_num;
5984         for (i = 0; i < MAX_RX_RINGS; i++) {
5985                 config->rx_cfg[i].num_rxd = rx_ring_sz[i] *
5986                     (rxd_count[sp->rxd_mode] + 1);
5987                 config->rx_cfg[i].ring_priority = i;
5988         }
5989
5990         for (i = 0; i < rx_ring_num; i++) {
5991                 config->rx_cfg[i].ring_org = RING_ORG_BUFF1;
5992                 config->rx_cfg[i].f_no_snoop =
5993                     (NO_SNOOP_RXD | NO_SNOOP_RXD_BUFFER);
5994         }
5995
5996         /*  Setting Mac Control parameters */
5997         mac_control->rmac_pause_time = rmac_pause_time;
5998         mac_control->mc_pause_threshold_q0q3 = mc_pause_threshold_q0q3;
5999         mac_control->mc_pause_threshold_q4q7 = mc_pause_threshold_q4q7;
6000
6001
6002         /* Initialize Ring buffer parameters. */
6003         for (i = 0; i < config->rx_ring_num; i++)
6004                 atomic_set(&sp->rx_bufs_left[i], 0);
6005
6006         /* Initialize the number of ISRs currently running */
6007         atomic_set(&sp->isr_cnt, 0);
6008
6009         /*  initialize the shared memory used by the NIC and the host */
6010         if (init_shared_mem(sp)) {
6011                 DBG_PRINT(ERR_DBG, "%s: Memory allocation failed\n",
6012                           __FUNCTION__);
6013                 ret = -ENOMEM;
6014                 goto mem_alloc_failed;
6015         }
6016
6017         sp->bar0 = ioremap(pci_resource_start(pdev, 0),
6018                                      pci_resource_len(pdev, 0));
6019         if (!sp->bar0) {
6020                 DBG_PRINT(ERR_DBG, "%s: S2IO: cannot remap io mem1\n",
6021                           dev->name);
6022                 ret = -ENOMEM;
6023                 goto bar0_remap_failed;
6024         }
6025
6026         sp->bar1 = ioremap(pci_resource_start(pdev, 2),
6027                                      pci_resource_len(pdev, 2));
6028         if (!sp->bar1) {
6029                 DBG_PRINT(ERR_DBG, "%s: S2IO: cannot remap io mem2\n",
6030                           dev->name);
6031                 ret = -ENOMEM;
6032                 goto bar1_remap_failed;
6033         }
6034
6035         dev->irq = pdev->irq;
6036         dev->base_addr = (unsigned long) sp->bar0;
6037
6038         /* Initializing the BAR1 address as the start of the FIFO pointer. */
6039         for (j = 0; j < MAX_TX_FIFOS; j++) {
6040                 mac_control->tx_FIFO_start[j] = (TxFIFO_element_t __iomem *)
6041                     (sp->bar1 + (j * 0x00020000));
6042         }
6043
6044         /*  Driver entry points */
6045         dev->open = &s2io_open;
6046         dev->stop = &s2io_close;
6047         dev->hard_start_xmit = &s2io_xmit;
6048         dev->get_stats = &s2io_get_stats;
6049         dev->set_multicast_list = &s2io_set_multicast;
6050         dev->do_ioctl = &s2io_ioctl;
6051         dev->change_mtu = &s2io_change_mtu;
6052         SET_ETHTOOL_OPS(dev, &netdev_ethtool_ops);
6053         dev->features |= NETIF_F_HW_VLAN_TX | NETIF_F_HW_VLAN_RX;
6054         dev->vlan_rx_register = s2io_vlan_rx_register;
6055         dev->vlan_rx_kill_vid = (void *)s2io_vlan_rx_kill_vid;
6056
6057         /*
6058          * will use eth_mac_addr() for  dev->set_mac_address
6059          * mac address will be set every time dev->open() is called
6060          */
6061 #if defined(CONFIG_S2IO_NAPI)
6062         dev->poll = s2io_poll;
6063         dev->weight = 32;
6064 #endif
6065
6066         dev->features |= NETIF_F_SG | NETIF_F_IP_CSUM;
6067         if (sp->high_dma_flag == TRUE)
6068                 dev->features |= NETIF_F_HIGHDMA;
6069 #ifdef NETIF_F_TSO
6070         dev->features |= NETIF_F_TSO;
6071 #endif
6072         if (sp->device_type & XFRAME_II_DEVICE) {
6073                 dev->features |= NETIF_F_UFO;
6074                 dev->features |= NETIF_F_HW_CSUM;
6075         }
6076
6077         dev->tx_timeout = &s2io_tx_watchdog;
6078         dev->watchdog_timeo = WATCH_DOG_TIMEOUT;
6079         INIT_WORK(&sp->rst_timer_task,
6080                   (void (*)(void *)) s2io_restart_nic, dev);
6081         INIT_WORK(&sp->set_link_task,
6082                   (void (*)(void *)) s2io_set_link, sp);
6083
6084         pci_save_state(sp->pdev);
6085
6086         /* Setting swapper control on the NIC, for proper reset operation */
6087         if (s2io_set_swapper(sp)) {
6088                 DBG_PRINT(ERR_DBG, "%s:swapper settings are wrong\n",
6089                           dev->name);
6090                 ret = -EAGAIN;
6091                 goto set_swap_failed;
6092         }
6093
6094         /* Verify if the Herc works on the slot its placed into */
6095         if (sp->device_type & XFRAME_II_DEVICE) {
6096                 mode = s2io_verify_pci_mode(sp);
6097                 if (mode < 0) {
6098                         DBG_PRINT(ERR_DBG, "%s: ", __FUNCTION__);
6099                         DBG_PRINT(ERR_DBG, " Unsupported PCI bus mode\n");
6100                         ret = -EBADSLT;
6101                         goto set_swap_failed;
6102                 }
6103         }
6104
6105         /* Not needed for Herc */
6106         if (sp->device_type & XFRAME_I_DEVICE) {
6107                 /*
6108                  * Fix for all "FFs" MAC address problems observed on
6109                  * Alpha platforms
6110                  */
6111                 fix_mac_address(sp);
6112                 s2io_reset(sp);
6113         }
6114
6115         /*
6116          * MAC address initialization.
6117          * For now only one mac address will be read and used.
6118          */
6119         bar0 = sp->bar0;
6120         val64 = RMAC_ADDR_CMD_MEM_RD | RMAC_ADDR_CMD_MEM_STROBE_NEW_CMD |
6121             RMAC_ADDR_CMD_MEM_OFFSET(0 + MAC_MAC_ADDR_START_OFFSET);
6122         writeq(val64, &bar0->rmac_addr_cmd_mem);
6123         wait_for_cmd_complete(sp);
6124
6125         tmp64 = readq(&bar0->rmac_addr_data0_mem);
6126         mac_down = (u32) tmp64;
6127         mac_up = (u32) (tmp64 >> 32);
6128
6129         memset(sp->def_mac_addr[0].mac_addr, 0, sizeof(ETH_ALEN));
6130
6131         sp->def_mac_addr[0].mac_addr[3] = (u8) (mac_up);
6132         sp->def_mac_addr[0].mac_addr[2] = (u8) (mac_up >> 8);
6133         sp->def_mac_addr[0].mac_addr[1] = (u8) (mac_up >> 16);
6134         sp->def_mac_addr[0].mac_addr[0] = (u8) (mac_up >> 24);
6135         sp->def_mac_addr[0].mac_addr[5] = (u8) (mac_down >> 16);
6136         sp->def_mac_addr[0].mac_addr[4] = (u8) (mac_down >> 24);
6137
6138         /*  Set the factory defined MAC address initially   */
6139         dev->addr_len = ETH_ALEN;
6140         memcpy(dev->dev_addr, sp->def_mac_addr, ETH_ALEN);
6141
6142         /*
6143          * Initialize the tasklet status and link state flags
6144          * and the card state parameter
6145          */
6146         atomic_set(&(sp->card_state), 0);
6147         sp->tasklet_status = 0;
6148         sp->link_state = 0;
6149
6150         /* Initialize spinlocks */
6151         spin_lock_init(&sp->tx_lock);
6152 #ifndef CONFIG_S2IO_NAPI
6153         spin_lock_init(&sp->put_lock);
6154 #endif
6155         spin_lock_init(&sp->rx_lock);
6156
6157         /*
6158          * SXE-002: Configure link and activity LED to init state
6159          * on driver load.
6160          */
6161         subid = sp->pdev->subsystem_device;
6162         if ((subid & 0xFF) >= 0x07) {
6163                 val64 = readq(&bar0->gpio_control);
6164                 val64 |= 0x0000800000000000ULL;
6165                 writeq(val64, &bar0->gpio_control);
6166                 val64 = 0x0411040400000000ULL;
6167                 writeq(val64, (void __iomem *) bar0 + 0x2700);
6168                 val64 = readq(&bar0->gpio_control);
6169         }
6170
6171         sp->rx_csum = 1;        /* Rx chksum verify enabled by default */
6172
6173         if (register_netdev(dev)) {
6174                 DBG_PRINT(ERR_DBG, "Device registration failed\n");
6175                 ret = -ENODEV;
6176                 goto register_failed;
6177         }
6178
6179         if (sp->device_type & XFRAME_II_DEVICE) {
6180                 DBG_PRINT(ERR_DBG, "%s: Neterion Xframe II 10GbE adapter ",
6181                           dev->name);
6182                 DBG_PRINT(ERR_DBG, "(rev %d), Version %s",
6183                                 get_xena_rev_id(sp->pdev),
6184                                 s2io_driver_version);
6185                 switch(sp->intr_type) {
6186                         case INTA:
6187                                 DBG_PRINT(ERR_DBG, ", Intr type INTA");
6188                                 break;
6189                         case MSI:
6190                                 DBG_PRINT(ERR_DBG, ", Intr type MSI");
6191                                 break;
6192                         case MSI_X:
6193                                 DBG_PRINT(ERR_DBG, ", Intr type MSI-X");
6194                                 break;
6195                 }
6196
6197                 DBG_PRINT(ERR_DBG, "\nCopyright(c) 2002-2005 Neterion Inc.\n");
6198                 DBG_PRINT(ERR_DBG, "MAC ADDR: %02x:%02x:%02x:%02x:%02x:%02x\n",
6199                           sp->def_mac_addr[0].mac_addr[0],
6200                           sp->def_mac_addr[0].mac_addr[1],
6201                           sp->def_mac_addr[0].mac_addr[2],
6202                           sp->def_mac_addr[0].mac_addr[3],
6203                           sp->def_mac_addr[0].mac_addr[4],
6204                           sp->def_mac_addr[0].mac_addr[5]);
6205                 mode = s2io_print_pci_mode(sp);
6206                 if (mode < 0) {
6207                         DBG_PRINT(ERR_DBG, " Unsupported PCI bus mode ");
6208                         ret = -EBADSLT;
6209                         goto set_swap_failed;
6210                 }
6211         } else {
6212                 DBG_PRINT(ERR_DBG, "%s: Neterion Xframe I 10GbE adapter ",
6213                           dev->name);
6214                 DBG_PRINT(ERR_DBG, "(rev %d), Version %s",
6215                                         get_xena_rev_id(sp->pdev),
6216                                         s2io_driver_version);
6217                 switch(sp->intr_type) {
6218                         case INTA:
6219                                 DBG_PRINT(ERR_DBG, ", Intr type INTA");
6220                                 break;
6221                         case MSI:
6222                                 DBG_PRINT(ERR_DBG, ", Intr type MSI");
6223                                 break;
6224                         case MSI_X:
6225                                 DBG_PRINT(ERR_DBG, ", Intr type MSI-X");
6226                                 break;
6227                 }
6228                 DBG_PRINT(ERR_DBG, "\nCopyright(c) 2002-2005 Neterion Inc.\n");
6229                 DBG_PRINT(ERR_DBG, "MAC ADDR: %02x:%02x:%02x:%02x:%02x:%02x\n",
6230                           sp->def_mac_addr[0].mac_addr[0],
6231                           sp->def_mac_addr[0].mac_addr[1],
6232                           sp->def_mac_addr[0].mac_addr[2],
6233                           sp->def_mac_addr[0].mac_addr[3],
6234                           sp->def_mac_addr[0].mac_addr[4],
6235                           sp->def_mac_addr[0].mac_addr[5]);
6236         }
6237         if (sp->rxd_mode == RXD_MODE_3B)
6238                 DBG_PRINT(ERR_DBG, "%s: 2-Buffer mode support has been "
6239                           "enabled\n",dev->name);
6240         if (sp->rxd_mode == RXD_MODE_3A)
6241                 DBG_PRINT(ERR_DBG, "%s: 3-Buffer mode support has been "
6242                           "enabled\n",dev->name);
6243
6244         /* Initialize device name */
6245         strcpy(sp->name, dev->name);
6246         if (sp->device_type & XFRAME_II_DEVICE)
6247                 strcat(sp->name, ": Neterion Xframe II 10GbE adapter");
6248         else
6249                 strcat(sp->name, ": Neterion Xframe I 10GbE adapter");
6250
6251         /* Initialize bimodal Interrupts */
6252         sp->config.bimodal = bimodal;
6253         if (!(sp->device_type & XFRAME_II_DEVICE) && bimodal) {
6254                 sp->config.bimodal = 0;
6255                 DBG_PRINT(ERR_DBG,"%s:Bimodal intr not supported by Xframe I\n",
6256                         dev->name);
6257         }
6258
6259         /*
6260          * Make Link state as off at this point, when the Link change
6261          * interrupt comes the state will be automatically changed to
6262          * the right state.
6263          */
6264         netif_carrier_off(dev);
6265
6266         return 0;
6267
6268       register_failed:
6269       set_swap_failed:
6270         iounmap(sp->bar1);
6271       bar1_remap_failed:
6272         iounmap(sp->bar0);
6273       bar0_remap_failed:
6274       mem_alloc_failed:
6275         free_shared_mem(sp);
6276         pci_disable_device(pdev);
6277         if (dev_intr_type != MSI_X)
6278                 pci_release_regions(pdev);
6279         else {
6280                 release_mem_region(pci_resource_start(pdev, 0),
6281                         pci_resource_len(pdev, 0));
6282                 release_mem_region(pci_resource_start(pdev, 2),
6283                         pci_resource_len(pdev, 2));
6284         }
6285         pci_set_drvdata(pdev, NULL);
6286         free_netdev(dev);
6287
6288         return ret;
6289 }
6290
6291 /**
6292  * s2io_rem_nic - Free the PCI device
6293  * @pdev: structure containing the PCI related information of the device.
6294  * Description: This function is called by the Pci subsystem to release a
6295  * PCI device and free up all resource held up by the device. This could
6296  * be in response to a Hot plug event or when the driver is to be removed
6297  * from memory.
6298  */
6299
6300 static void __devexit s2io_rem_nic(struct pci_dev *pdev)
6301 {
6302         struct net_device *dev =
6303             (struct net_device *) pci_get_drvdata(pdev);
6304         nic_t *sp;
6305
6306         if (dev == NULL) {
6307                 DBG_PRINT(ERR_DBG, "Driver Data is NULL!!\n");
6308                 return;
6309         }
6310
6311         sp = dev->priv;
6312         unregister_netdev(dev);
6313
6314         free_shared_mem(sp);
6315         iounmap(sp->bar0);
6316         iounmap(sp->bar1);
6317         pci_disable_device(pdev);
6318         if (sp->intr_type != MSI_X)
6319                 pci_release_regions(pdev);
6320         else {
6321                 release_mem_region(pci_resource_start(pdev, 0),
6322                         pci_resource_len(pdev, 0));
6323                 release_mem_region(pci_resource_start(pdev, 2),
6324                         pci_resource_len(pdev, 2));
6325         }
6326         pci_set_drvdata(pdev, NULL);
6327         free_netdev(dev);
6328 }
6329
6330 /**
6331  * s2io_starter - Entry point for the driver
6332  * Description: This function is the entry point for the driver. It verifies
6333  * the module loadable parameters and initializes PCI configuration space.
6334  */
6335
6336 int __init s2io_starter(void)
6337 {
6338         return pci_module_init(&s2io_driver);
6339 }
6340
6341 /**
6342  * s2io_closer - Cleanup routine for the driver
6343  * Description: This function is the cleanup routine for the driver. It unregist * ers the driver.
6344  */
6345
6346 void s2io_closer(void)
6347 {
6348         pci_unregister_driver(&s2io_driver);
6349         DBG_PRINT(INIT_DBG, "cleanup done\n");
6350 }
6351
6352 module_init(s2io_starter);
6353 module_exit(s2io_closer);