c874950061420bae5f3ef6e5d0237cd6eb2c4d89
[people/andreif/gpxe.git] / src / drivers / net / 3c515.c
1 /*
2 *    3c515.c -- 3COM 3C515 Fast Etherlink ISA 10/100BASE-TX driver for etherboot
3 *    Copyright (C) 2002 Timothy Legge <tlegge@rogers.com>
4 *
5 *    This program is free software; you can redistribute it and/or modify
6 *    it under the terms of the GNU General Public License as published by
7 *    the Free Software Foundation; either version 2 of the License, or
8 *    (at your option) any later version.
9 *
10 *    This program is distributed in the hope that it will be useful,
11 *    but 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., 675 Mass Ave, Cambridge, MA 02139, USA.
18 *
19 * Portions of this code:
20 * Copyright (C) 1997-2002 Donald Becker  3c515.c: A 3Com ISA EtherLink XL "Corkscrew" ethernet driver for linux.
21 * Copyright (C) 2001 P.J.H.Fox (fox@roestock.demon.co.uk) ISAPNP Tools
22 * Copyright (c) 2002 Jaroslav Kysela <perex@suse.cz>  ISA Plug & Play support Linux Kernel
23 * Copyright (C) 2000 Shusuke Nisiyama <shu@athena.qe.eng.hokudai.ac.jp> etherboot-5.0.5 3c595.c
24 * Coptright (C) 1995 Martin Renters etherboot-5.0.5 3c509.c
25 * Copyright (C) 1999 LightSys Technology Services, Inc. etherboot-5.0.5 3c90x.c
26 * Portions Copyright (C) 1999 Steve Smith etherboot-5.0.5 3c90x.c
27 *
28 * The probe and reset functions and defines are direct copies from the
29 * Becker code modified where necessary to make it work for etherboot
30 *
31 * The poll and transmit functions either contain code from or were written by referencing
32 * the above referenced etherboot drivers.  This driver would not have been
33 * possible without this prior work
34 *
35 * REVISION HISTORY:
36 * ================
37 * v0.10 4-17-2002       TJL     Initial implementation.
38 * v0.11 4-17-2002       TJL     Cleanup of the code
39 * v0.12 4-26-2002       TJL     Added ISA Plug and Play for Non-PNP Bioses
40 * v0.13 6-10-2002       TJL     Fixed ISA_PNP MAC Address problem
41 * v0.14 9-23-2003       TJL     Replaced delay with currticks
42 *
43 * Indent Options: indent -kr -i8
44 * *********************************************************/
45
46
47 /* to get some global routines like printf */
48 #include "etherboot.h"
49 /* to get the interface to the body of the program */
50 #include "nic.h"
51 #include "isapnp.h"
52 #include "isa.h" /* for ISA_ROM */
53 #include "timer.h"
54
55 static void t3c515_wait(unsigned int nticks)
56 {
57         unsigned int to = currticks() + nticks;
58         while (currticks() < to)
59                 /* wait */ ;
60 }
61
62 /* TJL definations */
63 #define HZ      100
64 static int if_port;
65 static struct corkscrew_private *vp;
66 /* Brought directly from 3c515.c by Becker */
67 #define CORKSCREW 1
68
69 /* Maximum events (Rx packets, etc.) to handle at each interrupt.
70 static int max_interrupt_work = 20;
71 */
72
73 /* Enable the automatic media selection code -- usually set. */
74 #define AUTOMEDIA 1
75
76 /* Allow the use of fragment bus master transfers instead of only
77    programmed-I/O for Vortex cards.  Full-bus-master transfers are always
78    enabled by default on Boomerang cards.  If VORTEX_BUS_MASTER is defined,
79    the feature may be turned on using 'options'. */
80 #define VORTEX_BUS_MASTER
81
82 /* A few values that may be tweaked. */
83 /* Keep the ring sizes a power of two for efficiency. */
84 #define TX_RING_SIZE    16
85 #define RX_RING_SIZE    16
86 #define PKT_BUF_SZ              1536    /* Size of each temporary Rx buffer. */
87
88 /* "Knobs" for adjusting internal parameters. */
89 /* Put out somewhat more debugging messages. (0 - no msg, 1 minimal msgs). */
90 #define DRIVER_DEBUG 1
91 /* Some values here only for performance evaluation and path-coverage
92    debugging.
93 static int rx_nocopy, rx_copy, queued_packet;
94 */
95
96 #define CORKSCREW_ID 10
97
98 #define EL3WINDOW(win_num) \
99         outw(SelectWindow + (win_num), nic->ioaddr + EL3_CMD)
100 #define EL3_CMD 0x0e
101 #define EL3_STATUS 0x0e
102 #define RX_BYTES_MASK                   (unsigned short) (0x07ff)
103
104 enum corkscrew_cmd {
105         TotalReset = 0 << 11, SelectWindow = 1 << 11, StartCoax = 2 << 11,
106         RxDisable = 3 << 11, RxEnable = 4 << 11, RxReset = 5 << 11,
107         UpStall = 6 << 11, UpUnstall = (6 << 11) + 1,
108         DownStall = (6 << 11) + 2, DownUnstall = (6 << 11) + 3,
109         RxDiscard = 8 << 11, TxEnable = 9 << 11, TxDisable =
110             10 << 11, TxReset = 11 << 11,
111         FakeIntr = 12 << 11, AckIntr = 13 << 11, SetIntrEnb = 14 << 11,
112         SetStatusEnb = 15 << 11, SetRxFilter = 16 << 11, SetRxThreshold =
113             17 << 11,
114         SetTxThreshold = 18 << 11, SetTxStart = 19 << 11,
115         StartDMAUp = 20 << 11, StartDMADown = (20 << 11) + 1, StatsEnable =
116             21 << 11,
117         StatsDisable = 22 << 11, StopCoax = 23 << 11,
118 };
119
120 /* The SetRxFilter command accepts the following classes: */
121 enum RxFilter {
122         RxStation = 1, RxMulticast = 2, RxBroadcast = 4, RxProm = 8
123 };
124
125 /* Bits in the general status register. */
126 enum corkscrew_status {
127         IntLatch = 0x0001, AdapterFailure = 0x0002, TxComplete = 0x0004,
128         TxAvailable = 0x0008, RxComplete = 0x0010, RxEarly = 0x0020,
129         IntReq = 0x0040, StatsFull = 0x0080,
130         DMADone = 1 << 8, DownComplete = 1 << 9, UpComplete = 1 << 10,
131         DMAInProgress = 1 << 11,        /* DMA controller is still busy. */
132         CmdInProgress = 1 << 12,        /* EL3_CMD is still busy. */
133 };
134
135 /* Register window 1 offsets, the window used in normal operation.
136    On the Corkscrew this window is always mapped at offsets 0x10-0x1f. */
137 enum Window1 {
138         TX_FIFO = 0x10, RX_FIFO = 0x10, RxErrors = 0x14,
139         RxStatus = 0x18, Timer = 0x1A, TxStatus = 0x1B,
140         TxFree = 0x1C,          /* Remaining free bytes in Tx buffer. */
141 };
142 enum Window0 {
143         Wn0IRQ = 0x08,
144 #if defined(CORKSCREW)
145         Wn0EepromCmd = 0x200A,  /* Corkscrew EEPROM command register. */
146         Wn0EepromData = 0x200C, /* Corkscrew EEPROM results register. */
147 #else
148         Wn0EepromCmd = 10,      /* Window 0: EEPROM command register. */
149         Wn0EepromData = 12,     /* Window 0: EEPROM results register. */
150 #endif
151 };
152 enum Win0_EEPROM_bits {
153         EEPROM_Read = 0x80, EEPROM_WRITE = 0x40, EEPROM_ERASE = 0xC0,
154         EEPROM_EWENB = 0x30,    /* Enable erasing/writing for 10 msec. */
155         EEPROM_EWDIS = 0x00,    /* Disable EWENB before 10 msec timeout. */
156 };
157
158 enum Window3 {                  /* Window 3: MAC/config bits. */
159         Wn3_Config = 0, Wn3_MAC_Ctrl = 6, Wn3_Options = 8,
160 };
161 union wn3_config {
162         int i;
163         struct w3_config_fields {
164                 unsigned int ram_size:3, ram_width:1, ram_speed:2,
165                     rom_size:2;
166                 int pad8:8;
167                 unsigned int ram_split:2, pad18:2, xcvr:3, pad21:1,
168                     autoselect:1;
169                 int pad24:7;
170         } u;
171 };
172
173 enum Window4 {
174         Wn4_NetDiag = 6, Wn4_Media = 10,        /* Window 4: Xcvr/media bits. */
175 };
176 enum Win4_Media_bits {
177         Media_SQE = 0x0008,     /* Enable SQE error counting for AUI. */
178         Media_10TP = 0x00C0,    /* Enable link beat and jabber for 10baseT. */
179         Media_Lnk = 0x0080,     /* Enable just link beat for 100TX/100FX. */
180         Media_LnkBeat = 0x0800,
181 };
182 enum Window7 {                  /* Window 7: Bus Master control. */
183         Wn7_MasterAddr = 0, Wn7_MasterLen = 6, Wn7_MasterStatus = 12,
184 };
185
186 /* Boomerang-style bus master control registers.  Note ISA aliases! */
187 enum MasterCtrl {
188         PktStatus = 0x400, DownListPtr = 0x404, FragAddr = 0x408, FragLen =
189             0x40c,
190         TxFreeThreshold = 0x40f, UpPktStatus = 0x410, UpListPtr = 0x418,
191 };
192
193 /* The Rx and Tx descriptor lists.
194    Caution Alpha hackers: these types are 32 bits!  Note also the 8 byte
195    alignment contraint on tx_ring[] and rx_ring[]. */
196 struct boom_rx_desc {
197         u32 next;
198         s32 status;
199         u32 addr;
200         s32 length;
201 };
202
203 /* Values for the Rx status entry. */
204 enum rx_desc_status {
205         RxDComplete = 0x00008000, RxDError = 0x4000,
206         /* See boomerang_rx() for actual error bits */
207 };
208
209 struct boom_tx_desc {
210         u32 next;
211         s32 status;
212         u32 addr;
213         s32 length;
214 };
215
216 struct corkscrew_private {
217         const char *product_name;
218         struct net_device *next_module;
219         /* The Rx and Tx rings are here to keep them quad-word-aligned. */
220         struct boom_rx_desc rx_ring[RX_RING_SIZE];
221         struct boom_tx_desc tx_ring[TX_RING_SIZE];
222         /* The addresses of transmit- and receive-in-place skbuffs. */
223         struct sk_buff *rx_skbuff[RX_RING_SIZE];
224         struct sk_buff *tx_skbuff[TX_RING_SIZE];
225         unsigned int cur_rx, cur_tx;    /* The next free ring entry */
226         unsigned int dirty_rx, dirty_tx;        /* The ring entries to be free()ed. */
227         struct sk_buff *tx_skb; /* Packet being eaten by bus master ctrl.  */
228         int capabilities;       /* Adapter capabilities word. */
229         int options;            /* User-settable misc. driver options. */
230         int last_rx_packets;    /* For media autoselection. */
231         unsigned int available_media:8, /* From Wn3_Options */
232          media_override:3,      /* Passed-in media type. */
233          default_media:3,       /* Read from the EEPROM. */
234          full_duplex:1, autoselect:1, bus_master:1,     /* Vortex can only do a fragment bus-m. */
235          full_bus_master_tx:1, full_bus_master_rx:1,    /* Boomerang  */
236          tx_full:1;
237 };
238
239 /* The action to take with a media selection timer tick.
240    Note that we deviate from the 3Com order by checking 10base2 before AUI.
241  */
242 enum xcvr_types {
243         XCVR_10baseT =
244             0, XCVR_AUI, XCVR_10baseTOnly, XCVR_10base2, XCVR_100baseTx,
245         XCVR_100baseFx, XCVR_MII = 6, XCVR_Default = 8,
246 };
247
248 static struct media_table {
249         char *name;
250         unsigned int media_bits:16,     /* Bits to set in Wn4_Media register. */
251          mask:8,                /* The transceiver-present bit in Wn3_Config. */
252          next:8;                /* The media type to try next. */
253         short wait;             /* Time before we check media status. */
254 } media_tbl[] = {
255         {
256         "10baseT", Media_10TP, 0x08, XCVR_10base2, (14 * HZ) / 10}
257         , {
258         "10Mbs AUI", Media_SQE, 0x20, XCVR_Default, (1 * HZ) / 10}
259         , {
260         "undefined", 0, 0x80, XCVR_10baseT, 10000}
261         , {
262         "10base2", 0, 0x10, XCVR_AUI, (1 * HZ) / 10}
263         , {
264         "100baseTX", Media_Lnk, 0x02, XCVR_100baseFx,
265                     (14 * HZ) / 10}
266         , {
267         "100baseFX", Media_Lnk, 0x04, XCVR_MII, (14 * HZ) / 10}
268         , {
269         "MII", 0, 0x40, XCVR_10baseT, 3 * HZ}
270         , {
271         "undefined", 0, 0x01, XCVR_10baseT, 10000}
272         , {
273         "Default", 0, 0xFF, XCVR_10baseT, 10000}
274 ,};
275
276 /* TILEG Modified to remove reference to dev */
277 static int corkscrew_found_device(int ioaddr, int irq, int product_index,
278                                   int options, struct nic *nic);
279 static int corkscrew_probe1(int ioaddr, int irq, int product_index,
280                             struct nic *nic);
281
282 /* This driver uses 'options' to pass the media type, full-duplex flag, etc. */
283 /* Note: this is the only limit on the number of cards supported!! */
284 static int options = -1;
285
286 /* End Brought directly from 3c515.c by Becker */
287
288 /**************************************************************************
289 RESET - Reset adapter
290 ***************************************************************************/
291 static void t515_reset(struct nic *nic)
292 {
293         union wn3_config config;
294         int i;
295
296         /* Before initializing select the active media port. */
297         EL3WINDOW(3);
298         if (vp->full_duplex)
299                 outb(0x20, nic->ioaddr + Wn3_MAC_Ctrl); /* Set the full-duplex bit. */
300         config.i = inl(nic->ioaddr + Wn3_Config);
301
302         if (vp->media_override != 7) {
303                 DBG ( "Media override to transceiver %d (%s).\n",
304                       vp->media_override,
305                       media_tbl[vp->media_override].name);
306                 if_port = vp->media_override;
307         } else if (vp->autoselect) {
308                 /* Find first available media type, starting with 100baseTx. */
309                 if_port = 4;
310                 while (!(vp->available_media & media_tbl[if_port].mask))
311                         if_port = media_tbl[if_port].next;
312
313                 DBG ( "Initial media type %s.\n",
314                       media_tbl[if_port].name);
315         } else
316                 if_port = vp->default_media;
317
318         config.u.xcvr = if_port;
319         outl(config.i, nic->ioaddr + Wn3_Config);
320
321         DBG ( "corkscrew_open() InternalConfig 0x%hX.\n",
322               config.i);
323
324         outw(TxReset, nic->ioaddr + EL3_CMD);
325         for (i = 20; i >= 0; i--)
326                 if (!(inw(nic->ioaddr + EL3_STATUS) & CmdInProgress))
327                         break;
328
329         outw(RxReset, nic->ioaddr + EL3_CMD);
330         /* Wait a few ticks for the RxReset command to complete. */
331         for (i = 20; i >= 0; i--)
332                 if (!(inw(nic->ioaddr + EL3_STATUS) & CmdInProgress))
333                         break;
334
335         outw(SetStatusEnb | 0x00, nic->ioaddr + EL3_CMD);
336
337 #ifdef debug_3c515
338                 EL3WINDOW(4);
339                 DBG ( "FIXME: fix print for irq, not 9" );
340                 DBG ( "corkscrew_open() irq %d media status 0x%hX.\n",
341                       9, inw(nic->ioaddr + Wn4_Media) );
342 #endif
343
344         /* Set the station address and mask in window 2 each time opened. */
345         EL3WINDOW(2);
346         for (i = 0; i < 6; i++)
347                 outb(nic->node_addr[i], nic->ioaddr + i);
348         for (; i < 12; i += 2)
349                 outw(0, nic->ioaddr + i);
350
351         if (if_port == 3)
352                 /* Start the thinnet transceiver. We should really wait 50ms... */
353                 outw(StartCoax, nic->ioaddr + EL3_CMD);
354         EL3WINDOW(4);
355         outw((inw(nic->ioaddr + Wn4_Media) & ~(Media_10TP | Media_SQE)) |
356              media_tbl[if_port].media_bits, nic->ioaddr + Wn4_Media);
357
358         /* Switch to the stats window, and clear all stats by reading. */
359 /*      outw(StatsDisable, nic->ioaddr + EL3_CMD);*/
360         EL3WINDOW(6);
361         for (i = 0; i < 10; i++)
362                 inb(nic->ioaddr + i);
363         inw(nic->ioaddr + 10);
364         inw(nic->ioaddr + 12);
365         /* New: On the Vortex we must also clear the BadSSD counter. */
366         EL3WINDOW(4);
367         inb(nic->ioaddr + 12);
368         /* ..and on the Boomerang we enable the extra statistics bits. */
369         outw(0x0040, nic->ioaddr + Wn4_NetDiag);
370
371         /* Switch to register set 7 for normal use. */
372         EL3WINDOW(7);
373
374         /* Temporarily left in place.  If these FIXMEs are printed
375            it meand that special logic for that card may need to be added
376            see Becker's 3c515.c driver */
377         if (vp->full_bus_master_rx) {   /* Boomerang bus master. */
378                 printf("FIXME: Is this if necessary");
379                 vp->cur_rx = vp->dirty_rx = 0;
380                 DBG ( "   Filling in the Rx ring.\n" );
381                 for (i = 0; i < RX_RING_SIZE; i++) {
382                         printf("FIXME: Is this if necessary");
383                 }
384         }
385         if (vp->full_bus_master_tx) {   /* Boomerang bus master Tx. */
386                 vp->cur_tx = vp->dirty_tx = 0;
387                 outb(PKT_BUF_SZ >> 8, nic->ioaddr + TxFreeThreshold);   /* Room for a packet. */
388                 /* Clear the Tx ring. */
389                 for (i = 0; i < TX_RING_SIZE; i++)
390                         vp->tx_skbuff[i] = 0;
391                 outl(0, nic->ioaddr + DownListPtr);
392         }
393         /* Set receiver mode: presumably accept b-case and phys addr only. */
394         outw(SetRxFilter | RxStation | RxMulticast | RxBroadcast | RxProm,
395              nic->ioaddr + EL3_CMD);
396
397         outw(RxEnable, nic->ioaddr + EL3_CMD);  /* Enable the receiver. */
398         outw(TxEnable, nic->ioaddr + EL3_CMD);  /* Enable transmitter. */
399         /* Allow status bits to be seen. */
400         outw(SetStatusEnb | AdapterFailure | IntReq | StatsFull |
401              (vp->full_bus_master_tx ? DownComplete : TxAvailable) |
402              (vp->full_bus_master_rx ? UpComplete : RxComplete) |
403              (vp->bus_master ? DMADone : 0), nic->ioaddr + EL3_CMD);
404         /* Ack all pending events, and set active indicator mask. */
405         outw(AckIntr | IntLatch | TxAvailable | RxEarly | IntReq,
406              nic->ioaddr + EL3_CMD);
407         outw(SetIntrEnb | IntLatch | TxAvailable | RxComplete | StatsFull
408              | (vp->bus_master ? DMADone : 0) | UpComplete | DownComplete,
409              nic->ioaddr + EL3_CMD);
410
411 }
412
413 /**************************************************************************
414 POLL - Wait for a frame
415 ***************************************************************************/
416 static int t515_poll(struct nic *nic, int retrieve)
417 {
418         short status, cst;
419         register short rx_fifo;
420
421         cst = inw(nic->ioaddr + EL3_STATUS);
422
423         if ((cst & RxComplete) == 0) {
424                 /* Ack all pending events, and set active indicator mask. */
425                 outw(AckIntr | IntLatch | TxAvailable | RxEarly | IntReq,
426                      nic->ioaddr + EL3_CMD);
427                 outw(SetIntrEnb | IntLatch | TxAvailable | RxComplete |
428                      StatsFull | (vp->
429                                   bus_master ? DMADone : 0) | UpComplete |
430                      DownComplete, nic->ioaddr + EL3_CMD);
431                 return 0;
432         }
433         status = inw(nic->ioaddr + RxStatus);
434
435         if (status & RxDError) {
436                 printf("RxDError\n");
437                 outw(RxDiscard, nic->ioaddr + EL3_CMD);
438                 return 0;
439         }
440
441         rx_fifo = status & RX_BYTES_MASK;
442         if (rx_fifo == 0)
443                 return 0;
444
445         if ( ! retrieve ) return 1;
446
447         DBG ( "[l=%d", rx_fifo );
448         insw(nic->ioaddr + RX_FIFO, nic->packet, rx_fifo / 2);
449         if (rx_fifo & 1)
450                 nic->packet[rx_fifo - 1] = inb(nic->ioaddr + RX_FIFO);
451         nic->packetlen = rx_fifo;
452
453         while (1) {
454                 status = inw(nic->ioaddr + RxStatus);
455                 DBG ( "0x%hX*", status );
456                 rx_fifo = status & RX_BYTES_MASK;
457
458                 if (rx_fifo > 0) {
459                         insw(nic->ioaddr + RX_FIFO, nic->packet + nic->packetlen,
460                              rx_fifo / 2);
461                         if (rx_fifo & 1)
462                                 nic->packet[nic->packetlen + rx_fifo - 1] =
463                                     inb(nic->ioaddr + RX_FIFO);
464                         nic->packetlen += rx_fifo;
465                         DBG ( "+%d", rx_fifo );
466                 }
467                 if ((status & RxComplete) == 0) {
468                         DBG ( "=%d", nic->packetlen );
469                         break;
470                 }
471                 udelay(1000);
472         }
473
474         /* acknowledge reception of packet */
475         outw(RxDiscard, nic->ioaddr + EL3_CMD);
476         while (inw(nic->ioaddr + EL3_STATUS) & CmdInProgress);
477 #ifdef debug_3c515
478         {
479                 unsigned short type = 0;
480                 type = (nic->packet[12] << 8) | nic->packet[13];
481                 if (nic->packet[0] + nic->packet[1] + nic->packet[2] +
482                     nic->packet[3] + nic->packet[4] + nic->packet[5] ==
483                     0xFF * ETH_ALEN)
484                         DBG ( ",t=0x%hX,b]", type );
485                 else
486                         DBG ( ",t=0x%hX]", type );
487         }
488 #endif
489
490         return 1;
491 }
492
493 /*************************************************************************
494         3Com 515 - specific routines
495 **************************************************************************/
496 static char padmap[] = {
497         0, 3, 2, 1
498 };
499 /**************************************************************************
500 TRANSMIT - Transmit a frame
501 ***************************************************************************/
502 static void t515_transmit(struct nic *nic, const char *d,       /* Destination */
503                           unsigned int t,       /* Type */
504                           unsigned int s,       /* size */
505                           const char *p)
506 {                               /* Packet */
507         register int len;
508         int pad;
509         int status;
510
511         DBG ( "{l=%d,t=0x%hX}", s + ETH_HLEN, t );
512
513         /* swap bytes of type */
514         t = htons(t);
515
516         len = s + ETH_HLEN;     /* actual length of packet */
517         pad = padmap[len & 3];
518
519         /*
520          * The 3c515 automatically pads short packets to minimum ethernet length,
521          * but we drop packets that are too large. Perhaps we should truncate
522          * them instead?
523          Copied from 3c595.  Is this true for the 3c515?
524          */
525         if (len + pad > ETH_FRAME_LEN) {
526                 return;
527         }
528         /* drop acknowledgements */
529         while ((status = inb(nic->ioaddr + TxStatus)) & TxComplete) {
530                 /*if(status & (TXS_UNDERRUN|0x88|TXS_STATUS_OVERFLOW)) { */
531                 outw(TxReset, nic->ioaddr + EL3_CMD);
532                 outw(TxEnable, nic->ioaddr + EL3_CMD);
533 /*              }                                                          */
534
535                 outb(0x0, nic->ioaddr + TxStatus);
536         }
537
538         while (inw(nic->ioaddr + TxFree) < len + pad + 4) {
539                 /* no room in FIFO */
540         }
541
542         outw(len, nic->ioaddr + TX_FIFO);
543         outw(0x0, nic->ioaddr + TX_FIFO);       /* Second dword meaningless */
544
545         /* write packet */
546         outsw(nic->ioaddr + TX_FIFO, d, ETH_ALEN / 2);
547         outsw(nic->ioaddr + TX_FIFO, nic->node_addr, ETH_ALEN / 2);
548         outw(t, nic->ioaddr + TX_FIFO);
549         outsw(nic->ioaddr + TX_FIFO, p, s / 2);
550
551         if (s & 1)
552                 outb(*(p + s - 1), nic->ioaddr + TX_FIFO);
553
554         while (pad--)
555                 outb(0, nic->ioaddr + TX_FIFO); /* Padding */
556
557         /* wait for Tx complete */
558         while ((inw(nic->ioaddr + EL3_STATUS) & CmdInProgress) != 0);
559 }
560
561 /**************************************************************************
562 DISABLE - Turn off ethernet interface
563 ***************************************************************************/
564 static void t515_disable ( struct nic *nic,
565                            struct isapnp_device *isapnp ) {
566
567         nic_disable ( nic );
568
569         /* merge reset an disable */
570         t515_reset(nic);
571
572         /* This is a hack.  Since ltsp worked on my
573            system without any disable functionality I
574            have no way to determine if this works */
575
576         /* Disable the receiver and transmitter. */
577         outw(RxDisable, nic->ioaddr + EL3_CMD);
578         outw(TxDisable, nic->ioaddr + EL3_CMD);
579
580         if (if_port == XCVR_10base2)
581                 /* Turn off thinnet power.  Green! */
582                 outw(StopCoax, nic->ioaddr + EL3_CMD);
583
584
585         outw(SetIntrEnb | 0x0000, nic->ioaddr + EL3_CMD);
586
587         deactivate_isapnp_device ( isapnp );
588         return;
589 }
590
591 static void t515_irq(struct nic *nic __unused, irq_action_t action __unused)
592 {
593   switch ( action ) {
594   case DISABLE :
595     break;
596   case ENABLE :
597     break;
598   case FORCE :
599     break;
600   }
601 }
602
603 static struct nic_operations t515_operations = {
604         .connect        = dummy_connect,
605         .poll           = t515_poll,
606         .transmit       = t515_transmit,
607         .irq            = t515_irq,
608
609 };
610
611 /**************************************************************************
612 PROBE - Look for an adapter, this routine's visible to the outside
613 You should omit the last argument struct pci_device * for a non-PCI NIC
614 ***************************************************************************/
615 static int t515_probe ( struct nic *nic, struct isapnp_device *isapnp ) {
616
617         /* Direct copy from Beckers 3c515.c removing any ISAPNP sections */
618
619         isapnp_fill_nic ( nic, isapnp );
620
621         nic->ioaddr = isapnp->ioaddr;
622         nic->irqno = isapnp->irqno;
623         activate_isapnp_device ( isapnp );
624
625         /* Check the resource configuration for a matching ioaddr. */
626         if ((unsigned)(inw(nic->ioaddr + 0x2002) & 0x1f0)
627             != (nic->ioaddr & 0x1f0)) {
628                 DBG ( "3c515 ioaddr mismatch\n" );
629                 return 0;
630         }
631
632         /* Verify by reading the device ID from the EEPROM. */
633         {
634                 int timer;
635                 outw(EEPROM_Read + 7, nic->ioaddr + Wn0EepromCmd);
636                 /* Pause for at least 162 us. for the read to take place. */
637                 for (timer = 4; timer >= 0; timer--) {
638                         t3c515_wait(1);
639                         if ((inw(nic->ioaddr + Wn0EepromCmd) & 0x0200) == 0)
640                                 break;
641                 }
642                 if (inw(nic->ioaddr + Wn0EepromData) != 0x6d50) {
643                         DBG ( "3c515 read incorrect vendor ID from EEPROM" );
644                         return 0;
645                 }
646
647         }
648         DBG ( "3c515 Resource configuration register 0x%hX, DCR 0x%hX.\n",
649               inl(nic->ioaddr + 0x2002), inw(nic->ioaddr + 0x2000) );
650         corkscrew_found_device(nic->ioaddr, nic->irqno, CORKSCREW_ID,
651                                options, nic);
652         
653         t515_reset(nic);        
654         nic->nic_op     = &t515_operations;
655         return 1;
656 }
657
658 static int
659 corkscrew_found_device(int ioaddr, int irq,
660                        int product_index, int options, struct nic *nic)
661 {
662         /* Direct copy from Becker 3c515.c with unecessary parts removed */
663         vp->product_name = "3c515";
664         vp->options = options;
665         if (options >= 0) {
666                 vp->media_override =
667                     ((options & 7) == 2) ? 0 : options & 7;
668                 vp->full_duplex = (options & 8) ? 1 : 0;
669                 vp->bus_master = (options & 16) ? 1 : 0;
670         } else {
671                 vp->media_override = 7;
672                 vp->full_duplex = 0;
673                 vp->bus_master = 0;
674         }
675
676         corkscrew_probe1(ioaddr, irq, product_index, nic);
677         return 0;
678 }
679
680 static int
681 corkscrew_probe1(int ioaddr, int irq, int product_index __unused,
682                  struct nic *nic)
683 {
684         unsigned int eeprom[0x40], checksum = 0;        /* EEPROM contents */
685         int i;
686
687         printf("3Com %s at 0x%hX, ", vp->product_name, ioaddr);
688
689         /* Read the station address from the EEPROM. */
690         EL3WINDOW(0);
691         for (i = 0; i < 0x18; i++) {
692                 short *phys_addr = (short *) nic->node_addr;
693                 int timer;
694                 outw(EEPROM_Read + i, ioaddr + Wn0EepromCmd);
695                 /* Pause for at least 162 us. for the read to take place. */
696                 for (timer = 4; timer >= 0; timer--) {
697                         t3c515_wait(1);
698                         if ((inw(ioaddr + Wn0EepromCmd) & 0x0200) == 0)
699                                 break;
700                 }
701                 eeprom[i] = inw(ioaddr + Wn0EepromData);
702                 DBG ( "Value %d: %hX        ", i, eeprom[i] );
703                 checksum ^= eeprom[i];
704                 if (i < 3)
705                         phys_addr[i] = htons(eeprom[i]);
706         }
707         checksum = (checksum ^ (checksum >> 8)) & 0xff;
708         if (checksum != 0x00)
709                 printf(" ***INVALID CHECKSUM 0x%hX*** ", checksum);
710
711         printf("%!", nic->node_addr);
712         if (eeprom[16] == 0x11c7) {     /* Corkscrew */
713
714         }
715         printf(", IRQ %d\n", irq);
716         /* Tell them about an invalid IRQ. */
717         if ( (irq <= 0 || irq > 15) ) {
718                 DBG (" *** Warning: this IRQ is unlikely to work! ***\n" );
719         }
720
721         {
722                 char *ram_split[] = { "5:3", "3:1", "1:1", "3:5" };
723                 union wn3_config config;
724                 EL3WINDOW(3);
725                 vp->available_media = inw(ioaddr + Wn3_Options);
726                 config.i = inl(ioaddr + Wn3_Config);
727                 DBG ( "  Internal config register is %4.4x, "
728                       "transceivers 0x%hX.\n",
729                       config.i, inw(ioaddr + Wn3_Options) );
730                 printf
731                     ("  %dK %s-wide RAM %s Rx:Tx split, %s%s interface.\n",
732                      8 << config.u.ram_size,
733                      config.u.ram_width ? "word" : "byte",
734                      ram_split[config.u.ram_split],
735                      config.u.autoselect ? "autoselect/" : "",
736                      media_tbl[config.u.xcvr].name);
737                 if_port = config.u.xcvr;
738                 vp->default_media = config.u.xcvr;
739                 vp->autoselect = config.u.autoselect;
740         }
741         if (vp->media_override != 7) {
742                 printf("  Media override to transceiver type %d (%s).\n",
743                        vp->media_override,
744                        media_tbl[vp->media_override].name);
745                 if_port = vp->media_override;
746         }
747
748         vp->capabilities = eeprom[16];
749         vp->full_bus_master_tx = (vp->capabilities & 0x20) ? 1 : 0;
750         /* Rx is broken at 10mbps, so we always disable it. */
751         /* vp->full_bus_master_rx = 0; */
752         vp->full_bus_master_rx = (vp->capabilities & 0x20) ? 1 : 0;
753
754         return 0;
755 }
756
757 static struct isapnp_id t515_adapters[] = {
758         { "3c515 (ISAPnP)", ISAPNP_VENDOR('T','C','M'), 0x5051 },
759 };
760
761 ISAPNP_DRIVER ( t515_driver, t515_adapters );
762
763 DRIVER ( "3c515", nic_driver, isapnp_driver, t515_driver,
764          t515_probe, t515_disable );
765
766 ISA_ROM ( "3c515", "3c515 Fast EtherLink ISAPnP" );