1 /* Advanced Micro Devices Inc. AMD8111E Linux Network Driver
2 * Copyright (C) 2004 Advanced Micro Devices
3 * Copyright (C) 2005 Liu Tao <liutao1980@gmail.com> [etherboot port]
5 * Copyright 2001,2002 Jeff Garzik <jgarzik@mandrakesoft.com> [ 8139cp.c,tg3.c ]
6 * Copyright (C) 2001, 2002 David S. Miller (davem@redhat.com)[ tg3.c]
7 * Copyright 1996-1999 Thomas Bogendoerfer [ pcnet32.c ]
8 * Derived from the lance driver written 1993,1994,1995 by Donald Becker.
9 * Copyright 1993 United States Government as represented by the
10 * Director, National Security Agency.[ pcnet32.c ]
11 * Carsten Langgaard, carstenl@mips.com [ pcnet32.c ]
12 * Copyright (C) 2000 MIPS Technologies, Inc. All rights reserved.
15 * This program is free software; you can redistribute it and/or modify
16 * it under the terms of the GNU General Public License as published by
17 * the Free Software Foundation; either version 2 of the License, or
18 * (at your option) any later version.
20 * This program is distributed in the hope that it will be useful,
21 * but WITHOUT ANY WARRANTY; without even the implied warranty of
22 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
23 * GNU General Public License for more details.
25 * You should have received a copy of the GNU General Public License
26 * along with this program; if not, write to the Free Software
27 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
31 #include "etherboot.h"
35 #include <gpxe/ethernet.h>
42 /* driver definitions */
43 #define NUM_TX_SLOTS 2
44 #define NUM_RX_SLOTS 4
45 #define TX_SLOTS_MASK 1
46 #define RX_SLOTS_MASK 3
48 #define TX_BUF_LEN 1536
49 #define RX_BUF_LEN 1536
51 #define TX_PKT_LEN_MAX (ETH_FRAME_LEN - ETH_HLEN)
52 #define RX_PKT_LEN_MIN 60
53 #define RX_PKT_LEN_MAX ETH_FRAME_LEN
55 #define TX_TIMEOUT 3000
56 #define TX_PROCESS_TIME 10
57 #define TX_RETRY (TX_TIMEOUT / TX_PROCESS_TIME)
59 #define PHY_RW_RETRY 10
62 struct amd8111e_tx_desc
{
71 struct amd8111e_rx_desc
{
81 u8 dst_addr
[ETH_ALEN
];
82 u8 src_addr
[ETH_ALEN
];
84 u8 data
[ETH_FRAME_LEN
- ETH_HLEN
];
85 } __attribute__((packed
));
87 struct amd8111e_priv
{
88 struct amd8111e_tx_desc tx_ring
[NUM_TX_SLOTS
];
89 struct amd8111e_rx_desc rx_ring
[NUM_RX_SLOTS
];
90 unsigned char tx_buf
[NUM_TX_SLOTS
][TX_BUF_LEN
];
91 unsigned char rx_buf
[NUM_RX_SLOTS
][RX_BUF_LEN
];
92 unsigned long tx_idx
, rx_idx
;
102 struct pci_device
*pdev
;
107 static struct amd8111e_priv amd8111e
;
110 /********************************************************
112 ********************************************************/
113 static void amd8111e_init_hw_default(struct amd8111e_priv
*lp
);
114 static int amd8111e_start(struct amd8111e_priv
*lp
);
115 static int amd8111e_read_phy(struct amd8111e_priv
*lp
, int phy_addr
, int reg
, u32
*val
);
117 static int amd8111e_write_phy(struct amd8111e_priv
*lp
, int phy_addr
, int reg
, u32 val
);
119 static void amd8111e_probe_ext_phy(struct amd8111e_priv
*lp
);
120 static void amd8111e_disable_interrupt(struct amd8111e_priv
*lp
);
121 static void amd8111e_enable_interrupt(struct amd8111e_priv
*lp
);
122 static void amd8111e_force_interrupt(struct amd8111e_priv
*lp
);
123 static int amd8111e_get_mac_address(struct amd8111e_priv
*lp
);
124 static int amd8111e_init_rx_ring(struct amd8111e_priv
*lp
);
125 static int amd8111e_init_tx_ring(struct amd8111e_priv
*lp
);
126 static int amd8111e_wait_tx_ring(struct amd8111e_priv
*lp
, unsigned int index
);
127 static void amd8111e_wait_link(struct amd8111e_priv
*lp
);
128 static void amd8111e_poll_link(struct amd8111e_priv
*lp
);
129 static void amd8111e_restart(struct amd8111e_priv
*lp
);
133 * This function clears necessary the device registers.
135 static void amd8111e_init_hw_default(struct amd8111e_priv
*lp
)
137 unsigned int reg_val
;
138 void *mmio
= lp
->mmio
;
141 writel(RUN
, mmio
+ CMD0
);
143 /* Clear RCV_RING_BASE_ADDR */
144 writel(0, mmio
+ RCV_RING_BASE_ADDR0
);
146 /* Clear XMT_RING_BASE_ADDR */
147 writel(0, mmio
+ XMT_RING_BASE_ADDR0
);
148 writel(0, mmio
+ XMT_RING_BASE_ADDR1
);
149 writel(0, mmio
+ XMT_RING_BASE_ADDR2
);
150 writel(0, mmio
+ XMT_RING_BASE_ADDR3
);
153 writel(CMD0_CLEAR
, mmio
+ CMD0
);
156 writel(CMD2_CLEAR
, mmio
+ CMD2
);
159 writel(CMD7_CLEAR
, mmio
+ CMD7
);
161 /* Clear DLY_INT_A and DLY_INT_B */
162 writel(0x0, mmio
+ DLY_INT_A
);
163 writel(0x0, mmio
+ DLY_INT_B
);
165 /* Clear FLOW_CONTROL */
166 writel(0x0, mmio
+ FLOW_CONTROL
);
168 /* Clear INT0 write 1 to clear register */
169 reg_val
= readl(mmio
+ INT0
);
170 writel(reg_val
, mmio
+ INT0
);
173 writel(0x0, mmio
+ STVAL
);
176 writel(INTEN0_CLEAR
, mmio
+ INTEN0
);
179 writel(0x0, mmio
+ LADRF
);
181 /* Set SRAM_SIZE & SRAM_BOUNDARY registers */
182 writel(0x80010, mmio
+ SRAM_SIZE
);
184 /* Clear RCV_RING0_LEN */
185 writel(0x0, mmio
+ RCV_RING_LEN0
);
187 /* Clear XMT_RING0/1/2/3_LEN */
188 writel(0x0, mmio
+ XMT_RING_LEN0
);
189 writel(0x0, mmio
+ XMT_RING_LEN1
);
190 writel(0x0, mmio
+ XMT_RING_LEN2
);
191 writel(0x0, mmio
+ XMT_RING_LEN3
);
193 /* Clear XMT_RING_LIMIT */
194 writel(0x0, mmio
+ XMT_RING_LIMIT
);
197 writew(MIB_CLEAR
, mmio
+ MIB_ADDR
);
200 writel( 0, mmio
+ LADRF
);
201 writel( 0, mmio
+ LADRF
+ 4);
203 /* SRAM_SIZE register */
204 reg_val
= readl(mmio
+ SRAM_SIZE
);
206 /* Set default value to CTRL1 Register */
207 writel(CTRL1_DEFAULT
, mmio
+ CTRL1
);
209 /* To avoid PCI posting bug */
214 * This function initializes the device registers and starts the device.
216 static int amd8111e_start(struct amd8111e_priv
*lp
)
218 struct nic
*nic
= lp
->nic
;
219 void *mmio
= lp
->mmio
;
223 writel(RUN
, mmio
+ CMD0
);
225 /* AUTOPOLL0 Register *//*TBD default value is 8100 in FPS */
226 writew(0x8100 | lp
->ext_phy_addr
, mmio
+ AUTOPOLL0
);
228 /* enable the port manager and set auto negotiation always */
229 writel(VAL1
| EN_PMGR
, mmio
+ CMD3
);
230 writel(XPHYANE
| XPHYRST
, mmio
+ CTRL2
);
232 /* set control registers */
233 reg_val
= readl(mmio
+ CTRL1
);
234 reg_val
&= ~XMTSP_MASK
;
235 writel(reg_val
| XMTSP_128
| CACHE_ALIGN
, mmio
+ CTRL1
);
237 /* initialize tx and rx ring base addresses */
238 amd8111e_init_tx_ring(lp
);
239 amd8111e_init_rx_ring(lp
);
240 writel(virt_to_bus(lp
->tx_ring
), mmio
+ XMT_RING_BASE_ADDR0
);
241 writel(virt_to_bus(lp
->rx_ring
), mmio
+ RCV_RING_BASE_ADDR0
);
242 writew(NUM_TX_SLOTS
, mmio
+ XMT_RING_LEN0
);
243 writew(NUM_RX_SLOTS
, mmio
+ RCV_RING_LEN0
);
245 /* set default IPG to 96 */
246 writew(DEFAULT_IPG
, mmio
+ IPG
);
247 writew(DEFAULT_IPG
- IFS1_DELTA
, mmio
+ IFS1
);
249 /* AutoPAD transmit, Retransmit on Underflow */
250 writel(VAL0
| APAD_XMT
| REX_RTRY
| REX_UFLO
, mmio
+ CMD2
);
253 writel(JUMBO
, mmio
+ CMD3
);
255 /* Setting the MAC address to the device */
256 for(i
= 0; i
< ETH_ALEN
; i
++)
257 writeb(nic
->node_addr
[i
], mmio
+ PADR
+ i
);
259 /* set RUN bit to start the chip, interrupt not enabled */
260 writel(VAL2
| RDMD0
| VAL0
| RUN
, mmio
+ CMD0
);
262 /* To avoid PCI posting bug */
268 This function will read the PHY registers.
270 static int amd8111e_read_phy(struct amd8111e_priv
*lp
, int phy_addr
, int reg
, u32
*val
)
272 void *mmio
= lp
->mmio
;
273 unsigned int reg_val
;
274 unsigned int retry
= PHY_RW_RETRY
;
276 reg_val
= readl(mmio
+ PHY_ACCESS
);
277 while (reg_val
& PHY_CMD_ACTIVE
)
278 reg_val
= readl(mmio
+ PHY_ACCESS
);
280 writel(PHY_RD_CMD
| ((phy_addr
& 0x1f) << 21) | ((reg
& 0x1f) << 16),
283 reg_val
= readl(mmio
+ PHY_ACCESS
);
284 udelay(30); /* It takes 30 us to read/write data */
285 } while (--retry
&& (reg_val
& PHY_CMD_ACTIVE
));
287 if (reg_val
& PHY_RD_ERR
) {
292 *val
= reg_val
& 0xffff;
297 This function will write into PHY registers.
300 static int amd8111e_write_phy(struct amd8111e_priv
*lp
, int phy_addr
, int reg
, u32 val
)
302 void *mmio
= lp
->mmio
;
303 unsigned int reg_val
;
304 unsigned int retry
= PHY_RW_RETRY
;
306 reg_val
= readl(mmio
+ PHY_ACCESS
);
307 while (reg_val
& PHY_CMD_ACTIVE
)
308 reg_val
= readl(mmio
+ PHY_ACCESS
);
310 writel(PHY_WR_CMD
| ((phy_addr
& 0x1f) << 21) | ((reg
& 0x1f) << 16) | val
,
313 reg_val
= readl(mmio
+ PHY_ACCESS
);
314 udelay(30); /* It takes 30 us to read/write the data */
315 } while (--retry
&& (reg_val
& PHY_CMD_ACTIVE
));
317 if(reg_val
& PHY_RD_ERR
)
324 static void amd8111e_probe_ext_phy(struct amd8111e_priv
*lp
)
329 lp
->ext_phy_addr
= 1;
331 for (i
= 0x1e; i
>= 0; i
--) {
334 if (amd8111e_read_phy(lp
, i
, MII_PHYSID1
, &id1
))
336 if (amd8111e_read_phy(lp
, i
, MII_PHYSID2
, &id2
))
338 lp
->ext_phy_id
= (id1
<< 16) | id2
;
339 lp
->ext_phy_addr
= i
;
344 printf("Found MII PHY ID 0x%08x at address 0x%02x\n",
345 (unsigned int) lp
->ext_phy_id
, lp
->ext_phy_addr
);
347 printf("Couldn't detect MII PHY, assuming address 0x01\n");
350 static void amd8111e_disable_interrupt(struct amd8111e_priv
*lp
)
352 void *mmio
= lp
->mmio
;
355 writel(INTREN
, mmio
+ CMD0
);
356 writel(INTEN0_CLEAR
, mmio
+ INTEN0
);
357 int0
= readl(mmio
+ INT0
);
358 writel(int0
, mmio
+ INT0
);
362 static void amd8111e_enable_interrupt(struct amd8111e_priv
*lp
)
364 void *mmio
= lp
->mmio
;
366 writel(VAL3
| LCINTEN
| VAL1
| TINTEN0
| VAL0
| RINTEN0
, mmio
+ INTEN0
);
367 writel(VAL0
| INTREN
, mmio
+ CMD0
);
371 static void amd8111e_force_interrupt(struct amd8111e_priv
*lp
)
373 void *mmio
= lp
->mmio
;
375 writel(VAL0
| UINTCMD
, mmio
+ CMD0
);
379 static int amd8111e_get_mac_address(struct amd8111e_priv
*lp
)
381 struct nic
*nic
= lp
->nic
;
382 void *mmio
= lp
->mmio
;
385 /* BIOS should have set mac address to PADR register,
386 * so we read PADR to get it.
388 for (i
= 0; i
< ETH_ALEN
; i
++)
389 nic
->node_addr
[i
] = readb(mmio
+ PADR
+ i
);
391 DBG ( "Ethernet addr: %s\n", eth_ntoa ( nic
->node_addr
) );
396 static int amd8111e_init_rx_ring(struct amd8111e_priv
*lp
)
402 /* Initilaizing receive descriptors */
403 for (i
= 0; i
< NUM_RX_SLOTS
; i
++) {
404 lp
->rx_ring
[i
].buf_phy_addr
= cpu_to_le32(virt_to_bus(lp
->rx_buf
[i
]));
405 lp
->rx_ring
[i
].buf_len
= cpu_to_le16(RX_BUF_LEN
);
407 lp
->rx_ring
[i
].rx_flags
= cpu_to_le16(OWN_BIT
);
413 static int amd8111e_init_tx_ring(struct amd8111e_priv
*lp
)
418 lp
->tx_consistent
= 1;
420 /* Initializing transmit descriptors */
421 for (i
= 0; i
< NUM_TX_SLOTS
; i
++) {
422 lp
->tx_ring
[i
].tx_flags
= 0;
423 lp
->tx_ring
[i
].buf_phy_addr
= 0;
424 lp
->tx_ring
[i
].buf_len
= 0;
430 static int amd8111e_wait_tx_ring(struct amd8111e_priv
*lp
, unsigned int index
)
433 int retry
= TX_RETRY
;
435 status
= le16_to_cpu(lp
->tx_ring
[index
].tx_flags
);
436 while (--retry
&& (status
& OWN_BIT
)) {
437 mdelay(TX_PROCESS_TIME
);
438 status
= le16_to_cpu(lp
->tx_ring
[index
].tx_flags
);
440 if (status
& OWN_BIT
) {
441 printf("Error: tx slot %d timeout, stat = 0x%x\n", index
, status
);
442 amd8111e_restart(lp
);
449 static void amd8111e_wait_link(struct amd8111e_priv
*lp
)
455 /* read phy to update STAT0 register */
456 amd8111e_read_phy(lp
, lp
->ext_phy_addr
, MII_BMCR
, ®_val
);
457 amd8111e_read_phy(lp
, lp
->ext_phy_addr
, MII_BMSR
, ®_val
);
458 amd8111e_read_phy(lp
, lp
->ext_phy_addr
, MII_ADVERTISE
, ®_val
);
459 amd8111e_read_phy(lp
, lp
->ext_phy_addr
, MII_LPA
, ®_val
);
460 status
= readl(lp
->mmio
+ STAT0
);
461 } while (!(status
& AUTONEG_COMPLETE
) || !(status
& LINK_STATS
));
464 static void amd8111e_poll_link(struct amd8111e_priv
*lp
)
466 unsigned int status
, speed
;
470 /* read phy to update STAT0 register */
471 amd8111e_read_phy(lp
, lp
->ext_phy_addr
, MII_BMCR
, ®_val
);
472 amd8111e_read_phy(lp
, lp
->ext_phy_addr
, MII_BMSR
, ®_val
);
473 amd8111e_read_phy(lp
, lp
->ext_phy_addr
, MII_ADVERTISE
, ®_val
);
474 amd8111e_read_phy(lp
, lp
->ext_phy_addr
, MII_LPA
, ®_val
);
475 status
= readl(lp
->mmio
+ STAT0
);
477 if (status
& LINK_STATS
) {
479 speed
= (status
& SPEED_MASK
) >> 7;
480 if (speed
== PHY_SPEED_100
)
484 if (status
& FULL_DPLX
)
489 printf("Link is up: %s Mbps %s duplex\n",
490 lp
->speed
? "100" : "10", lp
->duplex
? "full" : "half");
493 status
= readl(lp
->mmio
+ STAT0
);
494 if (!(status
& LINK_STATS
)) {
496 printf("Link is down\n");
501 static void amd8111e_restart(struct amd8111e_priv
*lp
)
503 printf("\nStarting nic...\n");
504 amd8111e_disable_interrupt(lp
);
505 amd8111e_init_hw_default(lp
);
506 amd8111e_probe_ext_phy(lp
);
507 amd8111e_get_mac_address(lp
);
510 printf("Waiting link up...\n");
512 amd8111e_wait_link(lp
);
513 amd8111e_poll_link(lp
);
517 /********************************************************
518 * Interface Functions *
519 ********************************************************/
521 static void amd8111e_transmit(struct nic
*nic
, const char *dst_addr
,
522 unsigned int type
, unsigned int size
, const char *packet
)
524 struct amd8111e_priv
*lp
= nic
->priv_data
;
525 struct eth_frame
*frame
;
528 /* check packet size */
529 if (size
> TX_PKT_LEN_MAX
) {
530 printf("amd8111e_transmit(): too large packet, drop\n");
536 if (amd8111e_wait_tx_ring(lp
, index
))
540 frame
= (struct eth_frame
*)lp
->tx_buf
[index
];
541 memset(frame
->data
, 0, TX_PKT_LEN_MAX
);
542 memcpy(frame
->dst_addr
, dst_addr
, ETH_ALEN
);
543 memcpy(frame
->src_addr
, nic
->node_addr
, ETH_ALEN
);
544 frame
->type
= htons(type
);
545 memcpy(frame
->data
, packet
, size
);
548 lp
->tx_ring
[index
].buf_len
= cpu_to_le16(ETH_HLEN
+ size
);
549 lp
->tx_ring
[index
].buf_phy_addr
= cpu_to_le32(virt_to_bus(frame
));
551 lp
->tx_ring
[index
].tx_flags
=
552 cpu_to_le16(OWN_BIT
| STP_BIT
| ENP_BIT
| ADD_FCS_BIT
| LTINT_BIT
);
553 writel(VAL1
| TDMD0
, lp
->mmio
+ CMD0
);
554 readl(lp
->mmio
+ CMD0
);
556 /* update slot pointer */
557 lp
->tx_idx
= (lp
->tx_idx
+ 1) & TX_SLOTS_MASK
;
560 static int amd8111e_poll(struct nic
*nic
, int retrieve
)
562 /* return true if there's an ethernet packet ready to read */
563 /* nic->packet should contain data on return */
564 /* nic->packetlen should contain length of data */
566 struct amd8111e_priv
*lp
= nic
->priv_data
;
568 unsigned int index
, pkt_ok
;
570 amd8111e_poll_link(lp
);
573 status
= le16_to_cpu(lp
->rx_ring
[index
].rx_flags
);
574 pkt_len
= le16_to_cpu(lp
->rx_ring
[index
].msg_len
) - 4; /* remove 4bytes FCS */
576 if (status
& OWN_BIT
)
579 if (status
& ERR_BIT
)
581 else if (!(status
& STP_BIT
))
583 else if (!(status
& ENP_BIT
))
585 else if (pkt_len
< RX_PKT_LEN_MIN
)
587 else if (pkt_len
> RX_PKT_LEN_MAX
)
595 nic
->packetlen
= pkt_len
;
596 memcpy(nic
->packet
, lp
->rx_buf
[index
], nic
->packetlen
);
599 lp
->rx_ring
[index
].buf_phy_addr
= cpu_to_le32(virt_to_bus(lp
->rx_buf
[index
]));
600 lp
->rx_ring
[index
].buf_len
= cpu_to_le16(RX_BUF_LEN
);
602 lp
->rx_ring
[index
].rx_flags
= cpu_to_le16(OWN_BIT
);
603 writel(VAL2
| RDMD0
, lp
->mmio
+ CMD0
);
604 readl(lp
->mmio
+ CMD0
);
606 lp
->rx_idx
= (lp
->rx_idx
+ 1) & RX_SLOTS_MASK
;
610 static void amd8111e_disable(struct nic
*nic
)
612 struct amd8111e_priv
*lp
= nic
->priv_data
;
614 /* disable interrupt */
615 amd8111e_disable_interrupt(lp
);
618 amd8111e_init_hw_default(lp
);
627 static void amd8111e_irq(struct nic
*nic
, irq_action_t action
)
629 struct amd8111e_priv
*lp
= nic
->priv_data
;
633 amd8111e_disable_interrupt(lp
);
636 amd8111e_enable_interrupt(lp
);
639 amd8111e_force_interrupt(lp
);
644 static struct nic_operations amd8111e_operations
= {
645 .connect
= dummy_connect
,
646 .poll
= amd8111e_poll
,
647 .transmit
= amd8111e_transmit
,
651 static int amd8111e_probe(struct nic
*nic
, struct pci_device
*pdev
)
653 struct amd8111e_priv
*lp
= &amd8111e
;
654 unsigned long mmio_start
, mmio_len
;
656 pci_fill_nic ( nic
, pdev
);
658 mmio_start
= pci_bar_start(pdev
, PCI_BASE_ADDRESS_0
);
659 mmio_len
= pci_bar_size(pdev
, PCI_BASE_ADDRESS_0
);
661 memset(lp
, 0, sizeof(*lp
));
664 lp
->mmio
= ioremap(mmio_start
, mmio_len
);
666 adjust_pci_device(pdev
);
670 amd8111e_restart(lp
);
672 nic
->nic_op
= &amd8111e_operations
;
676 static struct pci_device_id amd8111e_nics
[] = {
677 PCI_ROM(0x1022, 0x7462, "amd8111e", "AMD8111E"),
680 PCI_DRIVER ( amd8111e_driver
, amd8111e_nics
, PCI_NO_CLASS
);
682 DRIVER ( "AMD8111E", nic_driver
, pci_driver
, amd8111e_driver
,
683 amd8111e_probe
, amd8111e_disable
);