Merge branch 'for-linus' of git://git.o-hand.com/linux-rpurdie-leds
[linux-2.6] / drivers / net / netxen / netxen_nic_hw.c
1 /*
2  * Copyright (C) 2003 - 2006 NetXen, Inc.
3  * All rights reserved.
4  *
5  * This program is free software; you can redistribute it and/or
6  * modify it under the terms of the GNU General Public License
7  * as published by the Free Software Foundation; either version 2
8  * of the License, or (at your option) any later version.
9  *
10  * This program is distributed in the hope that it will be useful, but
11  * WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with this program; if not, write to the Free Software
17  * Foundation, Inc., 59 Temple Place - Suite 330, Boston,
18  * MA  02111-1307, USA.
19  *
20  * The full GNU General Public License is included in this distribution
21  * in the file called LICENSE.
22  *
23  * Contact Information:
24  *    info@netxen.com
25  * NetXen,
26  * 3965 Freedom Circle, Fourth floor,
27  * Santa Clara, CA 95054
28  *
29  *
30  * Source file for NIC routines to access the Phantom hardware
31  *
32  */
33
34 #include "netxen_nic.h"
35 #include "netxen_nic_hw.h"
36 #include "netxen_nic_phan_reg.h"
37
38 /*  PCI Windowing for DDR regions.  */
39
40 #define ADDR_IN_RANGE(addr, low, high)  \
41         (((addr) <= (high)) && ((addr) >= (low)))
42
43 #define NETXEN_FLASH_BASE       (BOOTLD_START)
44 #define NETXEN_PHANTOM_MEM_BASE (NETXEN_FLASH_BASE)
45 #define NETXEN_MAX_MTU          8000 + NETXEN_ENET_HEADER_SIZE + NETXEN_ETH_FCS_SIZE
46 #define NETXEN_MIN_MTU          64
47 #define NETXEN_ETH_FCS_SIZE     4
48 #define NETXEN_ENET_HEADER_SIZE 14
49 #define NETXEN_WINDOW_ONE       0x2000000       /*CRB Window: bit 25 of CRB address */
50 #define NETXEN_FIRMWARE_LEN     ((16 * 1024) / 4)
51 #define NETXEN_NIU_HDRSIZE      (0x1 << 6)
52 #define NETXEN_NIU_TLRSIZE      (0x1 << 5)
53
54 #define lower32(x)              ((u32)((x) & 0xffffffff))
55 #define upper32(x)                      \
56         ((u32)(((unsigned long long)(x) >> 32) & 0xffffffff))
57
58 #define NETXEN_NIC_ZERO_PAUSE_ADDR     0ULL
59 #define NETXEN_NIC_UNIT_PAUSE_ADDR     0x200ULL
60 #define NETXEN_NIC_EPG_PAUSE_ADDR1     0x2200010000c28001ULL
61 #define NETXEN_NIC_EPG_PAUSE_ADDR2     0x0100088866554433ULL
62
63 #define NETXEN_NIC_WINDOW_MARGIN 0x100000
64
65 unsigned long netxen_nic_pci_set_window(struct netxen_adapter *adapter,
66                                         unsigned long long addr);
67 void netxen_free_hw_resources(struct netxen_adapter *adapter);
68
69 int netxen_nic_set_mac(struct net_device *netdev, void *p)
70 {
71         struct netxen_port *port = netdev_priv(netdev);
72         struct netxen_adapter *adapter = port->adapter;
73         struct sockaddr *addr = p;
74
75         if (netif_running(netdev))
76                 return -EBUSY;
77
78         if (!is_valid_ether_addr(addr->sa_data))
79                 return -EADDRNOTAVAIL;
80
81         DPRINTK(INFO, "valid ether addr\n");
82         memcpy(netdev->dev_addr, addr->sa_data, netdev->addr_len);
83
84         if (adapter->macaddr_set)
85                 adapter->macaddr_set(port, addr->sa_data);
86
87         return 0;
88 }
89
90 /*
91  * netxen_nic_set_multi - Multicast
92  */
93 void netxen_nic_set_multi(struct net_device *netdev)
94 {
95         struct netxen_port *port = netdev_priv(netdev);
96         struct netxen_adapter *adapter = port->adapter;
97         struct dev_mc_list *mc_ptr;
98         __u32 netxen_mac_addr_cntl_data = 0;
99
100         mc_ptr = netdev->mc_list;
101         if (netdev->flags & IFF_PROMISC) {
102                 if (adapter->set_promisc)
103                         adapter->set_promisc(adapter,
104                                              port->portnum,
105                                              NETXEN_NIU_PROMISC_MODE);
106         } else {
107                 if (adapter->unset_promisc &&
108                     adapter->ahw.boardcfg.board_type
109                     != NETXEN_BRDTYPE_P2_SB31_10G_IMEZ)
110                         adapter->unset_promisc(adapter,
111                                                port->portnum,
112                                                NETXEN_NIU_NON_PROMISC_MODE);
113         }
114         if (adapter->ahw.board_type == NETXEN_NIC_XGBE) {
115                 netxen_nic_mcr_set_mode_select(netxen_mac_addr_cntl_data, 0x03);
116                 netxen_nic_mcr_set_id_pool0(netxen_mac_addr_cntl_data, 0x00);
117                 netxen_nic_mcr_set_id_pool1(netxen_mac_addr_cntl_data, 0x00);
118                 netxen_nic_mcr_set_id_pool2(netxen_mac_addr_cntl_data, 0x00);
119                 netxen_nic_mcr_set_id_pool3(netxen_mac_addr_cntl_data, 0x00);
120                 netxen_nic_mcr_set_enable_xtnd0(netxen_mac_addr_cntl_data);
121                 netxen_nic_mcr_set_enable_xtnd1(netxen_mac_addr_cntl_data);
122                 netxen_nic_mcr_set_enable_xtnd2(netxen_mac_addr_cntl_data);
123                 netxen_nic_mcr_set_enable_xtnd3(netxen_mac_addr_cntl_data);
124         } else {
125                 netxen_nic_mcr_set_mode_select(netxen_mac_addr_cntl_data, 0x00);
126                 netxen_nic_mcr_set_id_pool0(netxen_mac_addr_cntl_data, 0x00);
127                 netxen_nic_mcr_set_id_pool1(netxen_mac_addr_cntl_data, 0x01);
128                 netxen_nic_mcr_set_id_pool2(netxen_mac_addr_cntl_data, 0x02);
129                 netxen_nic_mcr_set_id_pool3(netxen_mac_addr_cntl_data, 0x03);
130         }
131         writel(netxen_mac_addr_cntl_data,
132                NETXEN_CRB_NORMALIZE(adapter, NETXEN_MAC_ADDR_CNTL_REG));
133         if (adapter->ahw.board_type == NETXEN_NIC_XGBE) {
134                 writel(netxen_mac_addr_cntl_data,
135                        NETXEN_CRB_NORMALIZE(adapter,
136                                             NETXEN_MULTICAST_ADDR_HI_0));
137         } else {
138                 writel(netxen_mac_addr_cntl_data,
139                        NETXEN_CRB_NORMALIZE(adapter,
140                                             NETXEN_MULTICAST_ADDR_HI_1));
141         }
142         netxen_mac_addr_cntl_data = 0;
143         writel(netxen_mac_addr_cntl_data,
144                NETXEN_CRB_NORMALIZE(adapter, NETXEN_NIU_GB_DROP_WRONGADDR));
145 }
146
147 /*
148  * netxen_nic_change_mtu - Change the Maximum Transfer Unit
149  * @returns 0 on success, negative on failure
150  */
151 int netxen_nic_change_mtu(struct net_device *netdev, int mtu)
152 {
153         struct netxen_port *port = netdev_priv(netdev);
154         struct netxen_adapter *adapter = port->adapter;
155         int eff_mtu = mtu + NETXEN_ENET_HEADER_SIZE + NETXEN_ETH_FCS_SIZE;
156
157         if ((eff_mtu > NETXEN_MAX_MTU) || (eff_mtu < NETXEN_MIN_MTU)) {
158                 printk(KERN_ERR "%s: %s %d is not supported.\n",
159                        netxen_nic_driver_name, netdev->name, mtu);
160                 return -EINVAL;
161         }
162
163         if (adapter->set_mtu)
164                 adapter->set_mtu(port, mtu);
165         netdev->mtu = mtu;
166
167         return 0;
168 }
169
170 /*
171  * check if the firmware has been downloaded and ready to run  and
172  * setup the address for the descriptors in the adapter
173  */
174 int netxen_nic_hw_resources(struct netxen_adapter *adapter)
175 {
176         struct netxen_hardware_context *hw = &adapter->ahw;
177         u32 state = 0;
178         void *addr;
179         int loops = 0, err = 0;
180         int ctx, ring;
181         u32 card_cmdring = 0;
182         struct netxen_recv_context *recv_ctx;
183         struct netxen_rcv_desc_ctx *rcv_desc;
184
185         DPRINTK(INFO, "crb_base: %lx %x", NETXEN_PCI_CRBSPACE,
186                 PCI_OFFSET_SECOND_RANGE(adapter, NETXEN_PCI_CRBSPACE));
187         DPRINTK(INFO, "cam base: %lx %x", NETXEN_CRB_CAM,
188                 pci_base_offset(adapter, NETXEN_CRB_CAM));
189         DPRINTK(INFO, "cam RAM: %lx %x", NETXEN_CAM_RAM_BASE,
190                 pci_base_offset(adapter, NETXEN_CAM_RAM_BASE));
191
192         /* Window 1 call */
193         card_cmdring = readl(NETXEN_CRB_NORMALIZE(adapter, CRB_CMDPEG_CMDRING));
194
195         DPRINTK(INFO, "Command Peg sends 0x%x for cmdring base\n",
196                 card_cmdring);
197
198         for (ctx = 0; ctx < MAX_RCV_CTX; ++ctx) {
199                 DPRINTK(INFO, "Command Peg ready..waiting for rcv peg\n");
200                 loops = 0;
201                 state = 0;
202                 /* Window 1 call */
203                 state = readl(NETXEN_CRB_NORMALIZE(adapter,
204                                                    recv_crb_registers[ctx].
205                                                    crb_rcvpeg_state));
206                 while (state != PHAN_PEG_RCV_INITIALIZED && loops < 20) {
207                         udelay(100);
208                         /* Window 1 call */
209                         state = readl(NETXEN_CRB_NORMALIZE(adapter,
210                                                            recv_crb_registers
211                                                            [ctx].
212                                                            crb_rcvpeg_state));
213                         loops++;
214                 }
215                 if (loops >= 20) {
216                         printk(KERN_ERR "Rcv Peg initialization not complete:"
217                                "%x.\n", state);
218                         err = -EIO;
219                         return err;
220                 }
221         }
222         DPRINTK(INFO, "Recieve Peg ready too. starting stuff\n");
223
224         addr = netxen_alloc(adapter->ahw.pdev,
225                             sizeof(struct netxen_ring_ctx) +
226                             sizeof(uint32_t),
227                             (dma_addr_t *) & adapter->ctx_desc_phys_addr,
228                             &adapter->ctx_desc_pdev);
229
230         printk("ctx_desc_phys_addr: 0x%llx\n",
231                (u64) adapter->ctx_desc_phys_addr);
232         if (addr == NULL) {
233                 DPRINTK(ERR, "bad return from pci_alloc_consistent\n");
234                 err = -ENOMEM;
235                 return err;
236         }
237         memset(addr, 0, sizeof(struct netxen_ring_ctx));
238         adapter->ctx_desc = (struct netxen_ring_ctx *)addr;
239         adapter->ctx_desc->cmd_consumer_offset =
240             cpu_to_le64(adapter->ctx_desc_phys_addr +
241                         sizeof(struct netxen_ring_ctx));
242         adapter->cmd_consumer = (uint32_t *) (((char *)addr) +
243                                               sizeof(struct netxen_ring_ctx));
244
245         addr = pci_alloc_consistent(adapter->ahw.pdev,
246                                     sizeof(struct cmd_desc_type0) *
247                                     adapter->max_tx_desc_count,
248                                     (dma_addr_t *) & hw->cmd_desc_phys_addr);
249         printk("cmd_desc_phys_addr: 0x%llx\n", (u64) hw->cmd_desc_phys_addr);
250
251         if (addr == NULL) {
252                 DPRINTK(ERR, "bad return from pci_alloc_consistent\n");
253                 netxen_free_hw_resources(adapter);
254                 return -ENOMEM;
255         }
256
257         adapter->ctx_desc->cmd_ring_addr =
258                 cpu_to_le64(hw->cmd_desc_phys_addr);
259         adapter->ctx_desc->cmd_ring_size =
260                 cpu_to_le32(adapter->max_tx_desc_count);
261
262         hw->cmd_desc_head = (struct cmd_desc_type0 *)addr;
263
264         for (ctx = 0; ctx < MAX_RCV_CTX; ++ctx) {
265                 recv_ctx = &adapter->recv_ctx[ctx];
266
267                 for (ring = 0; ring < NUM_RCV_DESC_RINGS; ring++) {
268                         rcv_desc = &recv_ctx->rcv_desc[ring];
269                         addr = netxen_alloc(adapter->ahw.pdev,
270                                             RCV_DESC_RINGSIZE,
271                                             &rcv_desc->phys_addr,
272                                             &rcv_desc->phys_pdev);
273                         if (addr == NULL) {
274                                 DPRINTK(ERR, "bad return from "
275                                         "pci_alloc_consistent\n");
276                                 netxen_free_hw_resources(adapter);
277                                 err = -ENOMEM;
278                                 return err;
279                         }
280                         rcv_desc->desc_head = (struct rcv_desc *)addr;
281                         adapter->ctx_desc->rcv_ctx[ring].rcv_ring_addr =
282                             cpu_to_le64(rcv_desc->phys_addr);
283                         adapter->ctx_desc->rcv_ctx[ring].rcv_ring_size =
284                             cpu_to_le32(rcv_desc->max_rx_desc_count);
285                 }
286
287                 addr = netxen_alloc(adapter->ahw.pdev, STATUS_DESC_RINGSIZE,
288                                     &recv_ctx->rcv_status_desc_phys_addr,
289                                     &recv_ctx->rcv_status_desc_pdev);
290                 if (addr == NULL) {
291                         DPRINTK(ERR, "bad return from"
292                                 " pci_alloc_consistent\n");
293                         netxen_free_hw_resources(adapter);
294                         err = -ENOMEM;
295                         return err;
296                 }
297                 recv_ctx->rcv_status_desc_head = (struct status_desc *)addr;
298                 adapter->ctx_desc->sts_ring_addr =
299                     cpu_to_le64(recv_ctx->rcv_status_desc_phys_addr);
300                 adapter->ctx_desc->sts_ring_size =
301                     cpu_to_le32(adapter->max_rx_desc_count);
302
303         }
304         /* Window = 1 */
305
306         writel(lower32(adapter->ctx_desc_phys_addr),
307                NETXEN_CRB_NORMALIZE(adapter, CRB_CTX_ADDR_REG_LO));
308         writel(upper32(adapter->ctx_desc_phys_addr),
309                NETXEN_CRB_NORMALIZE(adapter, CRB_CTX_ADDR_REG_HI));
310         writel(NETXEN_CTX_SIGNATURE,
311                NETXEN_CRB_NORMALIZE(adapter, CRB_CTX_SIGNATURE_REG));
312         return err;
313 }
314
315 void netxen_free_hw_resources(struct netxen_adapter *adapter)
316 {
317         struct netxen_recv_context *recv_ctx;
318         struct netxen_rcv_desc_ctx *rcv_desc;
319         int ctx, ring;
320
321         if (adapter->ctx_desc != NULL) {
322                 pci_free_consistent(adapter->ctx_desc_pdev,
323                                     sizeof(struct netxen_ring_ctx) +
324                                     sizeof(uint32_t),
325                                     adapter->ctx_desc,
326                                     adapter->ctx_desc_phys_addr);
327                 adapter->ctx_desc = NULL;
328         }
329
330         if (adapter->ahw.cmd_desc_head != NULL) {
331                 pci_free_consistent(adapter->ahw.cmd_desc_pdev,
332                                     sizeof(struct cmd_desc_type0) *
333                                     adapter->max_tx_desc_count,
334                                     adapter->ahw.cmd_desc_head,
335                                     adapter->ahw.cmd_desc_phys_addr);
336                 adapter->ahw.cmd_desc_head = NULL;
337         }
338         /* Special handling: there are 2 ports on this board */
339         if (adapter->ahw.boardcfg.board_type == NETXEN_BRDTYPE_P2_SB31_10G_IMEZ) {
340                 adapter->ahw.max_ports = 2;
341         }
342
343         for (ctx = 0; ctx < MAX_RCV_CTX; ++ctx) {
344                 recv_ctx = &adapter->recv_ctx[ctx];
345                 for (ring = 0; ring < NUM_RCV_DESC_RINGS; ring++) {
346                         rcv_desc = &recv_ctx->rcv_desc[ring];
347
348                         if (rcv_desc->desc_head != NULL) {
349                                 pci_free_consistent(rcv_desc->phys_pdev,
350                                                     RCV_DESC_RINGSIZE,
351                                                     rcv_desc->desc_head,
352                                                     rcv_desc->phys_addr);
353                                 rcv_desc->desc_head = NULL;
354                         }
355                 }
356
357                 if (recv_ctx->rcv_status_desc_head != NULL) {
358                         pci_free_consistent(recv_ctx->rcv_status_desc_pdev,
359                                             STATUS_DESC_RINGSIZE,
360                                             recv_ctx->rcv_status_desc_head,
361                                             recv_ctx->
362                                             rcv_status_desc_phys_addr);
363                         recv_ctx->rcv_status_desc_head = NULL;
364                 }
365         }
366 }
367
368 void netxen_tso_check(struct netxen_adapter *adapter,
369                       struct cmd_desc_type0 *desc, struct sk_buff *skb)
370 {
371         if (desc->mss) {
372                 desc->total_hdr_length = sizeof(struct ethhdr) +
373                     ((skb->nh.iph)->ihl * sizeof(u32)) +
374                     ((skb->h.th)->doff * sizeof(u32));
375                 netxen_set_cmd_desc_opcode(desc, TX_TCP_LSO);
376         } else if (skb->ip_summed == CHECKSUM_PARTIAL) {
377                 if (skb->nh.iph->protocol == IPPROTO_TCP) {
378                         netxen_set_cmd_desc_opcode(desc, TX_TCP_PKT);
379                 } else if (skb->nh.iph->protocol == IPPROTO_UDP) {
380                         netxen_set_cmd_desc_opcode(desc, TX_UDP_PKT);
381                 } else {
382                         return;
383                 }
384         }
385         adapter->stats.xmitcsummed++;
386         desc->tcp_hdr_offset = skb->h.raw - skb->data;
387         desc->ip_hdr_offset = skb->nh.raw - skb->data;
388 }
389
390 int netxen_is_flash_supported(struct netxen_adapter *adapter)
391 {
392         const int locs[] = { 0, 0x4, 0x100, 0x4000, 0x4128 };
393         int addr, val01, val02, i, j;
394
395         /* if the flash size less than 4Mb, make huge war cry and die */
396         for (j = 1; j < 4; j++) {
397                 addr = j * NETXEN_NIC_WINDOW_MARGIN;
398                 for (i = 0; i < (sizeof(locs) / sizeof(locs[0])); i++) {
399                         if (netxen_rom_fast_read(adapter, locs[i], &val01) == 0
400                             && netxen_rom_fast_read(adapter, (addr + locs[i]),
401                                                     &val02) == 0) {
402                                 if (val01 == val02)
403                                         return -1;
404                         } else
405                                 return -1;
406                 }
407         }
408
409         return 0;
410 }
411
412 static int netxen_get_flash_block(struct netxen_adapter *adapter, int base,
413                                   int size, u32 * buf)
414 {
415         int i, addr;
416         u32 *ptr32;
417
418         addr = base;
419         ptr32 = buf;
420         for (i = 0; i < size / sizeof(u32); i++) {
421                 if (netxen_rom_fast_read(adapter, addr, ptr32) == -1)
422                         return -1;
423                 *ptr32 = cpu_to_le32(*ptr32);
424                 ptr32++;
425                 addr += sizeof(u32);
426         }
427         if ((char *)buf + size > (char *)ptr32) {
428                 u32 local;
429
430                 if (netxen_rom_fast_read(adapter, addr, &local) == -1)
431                         return -1;
432                 local = cpu_to_le32(local);
433                 memcpy(ptr32, &local, (char *)buf + size - (char *)ptr32);
434         }
435
436         return 0;
437 }
438
439 int netxen_get_flash_mac_addr(struct netxen_adapter *adapter, u64 mac[])
440 {
441         u32 *pmac = (u32 *) & mac[0];
442
443         if (netxen_get_flash_block(adapter,
444                                    USER_START +
445                                    offsetof(struct netxen_new_user_info,
446                                             mac_addr),
447                                    FLASH_NUM_PORTS * sizeof(u64), pmac) == -1) {
448                 return -1;
449         }
450         if (*mac == ~0ULL) {
451                 if (netxen_get_flash_block(adapter,
452                                            USER_START_OLD +
453                                            offsetof(struct netxen_user_old_info,
454                                                     mac_addr),
455                                            FLASH_NUM_PORTS * sizeof(u64),
456                                            pmac) == -1)
457                         return -1;
458                 if (*mac == ~0ULL)
459                         return -1;
460         }
461         return 0;
462 }
463
464 /*
465  * Changes the CRB window to the specified window.
466  */
467 void netxen_nic_pci_change_crbwindow(struct netxen_adapter *adapter, u32 wndw)
468 {
469         void __iomem *offset;
470         u32 tmp;
471         int count = 0;
472
473         if (adapter->curr_window == wndw)
474                 return;
475
476         /*
477          * Move the CRB window.
478          * We need to write to the "direct access" region of PCI
479          * to avoid a race condition where the window register has
480          * not been successfully written across CRB before the target
481          * register address is received by PCI. The direct region bypasses
482          * the CRB bus.
483          */
484         offset =
485             PCI_OFFSET_SECOND_RANGE(adapter,
486                                     NETXEN_PCIX_PH_REG(PCIX_CRB_WINDOW));
487
488         if (wndw & 0x1)
489                 wndw = NETXEN_WINDOW_ONE;
490
491         writel(wndw, offset);
492
493         /* MUST make sure window is set before we forge on... */
494         while ((tmp = readl(offset)) != wndw) {
495                 printk(KERN_WARNING "%s: %s WARNING: CRB window value not "
496                        "registered properly: 0x%08x.\n",
497                        netxen_nic_driver_name, __FUNCTION__, tmp);
498                 mdelay(1);
499                 if (count >= 10)
500                         break;
501                 count++;
502         }
503
504         adapter->curr_window = wndw;
505 }
506
507 void netxen_load_firmware(struct netxen_adapter *adapter)
508 {
509         int i;
510         long data, size = 0;
511         long flashaddr = NETXEN_FLASH_BASE, memaddr = NETXEN_PHANTOM_MEM_BASE;
512         u64 off;
513         void __iomem *addr;
514
515         size = NETXEN_FIRMWARE_LEN;
516         writel(1, NETXEN_CRB_NORMALIZE(adapter, NETXEN_ROMUSB_GLB_CAS_RST));
517
518         for (i = 0; i < size; i++) {
519                 if (netxen_rom_fast_read(adapter, flashaddr, (int *)&data) != 0) {
520                         DPRINTK(ERR,
521                                 "Error in netxen_rom_fast_read(). Will skip"
522                                 "loading flash image\n");
523                         return;
524                 }
525                 off = netxen_nic_pci_set_window(adapter, memaddr);
526                 addr = pci_base_offset(adapter, off);
527                 writel(data, addr);
528                 flashaddr += 4;
529                 memaddr += 4;
530         }
531         udelay(100);
532         /* make sure Casper is powered on */
533         writel(0x3fff,
534                NETXEN_CRB_NORMALIZE(adapter, NETXEN_ROMUSB_GLB_CHIP_CLK_CTRL));
535         writel(0, NETXEN_CRB_NORMALIZE(adapter, NETXEN_ROMUSB_GLB_CAS_RST));
536
537         udelay(100);
538 }
539
540 int
541 netxen_nic_hw_write_wx(struct netxen_adapter *adapter, u64 off, void *data,
542                        int len)
543 {
544         void __iomem *addr;
545
546         if (ADDR_IN_WINDOW1(off)) {
547                 addr = NETXEN_CRB_NORMALIZE(adapter, off);
548         } else {                /* Window 0 */
549                 addr = pci_base_offset(adapter, off);
550                 netxen_nic_pci_change_crbwindow(adapter, 0);
551         }
552
553         DPRINTK(INFO, "writing to base %lx offset %llx addr %p"
554                 " data %llx len %d\n",
555                 pci_base(adapter, off), off, addr,
556                 *(unsigned long long *)data, len);
557         if (!addr) {
558                 netxen_nic_pci_change_crbwindow(adapter, 1);
559                 return 1;
560         }
561
562         switch (len) {
563         case 1:
564                 writeb(*(u8 *) data, addr);
565                 break;
566         case 2:
567                 writew(*(u16 *) data, addr);
568                 break;
569         case 4:
570                 writel(*(u32 *) data, addr);
571                 break;
572         case 8:
573                 writeq(*(u64 *) data, addr);
574                 break;
575         default:
576                 DPRINTK(INFO,
577                         "writing data %lx to offset %llx, num words=%d\n",
578                         *(unsigned long *)data, off, (len >> 3));
579
580                 netxen_nic_hw_block_write64((u64 __iomem *) data, addr,
581                                             (len >> 3));
582                 break;
583         }
584         if (!ADDR_IN_WINDOW1(off))
585                 netxen_nic_pci_change_crbwindow(adapter, 1);
586
587         return 0;
588 }
589
590 int
591 netxen_nic_hw_read_wx(struct netxen_adapter *adapter, u64 off, void *data,
592                       int len)
593 {
594         void __iomem *addr;
595
596         if (ADDR_IN_WINDOW1(off)) {     /* Window 1 */
597                 addr = NETXEN_CRB_NORMALIZE(adapter, off);
598         } else {                /* Window 0 */
599                 addr = pci_base_offset(adapter, off);
600                 netxen_nic_pci_change_crbwindow(adapter, 0);
601         }
602
603         DPRINTK(INFO, "reading from base %lx offset %llx addr %p\n",
604                 pci_base(adapter, off), off, addr);
605         if (!addr) {
606                 netxen_nic_pci_change_crbwindow(adapter, 1);
607                 return 1;
608         }
609         switch (len) {
610         case 1:
611                 *(u8 *) data = readb(addr);
612                 break;
613         case 2:
614                 *(u16 *) data = readw(addr);
615                 break;
616         case 4:
617                 *(u32 *) data = readl(addr);
618                 break;
619         case 8:
620                 *(u64 *) data = readq(addr);
621                 break;
622         default:
623                 netxen_nic_hw_block_read64((u64 __iomem *) data, addr,
624                                            (len >> 3));
625                 break;
626         }
627         DPRINTK(INFO, "read %lx\n", *(unsigned long *)data);
628
629         if (!ADDR_IN_WINDOW1(off))
630                 netxen_nic_pci_change_crbwindow(adapter, 1);
631
632         return 0;
633 }
634
635 void netxen_nic_reg_write(struct netxen_adapter *adapter, u64 off, u32 val)
636 {                               /* Only for window 1 */
637         void __iomem *addr;
638
639         addr = NETXEN_CRB_NORMALIZE(adapter, off);
640         DPRINTK(INFO, "writing to base %lx offset %llx addr %p data %x\n",
641                 pci_base(adapter, off), off, addr, val);
642         writel(val, addr);
643
644 }
645
646 int netxen_nic_reg_read(struct netxen_adapter *adapter, u64 off)
647 {                               /* Only for window 1 */
648         void __iomem *addr;
649         int val;
650
651         addr = NETXEN_CRB_NORMALIZE(adapter, off);
652         DPRINTK(INFO, "reading from base %lx offset %llx addr %p\n",
653                 pci_base(adapter, off), off, addr);
654         val = readl(addr);
655         writel(val, addr);
656
657         return val;
658 }
659
660 /* Change the window to 0, write and change back to window 1. */
661 void netxen_nic_write_w0(struct netxen_adapter *adapter, u32 index, u32 value)
662 {
663         void __iomem *addr;
664
665         netxen_nic_pci_change_crbwindow(adapter, 0);
666         addr = pci_base_offset(adapter, index);
667         writel(value, addr);
668         netxen_nic_pci_change_crbwindow(adapter, 1);
669 }
670
671 /* Change the window to 0, read and change back to window 1. */
672 void netxen_nic_read_w0(struct netxen_adapter *adapter, u32 index, u32 * value)
673 {
674         void __iomem *addr;
675
676         addr = pci_base_offset(adapter, index);
677
678         netxen_nic_pci_change_crbwindow(adapter, 0);
679         *value = readl(addr);
680         netxen_nic_pci_change_crbwindow(adapter, 1);
681 }
682
683 int netxen_pci_set_window_warning_count = 0;
684
685 unsigned long
686 netxen_nic_pci_set_window(struct netxen_adapter *adapter,
687                           unsigned long long addr)
688 {
689         static int ddr_mn_window = -1;
690         static int qdr_sn_window = -1;
691         int window;
692
693         if (ADDR_IN_RANGE(addr, NETXEN_ADDR_DDR_NET, NETXEN_ADDR_DDR_NET_MAX)) {
694                 /* DDR network side */
695                 addr -= NETXEN_ADDR_DDR_NET;
696                 window = (addr >> 25) & 0x3ff;
697                 if (ddr_mn_window != window) {
698                         ddr_mn_window = window;
699                         writel(window, PCI_OFFSET_SECOND_RANGE(adapter,
700                                                                NETXEN_PCIX_PH_REG
701                                                                (PCIX_MN_WINDOW)));
702                         /* MUST make sure window is set before we forge on... */
703                         readl(PCI_OFFSET_SECOND_RANGE(adapter,
704                                                       NETXEN_PCIX_PH_REG
705                                                       (PCIX_MN_WINDOW)));
706                 }
707                 addr -= (window * NETXEN_WINDOW_ONE);
708                 addr += NETXEN_PCI_DDR_NET;
709         } else if (ADDR_IN_RANGE(addr, NETXEN_ADDR_OCM0, NETXEN_ADDR_OCM0_MAX)) {
710                 addr -= NETXEN_ADDR_OCM0;
711                 addr += NETXEN_PCI_OCM0;
712         } else if (ADDR_IN_RANGE(addr, NETXEN_ADDR_OCM1, NETXEN_ADDR_OCM1_MAX)) {
713                 addr -= NETXEN_ADDR_OCM1;
714                 addr += NETXEN_PCI_OCM1;
715         } else
716             if (ADDR_IN_RANGE
717                 (addr, NETXEN_ADDR_QDR_NET, NETXEN_ADDR_QDR_NET_MAX)) {
718                 /* QDR network side */
719                 addr -= NETXEN_ADDR_QDR_NET;
720                 window = (addr >> 22) & 0x3f;
721                 if (qdr_sn_window != window) {
722                         qdr_sn_window = window;
723                         writel((window << 22),
724                                PCI_OFFSET_SECOND_RANGE(adapter,
725                                                        NETXEN_PCIX_PH_REG
726                                                        (PCIX_SN_WINDOW)));
727                         /* MUST make sure window is set before we forge on... */
728                         readl(PCI_OFFSET_SECOND_RANGE(adapter,
729                                                       NETXEN_PCIX_PH_REG
730                                                       (PCIX_SN_WINDOW)));
731                 }
732                 addr -= (window * 0x400000);
733                 addr += NETXEN_PCI_QDR_NET;
734         } else {
735                 /*
736                  * peg gdb frequently accesses memory that doesn't exist,
737                  * this limits the chit chat so debugging isn't slowed down.
738                  */
739                 if ((netxen_pci_set_window_warning_count++ < 8)
740                     || (netxen_pci_set_window_warning_count % 64 == 0))
741                         printk("%s: Warning:netxen_nic_pci_set_window()"
742                                " Unknown address range!\n",
743                                netxen_nic_driver_name);
744
745         }
746         return addr;
747 }
748
749 int netxen_nic_get_board_info(struct netxen_adapter *adapter)
750 {
751         int rv = 0;
752         int addr = BRDCFG_START;
753         struct netxen_board_info *boardinfo;
754         int index;
755         u32 *ptr32;
756
757         boardinfo = &adapter->ahw.boardcfg;
758         ptr32 = (u32 *) boardinfo;
759
760         for (index = 0; index < sizeof(struct netxen_board_info) / sizeof(u32);
761              index++) {
762                 if (netxen_rom_fast_read(adapter, addr, ptr32) == -1) {
763                         return -EIO;
764                 }
765                 ptr32++;
766                 addr += sizeof(u32);
767         }
768         if (boardinfo->magic != NETXEN_BDINFO_MAGIC) {
769                 printk("%s: ERROR reading %s board config."
770                        " Read %x, expected %x\n", netxen_nic_driver_name,
771                        netxen_nic_driver_name,
772                        boardinfo->magic, NETXEN_BDINFO_MAGIC);
773                 rv = -1;
774         }
775         if (boardinfo->header_version != NETXEN_BDINFO_VERSION) {
776                 printk("%s: Unknown board config version."
777                        " Read %x, expected %x\n", netxen_nic_driver_name,
778                        boardinfo->header_version, NETXEN_BDINFO_VERSION);
779                 rv = -1;
780         }
781
782         DPRINTK(INFO, "Discovered board type:0x%x  ", boardinfo->board_type);
783         switch ((netxen_brdtype_t) boardinfo->board_type) {
784         case NETXEN_BRDTYPE_P2_SB35_4G:
785                 adapter->ahw.board_type = NETXEN_NIC_GBE;
786                 break;
787         case NETXEN_BRDTYPE_P2_SB31_10G:
788         case NETXEN_BRDTYPE_P2_SB31_10G_IMEZ:
789         case NETXEN_BRDTYPE_P2_SB31_10G_HMEZ:
790         case NETXEN_BRDTYPE_P2_SB31_10G_CX4:
791                 adapter->ahw.board_type = NETXEN_NIC_XGBE;
792                 break;
793         case NETXEN_BRDTYPE_P1_BD:
794         case NETXEN_BRDTYPE_P1_SB:
795         case NETXEN_BRDTYPE_P1_SMAX:
796         case NETXEN_BRDTYPE_P1_SOCK:
797                 adapter->ahw.board_type = NETXEN_NIC_GBE;
798                 break;
799         default:
800                 printk("%s: Unknown(%x)\n", netxen_nic_driver_name,
801                        boardinfo->board_type);
802                 break;
803         }
804
805         return rv;
806 }
807
808 /* NIU access sections */
809
810 int netxen_nic_set_mtu_gb(struct netxen_port *port, int new_mtu)
811 {
812         struct netxen_adapter *adapter = port->adapter;
813         netxen_nic_write_w0(adapter,
814                             NETXEN_NIU_GB_MAX_FRAME_SIZE(port->portnum),
815                             new_mtu);
816         return 0;
817 }
818
819 int netxen_nic_set_mtu_xgb(struct netxen_port *port, int new_mtu)
820 {
821         struct netxen_adapter *adapter = port->adapter;
822         new_mtu += NETXEN_NIU_HDRSIZE + NETXEN_NIU_TLRSIZE;
823         netxen_nic_write_w0(adapter, NETXEN_NIU_XGE_MAX_FRAME_SIZE, new_mtu);
824         return 0;
825 }
826
827 void netxen_nic_init_niu_gb(struct netxen_adapter *adapter)
828 {
829         int portno;
830         for (portno = 0; portno < NETXEN_NIU_MAX_GBE_PORTS; portno++)
831                 netxen_niu_gbe_init_port(adapter, portno);
832 }
833
834 void netxen_nic_stop_all_ports(struct netxen_adapter *adapter)
835 {
836         int port_nr;
837         struct netxen_port *port;
838
839         for (port_nr = 0; port_nr < adapter->ahw.max_ports; port_nr++) {
840                 port = adapter->port[port_nr];
841                 if (adapter->stop_port)
842                         adapter->stop_port(adapter, port->portnum);
843         }
844 }
845
846 void
847 netxen_crb_writelit_adapter(struct netxen_adapter *adapter, unsigned long off,
848                             int data)
849 {
850         void __iomem *addr;
851
852         if (ADDR_IN_WINDOW1(off)) {
853                 writel(data, NETXEN_CRB_NORMALIZE(adapter, off));
854         } else {
855                 netxen_nic_pci_change_crbwindow(adapter, 0);
856                 addr = pci_base_offset(adapter, off);
857                 writel(data, addr);
858                 netxen_nic_pci_change_crbwindow(adapter, 1);
859         }
860 }
861
862 void netxen_nic_set_link_parameters(struct netxen_port *port)
863 {
864         struct netxen_adapter *adapter = port->adapter;
865         __u32 status;
866         __u32 autoneg;
867         __u32 mode;
868
869         netxen_nic_read_w0(adapter, NETXEN_NIU_MODE, &mode);
870         if (netxen_get_niu_enable_ge(mode)) {   /* Gb 10/100/1000 Mbps mode */
871                 if (adapter->phy_read
872                     && adapter->
873                     phy_read(adapter, port->portnum,
874                              NETXEN_NIU_GB_MII_MGMT_ADDR_PHY_STATUS,
875                              &status) == 0) {
876                         if (netxen_get_phy_link(status)) {
877                                 switch (netxen_get_phy_speed(status)) {
878                                 case 0:
879                                         port->link_speed = SPEED_10;
880                                         break;
881                                 case 1:
882                                         port->link_speed = SPEED_100;
883                                         break;
884                                 case 2:
885                                         port->link_speed = SPEED_1000;
886                                         break;
887                                 default:
888                                         port->link_speed = -1;
889                                         break;
890                                 }
891                                 switch (netxen_get_phy_duplex(status)) {
892                                 case 0:
893                                         port->link_duplex = DUPLEX_HALF;
894                                         break;
895                                 case 1:
896                                         port->link_duplex = DUPLEX_FULL;
897                                         break;
898                                 default:
899                                         port->link_duplex = -1;
900                                         break;
901                                 }
902                                 if (adapter->phy_read
903                                     && adapter->
904                                     phy_read(adapter, port->portnum,
905                                              NETXEN_NIU_GB_MII_MGMT_ADDR_AUTONEG,
906                                              &autoneg) != 0)
907                                         port->link_autoneg = autoneg;
908                         } else
909                                 goto link_down;
910                 } else {
911                       link_down:
912                         port->link_speed = -1;
913                         port->link_duplex = -1;
914                 }
915         }
916 }
917
918 void netxen_nic_flash_print(struct netxen_adapter *adapter)
919 {
920         int valid = 1;
921         u32 fw_major = 0;
922         u32 fw_minor = 0;
923         u32 fw_build = 0;
924         char brd_name[NETXEN_MAX_SHORT_NAME];
925         struct netxen_new_user_info user_info;
926         int i, addr = USER_START;
927         u32 *ptr32;
928
929         struct netxen_board_info *board_info = &(adapter->ahw.boardcfg);
930         if (board_info->magic != NETXEN_BDINFO_MAGIC) {
931                 printk
932                     ("NetXen Unknown board config, Read 0x%x expected as 0x%x\n",
933                      board_info->magic, NETXEN_BDINFO_MAGIC);
934                 valid = 0;
935         }
936         if (board_info->header_version != NETXEN_BDINFO_VERSION) {
937                 printk("NetXen Unknown board config version."
938                        " Read %x, expected %x\n",
939                        board_info->header_version, NETXEN_BDINFO_VERSION);
940                 valid = 0;
941         }
942         if (valid) {
943                 ptr32 = (u32 *) & user_info;
944                 for (i = 0;
945                      i < sizeof(struct netxen_new_user_info) / sizeof(u32);
946                      i++) {
947                         if (netxen_rom_fast_read(adapter, addr, ptr32) == -1) {
948                                 printk("%s: ERROR reading %s board userarea.\n",
949                                        netxen_nic_driver_name,
950                                        netxen_nic_driver_name);
951                                 return;
952                         }
953                         ptr32++;
954                         addr += sizeof(u32);
955                 }
956                 get_brd_name_by_type(board_info->board_type, brd_name);
957
958                 printk("NetXen %s Board S/N %s  Chip id 0x%x\n",
959                        brd_name, user_info.serial_num, board_info->chip_id);
960
961                 printk("NetXen %s Board #%d, Chip id 0x%x\n",
962                        board_info->board_type == 0x0b ? "XGB" : "GBE",
963                        board_info->board_num, board_info->chip_id);
964                 fw_major = readl(NETXEN_CRB_NORMALIZE(adapter,
965                                                       NETXEN_FW_VERSION_MAJOR));
966                 fw_minor = readl(NETXEN_CRB_NORMALIZE(adapter,
967                                                       NETXEN_FW_VERSION_MINOR));
968                 fw_build =
969                     readl(NETXEN_CRB_NORMALIZE(adapter, NETXEN_FW_VERSION_SUB));
970
971                 printk("NetXen Firmware version %d.%d.%d\n", fw_major, fw_minor,
972                        fw_build);
973         }
974         if (fw_major != _NETXEN_NIC_LINUX_MAJOR) {
975                 printk(KERN_ERR "The mismatch in driver version and firmware "
976                        "version major number\n"
977                        "Driver version major number = %d \t"
978                        "Firmware version major number = %d \n",
979                        _NETXEN_NIC_LINUX_MAJOR, fw_major);
980                 adapter->driver_mismatch = 1;
981         }
982         if (fw_minor != _NETXEN_NIC_LINUX_MINOR &&
983                         fw_minor != (_NETXEN_NIC_LINUX_MINOR + 1)) {
984                 printk(KERN_ERR "The mismatch in driver version and firmware "
985                        "version minor number\n"
986                        "Driver version minor number = %d \t"
987                        "Firmware version minor number = %d \n",
988                        _NETXEN_NIC_LINUX_MINOR, fw_minor);
989                 adapter->driver_mismatch = 1;
990         }
991         if (adapter->driver_mismatch)
992                 printk(KERN_INFO "Use the driver with version no %d.%d.xxx\n",
993                        fw_major, fw_minor);
994 }
995