Merge branch 'master' of /home/davem/src/GIT/linux-2.6/
[linux-2.6] / drivers / net / atl1c / atl1c_hw.c
1 /*
2  * Copyright(c) 2007 Atheros Corporation. All rights reserved.
3  *
4  * Derived from Intel e1000 driver
5  * Copyright(c) 1999 - 2005 Intel Corporation. All rights reserved.
6  *
7  * This program is free software; you can redistribute it and/or modify it
8  * under the terms of the GNU General Public License as published by the Free
9  * Software Foundation; either version 2 of the License, or (at your option)
10  * any later version.
11  *
12  * This program is distributed in the hope that it will be useful, but WITHOUT
13  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
14  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
15  * more details.
16  *
17  * You should have received a copy of the GNU General Public License along with
18  * this program; if not, write to the Free Software Foundation, Inc., 59
19  * Temple Place - Suite 330, Boston, MA  02111-1307, USA.
20  */
21 #include <linux/pci.h>
22 #include <linux/delay.h>
23 #include <linux/mii.h>
24 #include <linux/crc32.h>
25
26 #include "atl1c.h"
27
28 /*
29  * check_eeprom_exist
30  * return 1 if eeprom exist
31  */
32 int atl1c_check_eeprom_exist(struct atl1c_hw *hw)
33 {
34         u32 data;
35
36         AT_READ_REG(hw, REG_TWSI_DEBUG, &data);
37         if (data & TWSI_DEBUG_DEV_EXIST)
38                 return 1;
39
40         return 0;
41 }
42
43 void atl1c_hw_set_mac_addr(struct atl1c_hw *hw)
44 {
45         u32 value;
46         /*
47          * 00-0B-6A-F6-00-DC
48          * 0:  6AF600DC 1: 000B
49          * low dword
50          */
51         value = (((u32)hw->mac_addr[2]) << 24) |
52                 (((u32)hw->mac_addr[3]) << 16) |
53                 (((u32)hw->mac_addr[4]) << 8)  |
54                 (((u32)hw->mac_addr[5])) ;
55         AT_WRITE_REG_ARRAY(hw, REG_MAC_STA_ADDR, 0, value);
56         /* hight dword */
57         value = (((u32)hw->mac_addr[0]) << 8) |
58                 (((u32)hw->mac_addr[1])) ;
59         AT_WRITE_REG_ARRAY(hw, REG_MAC_STA_ADDR, 1, value);
60 }
61
62 /*
63  * atl1c_get_permanent_address
64  * return 0 if get valid mac address,
65  */
66 static int atl1c_get_permanent_address(struct atl1c_hw *hw)
67 {
68         u32 addr[2];
69         u32 i;
70         u32 otp_ctrl_data;
71         u32 twsi_ctrl_data;
72         u8  eth_addr[ETH_ALEN];
73
74         /* init */
75         addr[0] = addr[1] = 0;
76         AT_READ_REG(hw, REG_OTP_CTRL, &otp_ctrl_data);
77         if (atl1c_check_eeprom_exist(hw)) {
78                 /* Enable OTP CLK */
79                 if (!(otp_ctrl_data & OTP_CTRL_CLK_EN)) {
80                         otp_ctrl_data |= OTP_CTRL_CLK_EN;
81                         AT_WRITE_REG(hw, REG_OTP_CTRL, otp_ctrl_data);
82                         AT_WRITE_FLUSH(hw);
83                         msleep(1);
84                 }
85
86                 AT_READ_REG(hw, REG_TWSI_CTRL, &twsi_ctrl_data);
87                 twsi_ctrl_data |= TWSI_CTRL_SW_LDSTART;
88                 AT_WRITE_REG(hw, REG_TWSI_CTRL, twsi_ctrl_data);
89                 for (i = 0; i < AT_TWSI_EEPROM_TIMEOUT; i++) {
90                         msleep(10);
91                         AT_READ_REG(hw, REG_TWSI_CTRL, &twsi_ctrl_data);
92                         if ((twsi_ctrl_data & TWSI_CTRL_SW_LDSTART) == 0)
93                                 break;
94                 }
95                 if (i >= AT_TWSI_EEPROM_TIMEOUT)
96                         return -1;
97         }
98         /* Disable OTP_CLK */
99         if (otp_ctrl_data & OTP_CTRL_CLK_EN) {
100                 otp_ctrl_data &= ~OTP_CTRL_CLK_EN;
101                 AT_WRITE_REG(hw, REG_OTP_CTRL, otp_ctrl_data);
102                 AT_WRITE_FLUSH(hw);
103                 msleep(1);
104         }
105
106         /* maybe MAC-address is from BIOS */
107         AT_READ_REG(hw, REG_MAC_STA_ADDR, &addr[0]);
108         AT_READ_REG(hw, REG_MAC_STA_ADDR + 4, &addr[1]);
109         *(u32 *) &eth_addr[2] = swab32(addr[0]);
110         *(u16 *) &eth_addr[0] = swab16(*(u16 *)&addr[1]);
111
112         if (is_valid_ether_addr(eth_addr)) {
113                 memcpy(hw->perm_mac_addr, eth_addr, ETH_ALEN);
114                 return 0;
115         }
116
117         return -1;
118 }
119
120 bool atl1c_read_eeprom(struct atl1c_hw *hw, u32 offset, u32 *p_value)
121 {
122         int i;
123         int ret = false;
124         u32 otp_ctrl_data;
125         u32 control;
126         u32 data;
127
128         if (offset & 3)
129                 return ret; /* address do not align */
130
131         AT_READ_REG(hw, REG_OTP_CTRL, &otp_ctrl_data);
132         if (!(otp_ctrl_data & OTP_CTRL_CLK_EN))
133                 AT_WRITE_REG(hw, REG_OTP_CTRL,
134                                 (otp_ctrl_data | OTP_CTRL_CLK_EN));
135
136         AT_WRITE_REG(hw, REG_EEPROM_DATA_LO, 0);
137         control = (offset & EEPROM_CTRL_ADDR_MASK) << EEPROM_CTRL_ADDR_SHIFT;
138         AT_WRITE_REG(hw, REG_EEPROM_CTRL, control);
139
140         for (i = 0; i < 10; i++) {
141                 udelay(100);
142                 AT_READ_REG(hw, REG_EEPROM_CTRL, &control);
143                 if (control & EEPROM_CTRL_RW)
144                         break;
145         }
146         if (control & EEPROM_CTRL_RW) {
147                 AT_READ_REG(hw, REG_EEPROM_CTRL, &data);
148                 AT_READ_REG(hw, REG_EEPROM_DATA_LO, p_value);
149                 data = data & 0xFFFF;
150                 *p_value = swab32((data << 16) | (*p_value >> 16));
151                 ret = true;
152         }
153         if (!(otp_ctrl_data & OTP_CTRL_CLK_EN))
154                 AT_WRITE_REG(hw, REG_OTP_CTRL, otp_ctrl_data);
155
156         return ret;
157 }
158 /*
159  * Reads the adapter's MAC address from the EEPROM
160  *
161  * hw - Struct containing variables accessed by shared code
162  */
163 int atl1c_read_mac_addr(struct atl1c_hw *hw)
164 {
165         int err = 0;
166
167         err = atl1c_get_permanent_address(hw);
168         if (err)
169                 random_ether_addr(hw->perm_mac_addr);
170
171         memcpy(hw->mac_addr, hw->perm_mac_addr, sizeof(hw->perm_mac_addr));
172         return 0;
173 }
174
175 /*
176  * atl1c_hash_mc_addr
177  *  purpose
178  *      set hash value for a multicast address
179  *      hash calcu processing :
180  *          1. calcu 32bit CRC for multicast address
181  *          2. reverse crc with MSB to LSB
182  */
183 u32 atl1c_hash_mc_addr(struct atl1c_hw *hw, u8 *mc_addr)
184 {
185         u32 crc32;
186         u32 value = 0;
187         int i;
188
189         crc32 = ether_crc_le(6, mc_addr);
190         for (i = 0; i < 32; i++)
191                 value |= (((crc32 >> i) & 1) << (31 - i));
192
193         return value;
194 }
195
196 /*
197  * Sets the bit in the multicast table corresponding to the hash value.
198  * hw - Struct containing variables accessed by shared code
199  * hash_value - Multicast address hash value
200  */
201 void atl1c_hash_set(struct atl1c_hw *hw, u32 hash_value)
202 {
203         u32 hash_bit, hash_reg;
204         u32 mta;
205
206         /*
207          * The HASH Table  is a register array of 2 32-bit registers.
208          * It is treated like an array of 64 bits.  We want to set
209          * bit BitArray[hash_value]. So we figure out what register
210          * the bit is in, read it, OR in the new bit, then write
211          * back the new value.  The register is determined by the
212          * upper bit of the hash value and the bit within that
213          * register are determined by the lower 5 bits of the value.
214          */
215         hash_reg = (hash_value >> 31) & 0x1;
216         hash_bit = (hash_value >> 26) & 0x1F;
217
218         mta = AT_READ_REG_ARRAY(hw, REG_RX_HASH_TABLE, hash_reg);
219
220         mta |= (1 << hash_bit);
221
222         AT_WRITE_REG_ARRAY(hw, REG_RX_HASH_TABLE, hash_reg, mta);
223 }
224
225 /*
226  * Reads the value from a PHY register
227  * hw - Struct containing variables accessed by shared code
228  * reg_addr - address of the PHY register to read
229  */
230 int atl1c_read_phy_reg(struct atl1c_hw *hw, u16 reg_addr, u16 *phy_data)
231 {
232         u32 val;
233         int i;
234
235         val = ((u32)(reg_addr & MDIO_REG_ADDR_MASK)) << MDIO_REG_ADDR_SHIFT |
236                 MDIO_START | MDIO_SUP_PREAMBLE | MDIO_RW |
237                 MDIO_CLK_25_4 << MDIO_CLK_SEL_SHIFT;
238
239         AT_WRITE_REG(hw, REG_MDIO_CTRL, val);
240
241         for (i = 0; i < MDIO_WAIT_TIMES; i++) {
242                 udelay(2);
243                 AT_READ_REG(hw, REG_MDIO_CTRL, &val);
244                 if (!(val & (MDIO_START | MDIO_BUSY)))
245                         break;
246         }
247         if (!(val & (MDIO_START | MDIO_BUSY))) {
248                 *phy_data = (u16)val;
249                 return 0;
250         }
251
252         return -1;
253 }
254
255 /*
256  * Writes a value to a PHY register
257  * hw - Struct containing variables accessed by shared code
258  * reg_addr - address of the PHY register to write
259  * data - data to write to the PHY
260  */
261 int atl1c_write_phy_reg(struct atl1c_hw *hw, u32 reg_addr, u16 phy_data)
262 {
263         int i;
264         u32 val;
265
266         val = ((u32)(phy_data & MDIO_DATA_MASK)) << MDIO_DATA_SHIFT   |
267                (reg_addr & MDIO_REG_ADDR_MASK) << MDIO_REG_ADDR_SHIFT |
268                MDIO_SUP_PREAMBLE | MDIO_START |
269                MDIO_CLK_25_4 << MDIO_CLK_SEL_SHIFT;
270
271         AT_WRITE_REG(hw, REG_MDIO_CTRL, val);
272
273         for (i = 0; i < MDIO_WAIT_TIMES; i++) {
274                 udelay(2);
275                 AT_READ_REG(hw, REG_MDIO_CTRL, &val);
276                 if (!(val & (MDIO_START | MDIO_BUSY)))
277                         break;
278         }
279
280         if (!(val & (MDIO_START | MDIO_BUSY)))
281                 return 0;
282
283         return -1;
284 }
285
286 /*
287  * Configures PHY autoneg and flow control advertisement settings
288  *
289  * hw - Struct containing variables accessed by shared code
290  */
291 static int atl1c_phy_setup_adv(struct atl1c_hw *hw)
292 {
293         u16 mii_adv_data = ADVERTISE_DEFAULT_CAP & ~ADVERTISE_SPEED_MASK;
294         u16 mii_giga_ctrl_data = GIGA_CR_1000T_DEFAULT_CAP &
295                                 ~GIGA_CR_1000T_SPEED_MASK;
296
297         if (hw->autoneg_advertised & ADVERTISED_10baseT_Half)
298                 mii_adv_data |= ADVERTISE_10HALF;
299         if (hw->autoneg_advertised & ADVERTISED_10baseT_Full)
300                 mii_adv_data |= ADVERTISE_10FULL;
301         if (hw->autoneg_advertised & ADVERTISED_100baseT_Half)
302                 mii_adv_data |= ADVERTISE_100HALF;
303         if (hw->autoneg_advertised & ADVERTISED_100baseT_Full)
304                 mii_adv_data |= ADVERTISE_100FULL;
305
306         if (hw->autoneg_advertised & ADVERTISED_Autoneg)
307                 mii_adv_data |= ADVERTISE_10HALF  | ADVERTISE_10FULL |
308                                 ADVERTISE_100HALF | ADVERTISE_100FULL;
309
310         if (hw->ctrl_flags & ATL1C_LINK_CAP_1000M) {
311                 if (hw->autoneg_advertised & ADVERTISED_1000baseT_Half)
312                         mii_giga_ctrl_data |= ADVERTISE_1000HALF;
313                 if (hw->autoneg_advertised & ADVERTISED_1000baseT_Full)
314                         mii_giga_ctrl_data |= ADVERTISE_1000FULL;
315                 if (hw->autoneg_advertised & ADVERTISED_Autoneg)
316                         mii_giga_ctrl_data |= ADVERTISE_1000HALF |
317                                         ADVERTISE_1000FULL;
318         }
319
320         if (atl1c_write_phy_reg(hw, MII_ADVERTISE, mii_adv_data) != 0 ||
321             atl1c_write_phy_reg(hw, MII_GIGA_CR, mii_giga_ctrl_data) != 0)
322                 return -1;
323         return 0;
324 }
325
326 void atl1c_phy_disable(struct atl1c_hw *hw)
327 {
328         AT_WRITE_REGW(hw, REG_GPHY_CTRL,
329                         GPHY_CTRL_PW_WOL_DIS | GPHY_CTRL_EXT_RESET);
330 }
331
332 static void atl1c_phy_magic_data(struct atl1c_hw *hw)
333 {
334         u16 data;
335
336         data = ANA_LOOP_SEL_10BT | ANA_EN_MASK_TB | ANA_EN_10BT_IDLE |
337                 ((1 & ANA_INTERVAL_SEL_TIMER_MASK) <<
338                 ANA_INTERVAL_SEL_TIMER_SHIFT);
339
340         atl1c_write_phy_reg(hw, MII_DBG_ADDR, MII_ANA_CTRL_18);
341         atl1c_write_phy_reg(hw, MII_DBG_DATA, data);
342
343         data = (2 & ANA_SERDES_CDR_BW_MASK) | ANA_MS_PAD_DBG |
344                 ANA_SERDES_EN_DEEM | ANA_SERDES_SEL_HSP | ANA_SERDES_EN_PLL |
345                 ANA_SERDES_EN_LCKDT;
346
347         atl1c_write_phy_reg(hw, MII_DBG_ADDR, MII_ANA_CTRL_5);
348         atl1c_write_phy_reg(hw, MII_DBG_DATA, data);
349
350         data = (44 & ANA_LONG_CABLE_TH_100_MASK) |
351                 ((33 & ANA_SHORT_CABLE_TH_100_MASK) <<
352                 ANA_SHORT_CABLE_TH_100_SHIFT) | ANA_BP_BAD_LINK_ACCUM |
353                 ANA_BP_SMALL_BW;
354
355         atl1c_write_phy_reg(hw, MII_DBG_ADDR, MII_ANA_CTRL_54);
356         atl1c_write_phy_reg(hw, MII_DBG_DATA, data);
357
358         data = (11 & ANA_IECHO_ADJ_MASK) | ((11 & ANA_IECHO_ADJ_MASK) <<
359                 ANA_IECHO_ADJ_2_SHIFT) | ((8 & ANA_IECHO_ADJ_MASK) <<
360                 ANA_IECHO_ADJ_1_SHIFT) | ((8 & ANA_IECHO_ADJ_MASK) <<
361                 ANA_IECHO_ADJ_0_SHIFT);
362
363         atl1c_write_phy_reg(hw, MII_DBG_ADDR, MII_ANA_CTRL_4);
364         atl1c_write_phy_reg(hw, MII_DBG_DATA, data);
365
366         data = ANA_RESTART_CAL | ((7 & ANA_MANUL_SWICH_ON_MASK) <<
367                 ANA_MANUL_SWICH_ON_SHIFT) | ANA_MAN_ENABLE |
368                 ANA_SEL_HSP | ANA_EN_HB | ANA_OEN_125M;
369
370         atl1c_write_phy_reg(hw, MII_DBG_ADDR, MII_ANA_CTRL_0);
371         atl1c_write_phy_reg(hw, MII_DBG_DATA, data);
372
373         if (hw->ctrl_flags & ATL1C_HIB_DISABLE) {
374                 atl1c_write_phy_reg(hw, MII_DBG_ADDR, MII_ANA_CTRL_41);
375                 if (atl1c_read_phy_reg(hw, MII_DBG_DATA, &data) != 0)
376                         return;
377                 data &= ~ANA_TOP_PS_EN;
378                 atl1c_write_phy_reg(hw, MII_DBG_DATA, data);
379
380                 atl1c_write_phy_reg(hw, MII_DBG_ADDR, MII_ANA_CTRL_11);
381                 if (atl1c_read_phy_reg(hw, MII_DBG_DATA, &data) != 0)
382                         return;
383                 data &= ~ANA_PS_HIB_EN;
384                 atl1c_write_phy_reg(hw, MII_DBG_DATA, data);
385         }
386 }
387
388 int atl1c_phy_reset(struct atl1c_hw *hw)
389 {
390         struct atl1c_adapter *adapter = hw->adapter;
391         struct pci_dev *pdev = adapter->pdev;
392         u32 phy_ctrl_data = GPHY_CTRL_DEFAULT;
393         u32 mii_ier_data = IER_LINK_UP | IER_LINK_DOWN;
394         int err;
395
396         if (hw->ctrl_flags & ATL1C_HIB_DISABLE)
397                 phy_ctrl_data &= ~GPHY_CTRL_HIB_EN;
398
399         AT_WRITE_REG(hw, REG_GPHY_CTRL, phy_ctrl_data);
400         AT_WRITE_FLUSH(hw);
401         msleep(40);
402         phy_ctrl_data |= GPHY_CTRL_EXT_RESET;
403         AT_WRITE_REG(hw, REG_GPHY_CTRL, phy_ctrl_data);
404         AT_WRITE_FLUSH(hw);
405         msleep(10);
406
407         /*Enable PHY LinkChange Interrupt */
408         err = atl1c_write_phy_reg(hw, MII_IER, mii_ier_data);
409         if (err) {
410                 if (netif_msg_hw(adapter))
411                         dev_err(&pdev->dev,
412                                 "Error enable PHY linkChange Interrupt\n");
413                 return err;
414         }
415         if (!(hw->ctrl_flags & ATL1C_FPGA_VERSION))
416                 atl1c_phy_magic_data(hw);
417         return 0;
418 }
419
420 int atl1c_phy_init(struct atl1c_hw *hw)
421 {
422         struct atl1c_adapter *adapter = (struct atl1c_adapter *)hw->adapter;
423         struct pci_dev *pdev = adapter->pdev;
424         int ret_val;
425         u16 mii_bmcr_data = BMCR_RESET;
426         u16 phy_id1, phy_id2;
427
428         if ((atl1c_read_phy_reg(hw, MII_PHYSID1, &phy_id1) != 0) ||
429                 (atl1c_read_phy_reg(hw, MII_PHYSID2, &phy_id2) != 0)) {
430                         if (netif_msg_link(adapter))
431                                 dev_err(&pdev->dev, "Error get phy ID\n");
432                 return -1;
433         }
434         switch (hw->media_type) {
435         case MEDIA_TYPE_AUTO_SENSOR:
436                 ret_val = atl1c_phy_setup_adv(hw);
437                 if (ret_val) {
438                         if (netif_msg_link(adapter))
439                                 dev_err(&pdev->dev,
440                                         "Error Setting up Auto-Negotiation\n");
441                         return ret_val;
442                 }
443                 mii_bmcr_data |= BMCR_AUTO_NEG_EN | BMCR_RESTART_AUTO_NEG;
444                 break;
445         case MEDIA_TYPE_100M_FULL:
446                 mii_bmcr_data |= BMCR_SPEED_100 | BMCR_FULL_DUPLEX;
447                 break;
448         case MEDIA_TYPE_100M_HALF:
449                 mii_bmcr_data |= BMCR_SPEED_100;
450                 break;
451         case MEDIA_TYPE_10M_FULL:
452                 mii_bmcr_data |= BMCR_SPEED_10 | BMCR_FULL_DUPLEX;
453                 break;
454         case MEDIA_TYPE_10M_HALF:
455                 mii_bmcr_data |= BMCR_SPEED_10;
456                 break;
457         default:
458                 if (netif_msg_link(adapter))
459                         dev_err(&pdev->dev, "Wrong Media type %d\n",
460                                 hw->media_type);
461                 return -1;
462                 break;
463         }
464
465         ret_val = atl1c_write_phy_reg(hw, MII_BMCR, mii_bmcr_data);
466         if (ret_val)
467                 return ret_val;
468         hw->phy_configured = true;
469
470         return 0;
471 }
472
473 /*
474  * Detects the current speed and duplex settings of the hardware.
475  *
476  * hw - Struct containing variables accessed by shared code
477  * speed - Speed of the connection
478  * duplex - Duplex setting of the connection
479  */
480 int atl1c_get_speed_and_duplex(struct atl1c_hw *hw, u16 *speed, u16 *duplex)
481 {
482         int err;
483         u16 phy_data;
484
485         /* Read   PHY Specific Status Register (17) */
486         err = atl1c_read_phy_reg(hw, MII_GIGA_PSSR, &phy_data);
487         if (err)
488                 return err;
489
490         if (!(phy_data & GIGA_PSSR_SPD_DPLX_RESOLVED))
491                 return -1;
492
493         switch (phy_data & GIGA_PSSR_SPEED) {
494         case GIGA_PSSR_1000MBS:
495                 *speed = SPEED_1000;
496                 break;
497         case GIGA_PSSR_100MBS:
498                 *speed = SPEED_100;
499                 break;
500         case  GIGA_PSSR_10MBS:
501                 *speed = SPEED_10;
502                 break;
503         default:
504                 return -1;
505                 break;
506         }
507
508         if (phy_data & GIGA_PSSR_DPLX)
509                 *duplex = FULL_DUPLEX;
510         else
511                 *duplex = HALF_DUPLEX;
512
513         return 0;
514 }
515
516 int atl1c_restart_autoneg(struct atl1c_hw *hw)
517 {
518         int err = 0;
519         u16 mii_bmcr_data = BMCR_RESET;
520
521         err = atl1c_phy_setup_adv(hw);
522         if (err)
523                 return err;
524         mii_bmcr_data |= BMCR_AUTO_NEG_EN | BMCR_RESTART_AUTO_NEG;
525
526         return atl1c_write_phy_reg(hw, MII_BMCR, mii_bmcr_data);
527 }