2 * 3c595.c -- 3COM 3C595 Fast Etherlink III PCI driver for etherboot
4 * Copyright (C) 2000 Shusuke Nisiyama <shu@athena.qe.eng.hokudai.ac.jp>
8 * This software may be used, modified, copied, distributed, and sold, in
9 * both source and binary form provided that the above copyright and these
10 * terms are retained. Under no circumstances are the authors responsible for
11 * the proper functioning of this software, nor do the authors assume any
12 * responsibility for damages incurred with its use.
14 * This code is based on Martin Renters' etherboot-4.4.3 3c509.c and
15 * Herb Peyerl's FreeBSD 3.4-RELEASE if_vx.c driver.
17 * Copyright (C) 1993-1994, David Greenman, Martin Renters.
18 * Copyright (C) 1993-1995, Andres Vega Garcia.
19 * Copyright (C) 1995, Serge Babkin.
21 * Copyright (c) 1994 Herb Peyerl <hpeyerl@novatel.ca>
23 * timlegge 08-24-2003 Add Multicast Support
28 #include "etherboot.h"
31 #include <gpxe/ethernet.h>
35 static struct nic_operations t595_operations;
37 static unsigned short eth_nic_base;
38 static unsigned short vx_connector, vx_connectors;
40 static struct connector_entry {
43 } conn_tab[VX_CONNECTORS] = {
44 #define CONNECTOR_UTP 0
46 #define CONNECTOR_AUI 1
50 #define CONNECTOR_BNC 3
52 #define CONNECTOR_TX 4
54 #define CONNECTOR_FX 5
56 #define CONNECTOR_MII 6
61 static void vxgetlink(void);
62 static void vxsetlink(void);
64 /**************************************************************************
65 ETH_RESET - Reset adapter
66 ***************************************************************************/
67 static void t595_reset(struct nic *nic)
71 /***********************************************************
73 *************************************************************/
76 outw(RX_DISABLE, BASE + VX_COMMAND);
77 outw(RX_DISCARD_TOP_PACK, BASE + VX_COMMAND);
79 outw(TX_DISABLE, BASE + VX_COMMAND);
80 outw(STOP_TRANSCEIVER, BASE + VX_COMMAND);
82 outw(RX_RESET, BASE + VX_COMMAND);
84 outw(TX_RESET, BASE + VX_COMMAND);
86 outw(C_INTR_LATCH, BASE + VX_COMMAND);
87 outw(SET_RD_0_MASK, BASE + VX_COMMAND);
88 outw(SET_INTR_MASK, BASE + VX_COMMAND);
89 outw(SET_RX_FILTER, BASE + VX_COMMAND);
98 /* Disable the card */
99 /* outw(0, BASE + VX_W0_CONFIG_CTRL); */
101 /* Configure IRQ to none */
102 /* outw(SET_IRQ(0), BASE + VX_W0_RESOURCE_CFG); */
104 /* Enable the card */
105 /* outw(ENABLE_DRQ_IRQ, BASE + VX_W0_CONFIG_CTRL); */
109 /* Reload the ether_addr. */
110 for (i = 0; i < ETH_ALEN; i++)
111 outb(nic->node_addr[i], BASE + VX_W2_ADDR_0 + i);
113 outw(RX_RESET, BASE + VX_COMMAND);
115 outw(TX_RESET, BASE + VX_COMMAND);
118 /* Window 1 is operating window */
120 for (i = 0; i < 31; i++)
121 inb(BASE + VX_W1_TX_STATUS);
123 outw(SET_RD_0_MASK | S_CARD_FAILURE | S_RX_COMPLETE |
124 S_TX_COMPLETE | S_TX_AVAIL, BASE + VX_COMMAND);
125 outw(SET_INTR_MASK | S_CARD_FAILURE | S_RX_COMPLETE |
126 S_TX_COMPLETE | S_TX_AVAIL, BASE + VX_COMMAND);
129 * Attempt to get rid of any stray interrupts that occured during
130 * configuration. On the i386 this isn't possible because one may
131 * already be queued. However, a single stray interrupt is
135 outw(ACK_INTR | 0xff, BASE + VX_COMMAND);
137 outw(SET_RX_FILTER | FIL_INDIVIDUAL |
138 FIL_BRDCST|FIL_MULTICAST, BASE + VX_COMMAND);
145 j = inl(BASE + VX_W3_INTERNAL_CFG) & ~INTERNAL_CONNECTOR_MASK;
146 outl(BASE + VX_W3_INTERNAL_CFG, j | (i <<INTERNAL_CONNECTOR_BITS));
148 outw(LINKBEAT_ENABLE, BASE + VX_W4_MEDIA_TYPE);
152 /* start tranciever and receiver */
153 outw(RX_ENABLE, BASE + VX_COMMAND);
154 outw(TX_ENABLE, BASE + VX_COMMAND);
158 /**************************************************************************
159 ETH_TRANSMIT - Transmit a frame
160 ***************************************************************************/
161 static char padmap[] = {
164 static void t595_transmit(
166 const char *d, /* Destination */
167 unsigned int t, /* Type */
168 unsigned int s, /* size */
169 const char *p) /* Packet */
176 printf("{l=%d,t=%hX}",s+ETH_HLEN,t);
179 /* swap bytes of type */
182 len=s+ETH_HLEN; /* actual length of packet */
183 pad = padmap[len & 3];
186 * The 3c595 automatically pads short packets to minimum ethernet length,
187 * but we drop packets that are too large. Perhaps we should truncate
190 if (len + pad > ETH_FRAME_LEN) {
194 /* drop acknowledgements */
195 while(( status=inb(BASE + VX_W1_TX_STATUS) )& TXS_COMPLETE ) {
196 if(status & (TXS_UNDERRUN|TXS_MAX_COLLISION|TXS_STATUS_OVERFLOW)) {
197 outw(TX_RESET, BASE + VX_COMMAND);
198 outw(TX_ENABLE, BASE + VX_COMMAND);
201 outb(0x0, BASE + VX_W1_TX_STATUS);
204 while (inw(BASE + VX_W1_FREE_TX) < len + pad + 4) {
205 /* no room in FIFO */
208 outw(len, BASE + VX_W1_TX_PIO_WR_1);
209 outw(0x0, BASE + VX_W1_TX_PIO_WR_1); /* Second dword meaningless */
212 outsw(BASE + VX_W1_TX_PIO_WR_1, d, ETH_ALEN/2);
213 outsw(BASE + VX_W1_TX_PIO_WR_1, nic->node_addr, ETH_ALEN/2);
214 outw(t, BASE + VX_W1_TX_PIO_WR_1);
215 outsw(BASE + VX_W1_TX_PIO_WR_1, p, s / 2);
217 outb(*(p+s - 1), BASE + VX_W1_TX_PIO_WR_1);
220 outb(0, BASE + VX_W1_TX_PIO_WR_1); /* Padding */
222 /* wait for Tx complete */
223 while((inw(BASE + VX_STATUS) & S_COMMAND_IN_PROGRESS) != 0)
227 /**************************************************************************
228 ETH_POLL - Wait for a frame
229 ***************************************************************************/
230 static int t595_poll(struct nic *nic, int retrieve)
232 /* common variables */
233 /* variables for 3C595 */
235 register short rx_fifo;
237 cst=inw(BASE + VX_STATUS);
244 if( (cst & S_RX_COMPLETE)==0 ) {
245 /* acknowledge everything */
246 outw(ACK_INTR | cst, BASE + VX_COMMAND);
247 outw(C_INTR_LATCH, BASE + VX_COMMAND);
252 status = inw(BASE + VX_W1_RX_STATUS);
254 printf("*%hX*",status);
257 if (status & ERR_RX) {
258 outw(RX_DISCARD_TOP_PACK, BASE + VX_COMMAND);
262 rx_fifo = status & RX_BYTES_MASK;
266 if ( ! retrieve ) return 1;
270 printf("[l=%d",rx_fifo);
272 insw(BASE + VX_W1_RX_PIO_RD_1, nic->packet, rx_fifo / 2);
274 nic->packet[rx_fifo-1]=inb(BASE + VX_W1_RX_PIO_RD_1);
275 nic->packetlen=rx_fifo;
278 status = inw(BASE + VX_W1_RX_STATUS);
280 printf("*%hX*",status);
282 rx_fifo = status & RX_BYTES_MASK;
285 insw(BASE + VX_W1_RX_PIO_RD_1, nic->packet+nic->packetlen, rx_fifo / 2);
287 nic->packet[nic->packetlen+rx_fifo-1]=inb(BASE + VX_W1_RX_PIO_RD_1);
288 nic->packetlen+=rx_fifo;
290 printf("+%d",rx_fifo);
293 if(( status & RX_INCOMPLETE )==0) {
295 printf("=%d",nic->packetlen);
302 /* acknowledge reception of packet */
303 outw(RX_DISCARD_TOP_PACK, BASE + VX_COMMAND);
304 while (inw(BASE + VX_STATUS) & S_COMMAND_IN_PROGRESS);
307 unsigned short type = 0; /* used by EDEBUG */
308 type = (nic->packet[12]<<8) | nic->packet[13];
309 if(nic->packet[0]+nic->packet[1]+nic->packet[2]+nic->packet[3]+nic->packet[4]+
310 nic->packet[5] == 0xFF*ETH_ALEN)
311 printf(",t=%hX,b]",type);
313 printf(",t=%hX]",type);
320 /*************************************************************************
321 3Com 595 - specific routines
322 **************************************************************************/
329 for (i = 0; is_eeprom_busy(BASE) && i < MAX_EEPROMBUSY; i++)
331 if (i >= MAX_EEPROMBUSY) {
332 /* printf("3c595: eeprom failed to come ready.\n"); */
333 printf("3c595: eeprom is busy.\n"); /* memory in EPROM is tight */
340 * get_e: gets a 16 bits word from the EEPROM. we must have set the window
349 outw(EEPROM_CMD_RD | offset, BASE + VX_W0_EEPROM_COMMAND);
352 return (inw(BASE + VX_W0_EEPROM_DATA));
361 vx_connectors = inw(BASE + VX_W3_RESET_OPT) & 0x7f;
362 for (n = 0, k = 0; k < VX_CONNECTORS; k++) {
363 if (vx_connectors & conn_tab[k].bit) {
367 printf(conn_tab[k].name);
371 if (vx_connectors == 0) {
372 printf("no connectors!");
376 vx_connector = (inl(BASE + VX_W3_INTERNAL_CFG)
377 & INTERNAL_CONNECTOR_MASK)
378 >> INTERNAL_CONNECTOR_BITS;
379 if (vx_connector & 0x10) {
380 vx_connector &= 0x0f;
381 printf("[*%s*]", conn_tab[vx_connector].name);
382 printf(": disable 'auto select' with DOS util!");
384 printf("[*%s*]", conn_tab[vx_connector].name);
392 char *reason, *warning;
393 static char prev_conn = -1;
395 if (prev_conn == -1) {
396 prev_conn = vx_connector;
399 i = vx_connector; /* default in EEPROM */
403 if ((vx_connectors & conn_tab[vx_connector].bit) == 0) {
404 warning = "strange connector type in EEPROM.";
410 printf("warning: %s\n", warning);
412 printf("selected %s. (%s)\n", conn_tab[i].name, reason);
414 /* Set the selected connector. */
416 j = inl(BASE + VX_W3_INTERNAL_CFG) & ~INTERNAL_CONNECTOR_MASK;
417 outl(j | (i <<INTERNAL_CONNECTOR_BITS), BASE + VX_W3_INTERNAL_CFG);
419 /* First, disable all. */
420 outw(STOP_TRANSCEIVER, BASE + VX_COMMAND);
423 outw(0, BASE + VX_W4_MEDIA_TYPE);
425 /* Second, enable the selected one. */
429 outw(ENABLE_UTP, BASE + VX_W4_MEDIA_TYPE);
432 outw(START_TRANSCEIVER,BASE + VX_COMMAND);
438 outw(LINKBEAT_ENABLE, BASE + VX_W4_MEDIA_TYPE);
440 default: /* AUI and MII fall here */
446 static void t595_disable ( struct nic *nic ) {
450 outw(STOP_TRANSCEIVER, BASE + VX_COMMAND);
453 outw(0, BASE + VX_W4_MEDIA_TYPE);
457 static void t595_irq(struct nic *nic __unused, irq_action_t action __unused)
469 /**************************************************************************
470 ETH_PROBE - Look for an adapter
471 ***************************************************************************/
472 static int t595_probe ( struct nic *nic, struct pci_device *pci ) {
477 if (pci->ioaddr == 0)
479 eth_nic_base = pci->ioaddr;
482 pci_fill_nic ( nic, pci );
483 nic->ioaddr = pci->ioaddr;
486 outw(GLOBAL_RESET, BASE + VX_COMMAND);
493 for (i = 0; i < (EEPROMSIZE/2); i++) {
494 printf("%hX:", get_e(i));
499 * Read the station address from the eeprom
501 p = (unsigned short *) nic->node_addr;
502 for (i = 0; i < 3; i++) {
504 p[i] = htons(get_e(EEPROM_OEM_ADDR_0 + i));
506 outw(ntohs(p[i]), BASE + VX_W2_ADDR_0 + (i * 2));
509 DBG ( "Ethernet address: %s\n", eth_ntoa (nic->node_addr) );
512 nic->nic_op = &t595_operations;
517 static struct nic_operations t595_operations = {
518 .connect = dummy_connect,
520 .transmit = t595_transmit,
525 static struct pci_device_id t595_nics[] = {
526 PCI_ROM(0x10b7, 0x5900, "3c590", "3Com590"), /* Vortex 10Mbps */
527 PCI_ROM(0x10b7, 0x5950, "3c595", "3Com595"), /* Vortex 100baseTx */
528 PCI_ROM(0x10b7, 0x5951, "3c595-1", "3Com595"), /* Vortex 100baseT4 */
529 PCI_ROM(0x10b7, 0x5952, "3c595-2", "3Com595"), /* Vortex 100base-MII */
530 PCI_ROM(0x10b7, 0x9000, "3c900-tpo", "3Com900-TPO"), /* 10 Base TPO */
531 PCI_ROM(0x10b7, 0x9001, "3c900-t4", "3Com900-Combo"), /* 10/100 T4 */
532 PCI_ROM(0x10b7, 0x9004, "3c900b-tpo", "3Com900B-TPO"), /* 10 Base TPO */
533 PCI_ROM(0x10b7, 0x9005, "3c900b-combo", "3Com900B-Combo"), /* 10 Base Combo */
534 PCI_ROM(0x10b7, 0x9006, "3c900b-tpb2", "3Com900B-2/T"), /* 10 Base TP and Base2 */
535 PCI_ROM(0x10b7, 0x900a, "3c900b-fl", "3Com900B-FL"), /* 10 Base F */
536 PCI_ROM(0x10b7, 0x9800, "3c980-cyclone-1", "3Com980-Cyclone"), /* Cyclone */
537 PCI_ROM(0x10b7, 0x9805, "3c9805-1", "3Com9805"), /* Dual Port Server Cyclone */
538 PCI_ROM(0x10b7, 0x7646, "3csoho100-tx-1", "3CSOHO100-TX"), /* Hurricane */
539 PCI_ROM(0x10b7, 0x4500, "3c450-1", "3Com450 HomePNA Tornado"),
542 PCI_DRIVER ( t595_driver, t595_nics, PCI_NO_CLASS );
544 DRIVER ( "3C595", nic_driver, pci_driver, t595_driver,
545 t595_probe, t595_disable );