40
41#define TULIP_HDR_DATA
42
43#include <sys/param.h>
44#include <sys/systm.h>
45#include <sys/endian.h>
46#include <sys/mbuf.h>
47#include <sys/socket.h>
48#include <sys/sockio.h>
49#include <sys/malloc.h>
50#include <sys/kernel.h>
51#include <sys/module.h>
52#include <sys/eventhandler.h>
53#include <machine/bus.h>
54#include <machine/resource.h>
55#include <sys/bus.h>
56#include <sys/rman.h>
57
58#include <net/if.h>
59#include <net/if_arp.h>
60#include <net/ethernet.h>
61#include <net/if_media.h>
62#include <net/if_types.h>
63#include <net/if_dl.h>
64
65#include <net/bpf.h>
66
67#ifdef INET
68#include <netinet/in.h>
69#include <netinet/if_ether.h>
70#endif
71
72#include <vm/vm.h>
73
74#include <net/if_var.h>
75#include <vm/pmap.h>
76#include <dev/pci/pcivar.h>
77#include <dev/pci/pcireg.h>
78#include <pci/dc21040reg.h>
79
80/*
81 * Intel CPUs should use I/O mapped access.
82 */
83#if defined(__i386__)
84#define TULIP_IOMAPPED
85#endif
86
87#if 0
88/*
89 * This turns on all sort of debugging stuff and make the
90 * driver much larger.
91 */
92#define TULIP_DEBUG
93#endif
94
95#if 0
96#define TULIP_PERFSTATS
97#endif
98
99#define TULIP_HZ 10
100
101#include <pci/if_devar.h>
102
103/*
104 * This module supports
105 * the DEC 21040 PCI Ethernet Controller.
106 * the DEC 21041 PCI Ethernet Controller.
107 * the DEC 21140 PCI Fast Ethernet Controller.
108 */
109static void tulip_addr_filter(tulip_softc_t * const sc);
110static void tulip_ifinit(void *);
111static int tulip_ifmedia_change(struct ifnet * const ifp);
112static void tulip_ifmedia_status(struct ifnet * const ifp,
113 struct ifmediareq *req);
114static void tulip_ifstart(struct ifnet *ifp);
115static void tulip_init(tulip_softc_t * const sc);
116static void tulip_intr_shared(void *arg);
117static void tulip_intr_normal(void *arg);
118static void tulip_mii_autonegotiate(tulip_softc_t * const sc,
119 const unsigned phyaddr);
120static int tulip_mii_map_abilities(tulip_softc_t * const sc,
121 unsigned abilities);
122static tulip_media_t
123 tulip_mii_phy_readspecific(tulip_softc_t * const sc);
124static unsigned tulip_mii_readreg(tulip_softc_t * const sc, unsigned devaddr,
125 unsigned regno);
126static void tulip_mii_writereg(tulip_softc_t * const sc, unsigned devaddr,
127 unsigned regno, unsigned data);
128static void tulip_reset(tulip_softc_t * const sc);
129static void tulip_rx_intr(tulip_softc_t * const sc);
130static int tulip_srom_decode(tulip_softc_t * const sc);
131static void tulip_start(tulip_softc_t * const sc);
132static struct mbuf *
133 tulip_txput(tulip_softc_t * const sc, struct mbuf *m);
134static void tulip_txput_setup(tulip_softc_t * const sc);
135
136static void
137tulip_timeout_callback(
138 void *arg)
139{
140 tulip_softc_t * const sc = arg;
141
142 TULIP_PERFSTART(timeout)
143 TULIP_LOCK(sc);
144
145 sc->tulip_flags &= ~TULIP_TIMEOUTPENDING;
146 sc->tulip_probe_timeout -= 1000 / TULIP_HZ;
147 (sc->tulip_boardsw->bd_media_poll)(sc, TULIP_MEDIAPOLL_TIMER);
148
149 TULIP_PERFEND(timeout);
150 TULIP_UNLOCK(sc);
151}
152
153static void
154tulip_timeout(
155 tulip_softc_t * const sc)
156{
157 TULIP_LOCK_ASSERT(sc);
158 if (sc->tulip_flags & TULIP_TIMEOUTPENDING)
159 return;
160 sc->tulip_flags |= TULIP_TIMEOUTPENDING;
161 callout_reset(&sc->tulip_callout, (hz + TULIP_HZ / 2) / TULIP_HZ,
162 tulip_timeout_callback, sc);
163}
164
165
166static int
167tulip_txprobe(
168 tulip_softc_t * const sc)
169{
170 struct mbuf *m;
171 /*
172 * Before we are sure this is the right media we need
173 * to send a small packet to make sure there's carrier.
174 * Strangely, BNC and AUI will "see" receive data if
175 * either is connected so the transmit is the only way
176 * to verify the connectivity.
177 */
178 TULIP_LOCK_ASSERT(sc);
179 MGETHDR(m, M_DONTWAIT, MT_DATA);
180 if (m == NULL)
181 return 0;
182 /*
183 * Construct a LLC TEST message which will point to ourselves.
184 */
185 bcopy(IFP2ENADDR(sc->tulip_ifp), mtod(m, struct ether_header *)->ether_dhost, 6);
186 bcopy(IFP2ENADDR(sc->tulip_ifp), mtod(m, struct ether_header *)->ether_shost, 6);
187 mtod(m, struct ether_header *)->ether_type = htons(3);
188 mtod(m, unsigned char *)[14] = 0;
189 mtod(m, unsigned char *)[15] = 0;
190 mtod(m, unsigned char *)[16] = 0xE3; /* LLC Class1 TEST (no poll) */
191 m->m_len = m->m_pkthdr.len = sizeof(struct ether_header) + 3;
192 /*
193 * send it!
194 */
195 sc->tulip_cmdmode |= TULIP_CMD_TXRUN;
196 sc->tulip_intrmask |= TULIP_STS_TXINTR;
197 sc->tulip_flags |= TULIP_TXPROBE_ACTIVE;
198 TULIP_CSR_WRITE(sc, csr_command, sc->tulip_cmdmode);
199 TULIP_CSR_WRITE(sc, csr_intr, sc->tulip_intrmask);
200 if ((m = tulip_txput(sc, m)) != NULL)
201 m_freem(m);
202 sc->tulip_probe.probe_txprobes++;
203 return 1;
204}
205
206
207static void
208tulip_media_set(
209 tulip_softc_t * const sc,
210 tulip_media_t media)
211{
212 const tulip_media_info_t *mi = sc->tulip_mediums[media];
213
214 TULIP_LOCK_ASSERT(sc);
215 if (mi == NULL)
216 return;
217
218 /*
219 * If we are switching media, make sure we don't think there's
220 * any stale RX activity
221 */
222 sc->tulip_flags &= ~TULIP_RXACT;
223 if (mi->mi_type == TULIP_MEDIAINFO_SIA) {
224 TULIP_CSR_WRITE(sc, csr_sia_connectivity, TULIP_SIACONN_RESET);
225 TULIP_CSR_WRITE(sc, csr_sia_tx_rx, mi->mi_sia_tx_rx);
226 if (sc->tulip_features & TULIP_HAVE_SIAGP) {
227 TULIP_CSR_WRITE(sc, csr_sia_general, mi->mi_sia_gp_control|mi->mi_sia_general);
228 DELAY(50);
229 TULIP_CSR_WRITE(sc, csr_sia_general, mi->mi_sia_gp_data|mi->mi_sia_general);
230 } else {
231 TULIP_CSR_WRITE(sc, csr_sia_general, mi->mi_sia_general);
232 }
233 TULIP_CSR_WRITE(sc, csr_sia_connectivity, mi->mi_sia_connectivity);
234 } else if (mi->mi_type == TULIP_MEDIAINFO_GPR) {
235#define TULIP_GPR_CMDBITS (TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION|TULIP_CMD_SCRAMBLER|TULIP_CMD_TXTHRSHLDCTL)
236 /*
237 * If the cmdmode bits don't match the currently operating mode,
238 * set the cmdmode appropriately and reset the chip.
239 */
240 if (((mi->mi_cmdmode ^ TULIP_CSR_READ(sc, csr_command)) & TULIP_GPR_CMDBITS) != 0) {
241 sc->tulip_cmdmode &= ~TULIP_GPR_CMDBITS;
242 sc->tulip_cmdmode |= mi->mi_cmdmode;
243 tulip_reset(sc);
244 }
245 TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_PINSET|sc->tulip_gpinit);
246 DELAY(10);
247 TULIP_CSR_WRITE(sc, csr_gp, (u_int8_t) mi->mi_gpdata);
248 } else if (mi->mi_type == TULIP_MEDIAINFO_SYM) {
249 /*
250 * If the cmdmode bits don't match the currently operating mode,
251 * set the cmdmode appropriately and reset the chip.
252 */
253 if (((mi->mi_cmdmode ^ TULIP_CSR_READ(sc, csr_command)) & TULIP_GPR_CMDBITS) != 0) {
254 sc->tulip_cmdmode &= ~TULIP_GPR_CMDBITS;
255 sc->tulip_cmdmode |= mi->mi_cmdmode;
256 tulip_reset(sc);
257 }
258 TULIP_CSR_WRITE(sc, csr_sia_general, mi->mi_gpcontrol);
259 TULIP_CSR_WRITE(sc, csr_sia_general, mi->mi_gpdata);
260 } else if (mi->mi_type == TULIP_MEDIAINFO_MII
261 && sc->tulip_probe_state != TULIP_PROBE_INACTIVE) {
262 int idx;
263 if (sc->tulip_features & TULIP_HAVE_SIAGP) {
264 const u_int8_t *dp;
265 dp = &sc->tulip_rombuf[mi->mi_reset_offset];
266 for (idx = 0; idx < mi->mi_reset_length; idx++, dp += 2) {
267 DELAY(10);
268 TULIP_CSR_WRITE(sc, csr_sia_general, (dp[0] + 256 * dp[1]) << 16);
269 }
270 sc->tulip_phyaddr = mi->mi_phyaddr;
271 dp = &sc->tulip_rombuf[mi->mi_gpr_offset];
272 for (idx = 0; idx < mi->mi_gpr_length; idx++, dp += 2) {
273 DELAY(10);
274 TULIP_CSR_WRITE(sc, csr_sia_general, (dp[0] + 256 * dp[1]) << 16);
275 }
276 } else {
277 for (idx = 0; idx < mi->mi_reset_length; idx++) {
278 DELAY(10);
279 TULIP_CSR_WRITE(sc, csr_gp, sc->tulip_rombuf[mi->mi_reset_offset + idx]);
280 }
281 sc->tulip_phyaddr = mi->mi_phyaddr;
282 for (idx = 0; idx < mi->mi_gpr_length; idx++) {
283 DELAY(10);
284 TULIP_CSR_WRITE(sc, csr_gp, sc->tulip_rombuf[mi->mi_gpr_offset + idx]);
285 }
286 }
287 if (sc->tulip_flags & TULIP_TRYNWAY) {
288 tulip_mii_autonegotiate(sc, sc->tulip_phyaddr);
289 } else if ((sc->tulip_flags & TULIP_DIDNWAY) == 0) {
290 u_int32_t data = tulip_mii_readreg(sc, sc->tulip_phyaddr, PHYREG_CONTROL);
291 data &= ~(PHYCTL_SELECT_100MB|PHYCTL_FULL_DUPLEX|PHYCTL_AUTONEG_ENABLE);
292 sc->tulip_flags &= ~TULIP_DIDNWAY;
293 if (TULIP_IS_MEDIA_FD(media))
294 data |= PHYCTL_FULL_DUPLEX;
295 if (TULIP_IS_MEDIA_100MB(media))
296 data |= PHYCTL_SELECT_100MB;
297 tulip_mii_writereg(sc, sc->tulip_phyaddr, PHYREG_CONTROL, data);
298 }
299 }
300}
301
302static void
303tulip_linkup(
304 tulip_softc_t * const sc,
305 tulip_media_t media)
306{
307 TULIP_LOCK_ASSERT(sc);
308 if ((sc->tulip_flags & TULIP_LINKUP) == 0)
309 sc->tulip_flags |= TULIP_PRINTLINKUP;
310 sc->tulip_flags |= TULIP_LINKUP;
311 sc->tulip_ifp->if_flags &= ~IFF_OACTIVE;
312#if 0 /* XXX how does with work with ifmedia? */
313 if ((sc->tulip_flags & TULIP_DIDNWAY) == 0) {
314 if (sc->tulip_ifp->if_flags & IFF_FULLDUPLEX) {
315 if (TULIP_CAN_MEDIA_FD(media)
316 && sc->tulip_mediums[TULIP_FD_MEDIA_OF(media)] != NULL)
317 media = TULIP_FD_MEDIA_OF(media);
318 } else {
319 if (TULIP_IS_MEDIA_FD(media)
320 && sc->tulip_mediums[TULIP_HD_MEDIA_OF(media)] != NULL)
321 media = TULIP_HD_MEDIA_OF(media);
322 }
323 }
324#endif
325 if (sc->tulip_media != media) {
326#ifdef TULIP_DEBUG
327 sc->tulip_dbg.dbg_last_media = sc->tulip_media;
328#endif
329 sc->tulip_media = media;
330 sc->tulip_flags |= TULIP_PRINTMEDIA;
331 if (TULIP_IS_MEDIA_FD(sc->tulip_media)) {
332 sc->tulip_cmdmode |= TULIP_CMD_FULLDUPLEX;
333 } else if (sc->tulip_chipid != TULIP_21041 || (sc->tulip_flags & TULIP_DIDNWAY) == 0) {
334 sc->tulip_cmdmode &= ~TULIP_CMD_FULLDUPLEX;
335 }
336 }
337 /*
338 * We could set probe_timeout to 0 but setting to 3000 puts this
339 * in one central place and the only matters is tulip_link is
340 * followed by a tulip_timeout. Therefore setting it should not
341 * result in aberrant behavour.
342 */
343 sc->tulip_probe_timeout = 3000;
344 sc->tulip_probe_state = TULIP_PROBE_INACTIVE;
345 sc->tulip_flags &= ~(TULIP_TXPROBE_ACTIVE|TULIP_TRYNWAY);
346 if (sc->tulip_flags & TULIP_INRESET) {
347 tulip_media_set(sc, sc->tulip_media);
348 } else if (sc->tulip_probe_media != sc->tulip_media) {
349 /*
350 * No reason to change media if we have the right media.
351 */
352 tulip_reset(sc);
353 }
354 tulip_init(sc);
355}
356
357static void
358tulip_media_print(
359 tulip_softc_t * const sc)
360{
361 struct ifnet *ifp = sc->tulip_ifp;
362
363 TULIP_LOCK_ASSERT(sc);
364 if ((sc->tulip_flags & TULIP_LINKUP) == 0)
365 return;
366 if (sc->tulip_flags & TULIP_PRINTMEDIA) {
367 if_printf(ifp, "enabling %s port\n",
368 tulip_mediums[sc->tulip_media]);
369 sc->tulip_flags &= ~(TULIP_PRINTMEDIA|TULIP_PRINTLINKUP);
370 } else if (sc->tulip_flags & TULIP_PRINTLINKUP) {
371 if_printf(ifp, "link up\n");
372 sc->tulip_flags &= ~TULIP_PRINTLINKUP;
373 }
374}
375
376#if defined(TULIP_DO_GPR_SENSE)
377static tulip_media_t
378tulip_21140_gpr_media_sense(
379 tulip_softc_t * const sc)
380{
381 struct ifnet *ifp sc->tulip_ifp;
382 tulip_media_t maybe_media = TULIP_MEDIA_UNKNOWN;
383 tulip_media_t last_media = TULIP_MEDIA_UNKNOWN;
384 tulip_media_t media;
385
386 TULIP_LOCK_ASSERT(sc);
387
388 /*
389 * If one of the media blocks contained a default media flag,
390 * use that.
391 */
392 for (media = TULIP_MEDIA_UNKNOWN; media < TULIP_MEDIA_MAX; media++) {
393 const tulip_media_info_t *mi;
394 /*
395 * Media is not supported (or is full-duplex).
396 */
397 if ((mi = sc->tulip_mediums[media]) == NULL || TULIP_IS_MEDIA_FD(media))
398 continue;
399 if (mi->mi_type != TULIP_MEDIAINFO_GPR)
400 continue;
401
402 /*
403 * Remember the media is this is the "default" media.
404 */
405 if (mi->mi_default && maybe_media == TULIP_MEDIA_UNKNOWN)
406 maybe_media = media;
407
408 /*
409 * No activity mask? Can't see if it is active if there's no mask.
410 */
411 if (mi->mi_actmask == 0)
412 continue;
413
414 /*
415 * Does the activity data match?
416 */
417 if ((TULIP_CSR_READ(sc, csr_gp) & mi->mi_actmask) != mi->mi_actdata)
418 continue;
419
420#if defined(TULIP_DEBUG)
421 if_printf(ifp, "gpr_media_sense: %s: 0x%02x & 0x%02x == 0x%02x\n",
422 tulip_mediums[media],
423 TULIP_CSR_READ(sc, csr_gp) & 0xFF,
424 mi->mi_actmask, mi->mi_actdata);
425#endif
426 /*
427 * It does! If this is the first media we detected, then
428 * remember this media. If isn't the first, then there were
429 * multiple matches which we equate to no match (since we don't
430 * which to select (if any).
431 */
432 if (last_media == TULIP_MEDIA_UNKNOWN) {
433 last_media = media;
434 } else if (last_media != media) {
435 last_media = TULIP_MEDIA_UNKNOWN;
436 }
437 }
438 return (last_media != TULIP_MEDIA_UNKNOWN) ? last_media : maybe_media;
439}
440#endif /* TULIP_DO_GPR_SENSE */
441
442static tulip_link_status_t
443tulip_media_link_monitor(
444 tulip_softc_t * const sc)
445{
446 struct ifnet *ifp = sc->tulip_ifp;
447 const tulip_media_info_t * const mi = sc->tulip_mediums[sc->tulip_media];
448 tulip_link_status_t linkup = TULIP_LINK_DOWN;
449
450 TULIP_LOCK_ASSERT(sc);
451 if (mi == NULL) {
452#if defined(DIAGNOSTIC) || defined(TULIP_DEBUG)
453 panic("tulip_media_link_monitor: %s: botch at line %d\n",
454 tulip_mediums[sc->tulip_media],__LINE__);
455#else
456 return TULIP_LINK_UNKNOWN;
457#endif
458 }
459
460
461 /*
462 * Have we seen some packets? If so, the link must be good.
463 */
464 if ((sc->tulip_flags & (TULIP_RXACT|TULIP_LINKUP)) == (TULIP_RXACT|TULIP_LINKUP)) {
465 sc->tulip_flags &= ~TULIP_RXACT;
466 sc->tulip_probe_timeout = 3000;
467 return TULIP_LINK_UP;
468 }
469
470 sc->tulip_flags &= ~TULIP_RXACT;
471 if (mi->mi_type == TULIP_MEDIAINFO_MII) {
472 u_int32_t status;
473 /*
474 * Read the PHY status register.
475 */
476 status = tulip_mii_readreg(sc, sc->tulip_phyaddr, PHYREG_STATUS);
477 if (status & PHYSTS_AUTONEG_DONE) {
478 /*
479 * If the PHY has completed autonegotiation, see the if the
480 * remote systems abilities have changed. If so, upgrade or
481 * downgrade as appropriate.
482 */
483 u_int32_t abilities = tulip_mii_readreg(sc, sc->tulip_phyaddr, PHYREG_AUTONEG_ABILITIES);
484 abilities = (abilities << 6) & status;
485 if (abilities != sc->tulip_abilities) {
486#if defined(TULIP_DEBUG)
487 loudprintf("%s(phy%d): autonegotiation changed: 0x%04x -> 0x%04x\n",
488 ifp->if_xname, sc->tulip_phyaddr,
489 sc->tulip_abilities, abilities);
490#endif
491 if (tulip_mii_map_abilities(sc, abilities)) {
492 tulip_linkup(sc, sc->tulip_probe_media);
493 return TULIP_LINK_UP;
494 }
495 /*
496 * if we had selected media because of autonegotiation,
497 * we need to probe for the new media.
498 */
499 sc->tulip_probe_state = TULIP_PROBE_INACTIVE;
500 if (sc->tulip_flags & TULIP_DIDNWAY)
501 return TULIP_LINK_DOWN;
502 }
503 }
504 /*
505 * The link is now up. If was down, say its back up.
506 */
507 if ((status & (PHYSTS_LINK_UP|PHYSTS_REMOTE_FAULT)) == PHYSTS_LINK_UP)
508 linkup = TULIP_LINK_UP;
509 } else if (mi->mi_type == TULIP_MEDIAINFO_GPR) {
510 /*
511 * No activity sensor? Assume all's well.
512 */
513 if (mi->mi_actmask == 0)
514 return TULIP_LINK_UNKNOWN;
515 /*
516 * Does the activity data match?
517 */
518 if ((TULIP_CSR_READ(sc, csr_gp) & mi->mi_actmask) == mi->mi_actdata)
519 linkup = TULIP_LINK_UP;
520 } else if (mi->mi_type == TULIP_MEDIAINFO_SIA) {
521 /*
522 * Assume non TP ok for now.
523 */
524 if (!TULIP_IS_MEDIA_TP(sc->tulip_media))
525 return TULIP_LINK_UNKNOWN;
526 if ((TULIP_CSR_READ(sc, csr_sia_status) & TULIP_SIASTS_LINKFAIL) == 0)
527 linkup = TULIP_LINK_UP;
528#if defined(TULIP_DEBUG)
529 if (sc->tulip_probe_timeout <= 0)
530 if_printf(ifp, "sia status = 0x%08x\n",
531 TULIP_CSR_READ(sc, csr_sia_status));
532#endif
533 } else if (mi->mi_type == TULIP_MEDIAINFO_SYM) {
534 return TULIP_LINK_UNKNOWN;
535 }
536 /*
537 * We will wait for 3 seconds until the link goes into suspect mode.
538 */
539 if (sc->tulip_flags & TULIP_LINKUP) {
540 if (linkup == TULIP_LINK_UP)
541 sc->tulip_probe_timeout = 3000;
542 if (sc->tulip_probe_timeout > 0)
543 return TULIP_LINK_UP;
544
545 sc->tulip_flags &= ~TULIP_LINKUP;
546 if_printf(ifp, "link down: cable problem?\n");
547 }
548#if defined(TULIP_DEBUG)
549 sc->tulip_dbg.dbg_link_downed++;
550#endif
551 return TULIP_LINK_DOWN;
552}
553
554static void
555tulip_media_poll(
556 tulip_softc_t * const sc,
557 tulip_mediapoll_event_t event)
558{
559 struct ifnet *ifp = sc->tulip_ifp;
560
561 TULIP_LOCK_ASSERT(sc);
562#if defined(TULIP_DEBUG)
563 sc->tulip_dbg.dbg_events[event]++;
564#endif
565 if (sc->tulip_probe_state == TULIP_PROBE_INACTIVE
566 && event == TULIP_MEDIAPOLL_TIMER) {
567 switch (tulip_media_link_monitor(sc)) {
568 case TULIP_LINK_DOWN: {
569 /*
570 * Link Monitor failed. Probe for new media.
571 */
572 event = TULIP_MEDIAPOLL_LINKFAIL;
573 break;
574 }
575 case TULIP_LINK_UP: {
576 /*
577 * Check again soon.
578 */
579 tulip_timeout(sc);
580 return;
581 }
582 case TULIP_LINK_UNKNOWN: {
583 /*
584 * We can't tell so don't bother.
585 */
586 return;
587 }
588 }
589 }
590
591 if (event == TULIP_MEDIAPOLL_LINKFAIL) {
592 if (sc->tulip_probe_state == TULIP_PROBE_INACTIVE) {
593 if (TULIP_DO_AUTOSENSE(sc)) {
594#if defined(TULIP_DEBUG)
595 sc->tulip_dbg.dbg_link_failures++;
596#endif
597 sc->tulip_media = TULIP_MEDIA_UNKNOWN;
598 if (sc->tulip_ifp->if_flags & IFF_UP)
599 tulip_reset(sc); /* restart probe */
600 }
601 return;
602 }
603#if defined(TULIP_DEBUG)
604 sc->tulip_dbg.dbg_link_pollintrs++;
605#endif
606 }
607
608 if (event == TULIP_MEDIAPOLL_START) {
609 sc->tulip_ifp->if_flags |= IFF_OACTIVE;
610 if (sc->tulip_probe_state != TULIP_PROBE_INACTIVE)
611 return;
612 sc->tulip_probe_mediamask = 0;
613 sc->tulip_probe_passes = 0;
614#if defined(TULIP_DEBUG)
615 sc->tulip_dbg.dbg_media_probes++;
616#endif
617 /*
618 * If the SROM contained an explicit media to use, use it.
619 */
620 sc->tulip_cmdmode &= ~(TULIP_CMD_RXRUN|TULIP_CMD_FULLDUPLEX);
621 sc->tulip_flags |= TULIP_TRYNWAY|TULIP_PROBE1STPASS;
622 sc->tulip_flags &= ~(TULIP_DIDNWAY|TULIP_PRINTMEDIA|TULIP_PRINTLINKUP);
623 /*
624 * connidx is defaulted to a media_unknown type.
625 */
626 sc->tulip_probe_media = tulip_srom_conninfo[sc->tulip_connidx].sc_media;
627 if (sc->tulip_probe_media != TULIP_MEDIA_UNKNOWN) {
628 tulip_linkup(sc, sc->tulip_probe_media);
629 tulip_timeout(sc);
630 return;
631 }
632
633 if (sc->tulip_features & TULIP_HAVE_GPR) {
634 sc->tulip_probe_state = TULIP_PROBE_GPRTEST;
635 sc->tulip_probe_timeout = 2000;
636 } else {
637 sc->tulip_probe_media = TULIP_MEDIA_MAX;
638 sc->tulip_probe_timeout = 0;
639 sc->tulip_probe_state = TULIP_PROBE_MEDIATEST;
640 }
641 }
642
643 /*
644 * Ignore txprobe failures or spurious callbacks.
645 */
646 if (event == TULIP_MEDIAPOLL_TXPROBE_FAILED
647 && sc->tulip_probe_state != TULIP_PROBE_MEDIATEST) {
648 sc->tulip_flags &= ~TULIP_TXPROBE_ACTIVE;
649 return;
650 }
651
652 /*
653 * If we really transmitted a packet, then that's the media we'll use.
654 */
655 if (event == TULIP_MEDIAPOLL_TXPROBE_OK || event == TULIP_MEDIAPOLL_LINKPASS) {
656 if (event == TULIP_MEDIAPOLL_LINKPASS) {
657 /* XXX Check media status just to be sure */
658 sc->tulip_probe_media = TULIP_MEDIA_10BASET;
659#if defined(TULIP_DEBUG)
660 } else {
661 sc->tulip_dbg.dbg_txprobes_ok[sc->tulip_probe_media]++;
662#endif
663 }
664 tulip_linkup(sc, sc->tulip_probe_media);
665 tulip_timeout(sc);
666 return;
667 }
668
669 if (sc->tulip_probe_state == TULIP_PROBE_GPRTEST) {
670#if defined(TULIP_DO_GPR_SENSE)
671 /*
672 * Check for media via the general purpose register.
673 *
674 * Try to sense the media via the GPR. If the same value
675 * occurs 3 times in a row then just use that.
676 */
677 if (sc->tulip_probe_timeout > 0) {
678 tulip_media_t new_probe_media = tulip_21140_gpr_media_sense(sc);
679#if defined(TULIP_DEBUG)
680 if_printf(ifp, "media_poll: gpr sensing = %s\n",
681 tulip_mediums[new_probe_media]);
682#endif
683 if (new_probe_media != TULIP_MEDIA_UNKNOWN) {
684 if (new_probe_media == sc->tulip_probe_media) {
685 if (--sc->tulip_probe_count == 0)
686 tulip_linkup(sc, sc->tulip_probe_media);
687 } else {
688 sc->tulip_probe_count = 10;
689 }
690 }
691 sc->tulip_probe_media = new_probe_media;
692 tulip_timeout(sc);
693 return;
694 }
695#endif /* TULIP_DO_GPR_SENSE */
696 /*
697 * Brute force. We cycle through each of the media types
698 * and try to transmit a packet.
699 */
700 sc->tulip_probe_state = TULIP_PROBE_MEDIATEST;
701 sc->tulip_probe_media = TULIP_MEDIA_MAX;
702 sc->tulip_probe_timeout = 0;
703 tulip_timeout(sc);
704 return;
705 }
706
707 if (sc->tulip_probe_state != TULIP_PROBE_MEDIATEST
708 && (sc->tulip_features & TULIP_HAVE_MII)) {
709 tulip_media_t old_media = sc->tulip_probe_media;
710 tulip_mii_autonegotiate(sc, sc->tulip_phyaddr);
711 switch (sc->tulip_probe_state) {
712 case TULIP_PROBE_FAILED:
713 case TULIP_PROBE_MEDIATEST: {
714 /*
715 * Try the next media.
716 */
717 sc->tulip_probe_mediamask |= sc->tulip_mediums[sc->tulip_probe_media]->mi_mediamask;
718 sc->tulip_probe_timeout = 0;
719#ifdef notyet
720 if (sc->tulip_probe_state == TULIP_PROBE_FAILED)
721 break;
722 if (sc->tulip_probe_media != tulip_mii_phy_readspecific(sc))
723 break;
724 sc->tulip_probe_timeout = TULIP_IS_MEDIA_TP(sc->tulip_probe_media) ? 2500 : 300;
725#endif
726 break;
727 }
728 case TULIP_PROBE_PHYAUTONEG: {
729 return;
730 }
731 case TULIP_PROBE_INACTIVE: {
732 /*
733 * Only probe if we autonegotiated a media that hasn't failed.
734 */
735 sc->tulip_probe_timeout = 0;
736 if (sc->tulip_probe_mediamask & TULIP_BIT(sc->tulip_probe_media)) {
737 sc->tulip_probe_media = old_media;
738 break;
739 }
740 tulip_linkup(sc, sc->tulip_probe_media);
741 tulip_timeout(sc);
742 return;
743 }
744 default: {
745#if defined(DIAGNOSTIC) || defined(TULIP_DEBUG)
746 panic("tulip_media_poll: botch at line %d\n", __LINE__);
747#endif
748 break;
749 }
750 }
751 }
752
753 if (event == TULIP_MEDIAPOLL_TXPROBE_FAILED) {
754#if defined(TULIP_DEBUG)
755 sc->tulip_dbg.dbg_txprobes_failed[sc->tulip_probe_media]++;
756#endif
757 sc->tulip_flags &= ~TULIP_TXPROBE_ACTIVE;
758 return;
759 }
760
761 /*
762 * switch to another media if we tried this one enough.
763 */
764 if (/* event == TULIP_MEDIAPOLL_TXPROBE_FAILED || */ sc->tulip_probe_timeout <= 0) {
765#if defined(TULIP_DEBUG)
766 if (sc->tulip_probe_media == TULIP_MEDIA_UNKNOWN) {
767 if_printf(ifp, "poll media unknown!\n");
768 sc->tulip_probe_media = TULIP_MEDIA_MAX;
769 }
770#endif
771 /*
772 * Find the next media type to check for. Full Duplex
773 * types are not allowed.
774 */
775 do {
776 sc->tulip_probe_media -= 1;
777 if (sc->tulip_probe_media == TULIP_MEDIA_UNKNOWN) {
778 if (++sc->tulip_probe_passes == 3) {
779 if_printf(ifp, "autosense failed: cable problem?\n");
780 if ((sc->tulip_ifp->if_flags & IFF_UP) == 0) {
781 sc->tulip_ifp->if_flags &= ~IFF_RUNNING;
782 sc->tulip_probe_state = TULIP_PROBE_INACTIVE;
783 return;
784 }
785 }
786 sc->tulip_flags ^= TULIP_TRYNWAY; /* XXX */
787 sc->tulip_probe_mediamask = 0;
788 sc->tulip_probe_media = TULIP_MEDIA_MAX - 1;
789 }
790 } while (sc->tulip_mediums[sc->tulip_probe_media] == NULL
791 || (sc->tulip_probe_mediamask & TULIP_BIT(sc->tulip_probe_media))
792 || TULIP_IS_MEDIA_FD(sc->tulip_probe_media));
793
794#if defined(TULIP_DEBUG)
795 if_printf(ifp, "%s: probing %s\n",
796 event == TULIP_MEDIAPOLL_TXPROBE_FAILED ? "txprobe failed" : "timeout",
797 tulip_mediums[sc->tulip_probe_media]);
798#endif
799 sc->tulip_probe_timeout = TULIP_IS_MEDIA_TP(sc->tulip_probe_media) ? 2500 : 1000;
800 sc->tulip_probe_state = TULIP_PROBE_MEDIATEST;
801 sc->tulip_probe.probe_txprobes = 0;
802 tulip_reset(sc);
803 tulip_media_set(sc, sc->tulip_probe_media);
804 sc->tulip_flags &= ~TULIP_TXPROBE_ACTIVE;
805 }
806 tulip_timeout(sc);
807
808 /*
809 * If this is hanging off a phy, we know are doing NWAY and we have
810 * forced the phy to a specific speed. Wait for link up before
811 * before sending a packet.
812 */
813 switch (sc->tulip_mediums[sc->tulip_probe_media]->mi_type) {
814 case TULIP_MEDIAINFO_MII: {
815 if (sc->tulip_probe_media != tulip_mii_phy_readspecific(sc))
816 return;
817 break;
818 }
819 case TULIP_MEDIAINFO_SIA: {
820 if (TULIP_IS_MEDIA_TP(sc->tulip_probe_media)) {
821 if (TULIP_CSR_READ(sc, csr_sia_status) & TULIP_SIASTS_LINKFAIL)
822 return;
823 tulip_linkup(sc, sc->tulip_probe_media);
824#ifdef notyet
825 if (sc->tulip_features & TULIP_HAVE_MII)
826 tulip_timeout(sc);
827#endif
828 return;
829 }
830 break;
831 }
832 case TULIP_MEDIAINFO_RESET:
833 case TULIP_MEDIAINFO_SYM:
834 case TULIP_MEDIAINFO_NONE:
835 case TULIP_MEDIAINFO_GPR: {
836 break;
837 }
838 }
839 /*
840 * Try to send a packet.
841 */
842 tulip_txprobe(sc);
843}
844
845static void
846tulip_media_select(
847 tulip_softc_t * const sc)
848{
849 TULIP_LOCK_ASSERT(sc);
850 if (sc->tulip_features & TULIP_HAVE_GPR) {
851 TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_PINSET|sc->tulip_gpinit);
852 DELAY(10);
853 TULIP_CSR_WRITE(sc, csr_gp, sc->tulip_gpdata);
854 }
855 /*
856 * If this board has no media, just return
857 */
858 if (sc->tulip_features & TULIP_HAVE_NOMEDIA)
859 return;
860
861 if (sc->tulip_media == TULIP_MEDIA_UNKNOWN) {
862 TULIP_CSR_WRITE(sc, csr_intr, sc->tulip_intrmask);
863 (*sc->tulip_boardsw->bd_media_poll)(sc, TULIP_MEDIAPOLL_START);
864 } else {
865 tulip_media_set(sc, sc->tulip_media);
866 }
867}
868
869static void
870tulip_21040_mediainfo_init(
871 tulip_softc_t * const sc,
872 tulip_media_t media)
873{
874 TULIP_LOCK_ASSERT(sc);
875 sc->tulip_cmdmode |= TULIP_CMD_CAPTREFFCT|TULIP_CMD_THRSHLD160
876 |TULIP_CMD_BACKOFFCTR;
877 sc->tulip_ifp->if_baudrate = 10000000;
878
879 if (media == TULIP_MEDIA_10BASET || media == TULIP_MEDIA_UNKNOWN) {
880 TULIP_MEDIAINFO_SIA_INIT(sc, &sc->tulip_mediainfo[0], 21040, 10BASET);
881 TULIP_MEDIAINFO_SIA_INIT(sc, &sc->tulip_mediainfo[1], 21040, 10BASET_FD);
882 sc->tulip_intrmask |= TULIP_STS_LINKPASS|TULIP_STS_LINKFAIL;
883 }
884
885 if (media == TULIP_MEDIA_AUIBNC || media == TULIP_MEDIA_UNKNOWN) {
886 TULIP_MEDIAINFO_SIA_INIT(sc, &sc->tulip_mediainfo[2], 21040, AUIBNC);
887 }
888
889 if (media == TULIP_MEDIA_UNKNOWN) {
890 TULIP_MEDIAINFO_SIA_INIT(sc, &sc->tulip_mediainfo[3], 21040, EXTSIA);
891 }
892}
893
894static void
895tulip_21040_media_probe(
896 tulip_softc_t * const sc)
897{
898 TULIP_LOCK_ASSERT(sc);
899 tulip_21040_mediainfo_init(sc, TULIP_MEDIA_UNKNOWN);
900 return;
901}
902
903static void
904tulip_21040_10baset_only_media_probe(
905 tulip_softc_t * const sc)
906{
907 TULIP_LOCK_ASSERT(sc);
908 tulip_21040_mediainfo_init(sc, TULIP_MEDIA_10BASET);
909 tulip_media_set(sc, TULIP_MEDIA_10BASET);
910 sc->tulip_media = TULIP_MEDIA_10BASET;
911}
912
913static void
914tulip_21040_10baset_only_media_select(
915 tulip_softc_t * const sc)
916{
917 TULIP_LOCK_ASSERT(sc);
918 sc->tulip_flags |= TULIP_LINKUP;
919 if (sc->tulip_media == TULIP_MEDIA_10BASET_FD) {
920 sc->tulip_cmdmode |= TULIP_CMD_FULLDUPLEX;
921 sc->tulip_flags &= ~TULIP_SQETEST;
922 } else {
923 sc->tulip_cmdmode &= ~TULIP_CMD_FULLDUPLEX;
924 sc->tulip_flags |= TULIP_SQETEST;
925 }
926 tulip_media_set(sc, sc->tulip_media);
927}
928
929static void
930tulip_21040_auibnc_only_media_probe(
931 tulip_softc_t * const sc)
932{
933 TULIP_LOCK_ASSERT(sc);
934 tulip_21040_mediainfo_init(sc, TULIP_MEDIA_AUIBNC);
935 sc->tulip_flags |= TULIP_SQETEST|TULIP_LINKUP;
936 tulip_media_set(sc, TULIP_MEDIA_AUIBNC);
937 sc->tulip_media = TULIP_MEDIA_AUIBNC;
938}
939
940static void
941tulip_21040_auibnc_only_media_select(
942 tulip_softc_t * const sc)
943{
944 TULIP_LOCK_ASSERT(sc);
945 tulip_media_set(sc, TULIP_MEDIA_AUIBNC);
946 sc->tulip_cmdmode &= ~TULIP_CMD_FULLDUPLEX;
947}
948
949static const tulip_boardsw_t tulip_21040_boardsw = {
950 TULIP_21040_GENERIC,
951 tulip_21040_media_probe,
952 tulip_media_select,
953 tulip_media_poll,
954};
955
956static const tulip_boardsw_t tulip_21040_10baset_only_boardsw = {
957 TULIP_21040_GENERIC,
958 tulip_21040_10baset_only_media_probe,
959 tulip_21040_10baset_only_media_select,
960 NULL,
961};
962
963static const tulip_boardsw_t tulip_21040_auibnc_only_boardsw = {
964 TULIP_21040_GENERIC,
965 tulip_21040_auibnc_only_media_probe,
966 tulip_21040_auibnc_only_media_select,
967 NULL,
968};
969
970static void
971tulip_21041_mediainfo_init(
972 tulip_softc_t * const sc)
973{
974 tulip_media_info_t * const mi = sc->tulip_mediainfo;
975
976 TULIP_LOCK_ASSERT(sc);
977#ifdef notyet
978 if (sc->tulip_revinfo >= 0x20) {
979 TULIP_MEDIAINFO_SIA_INIT(sc, &mi[0], 21041P2, 10BASET);
980 TULIP_MEDIAINFO_SIA_INIT(sc, &mi[1], 21041P2, 10BASET_FD);
981 TULIP_MEDIAINFO_SIA_INIT(sc, &mi[0], 21041P2, AUI);
982 TULIP_MEDIAINFO_SIA_INIT(sc, &mi[1], 21041P2, BNC);
983 return;
984 }
985#endif
986 TULIP_MEDIAINFO_SIA_INIT(sc, &mi[0], 21041, 10BASET);
987 TULIP_MEDIAINFO_SIA_INIT(sc, &mi[1], 21041, 10BASET_FD);
988 TULIP_MEDIAINFO_SIA_INIT(sc, &mi[2], 21041, AUI);
989 TULIP_MEDIAINFO_SIA_INIT(sc, &mi[3], 21041, BNC);
990}
991
992static void
993tulip_21041_media_probe(
994 tulip_softc_t * const sc)
995{
996 TULIP_LOCK_ASSERT(sc);
997 sc->tulip_ifp->if_baudrate = 10000000;
998 sc->tulip_cmdmode |= TULIP_CMD_CAPTREFFCT|TULIP_CMD_ENHCAPTEFFCT
999 |TULIP_CMD_THRSHLD160|TULIP_CMD_BACKOFFCTR;
1000 sc->tulip_intrmask |= TULIP_STS_LINKPASS|TULIP_STS_LINKFAIL;
1001 tulip_21041_mediainfo_init(sc);
1002}
1003
1004static void
1005tulip_21041_media_poll(
1006 tulip_softc_t * const sc,
1007 const tulip_mediapoll_event_t event)
1008{
1009 u_int32_t sia_status;
1010
1011 TULIP_LOCK_ASSERT(sc);
1012#if defined(TULIP_DEBUG)
1013 sc->tulip_dbg.dbg_events[event]++;
1014#endif
1015
1016 if (event == TULIP_MEDIAPOLL_LINKFAIL) {
1017 if (sc->tulip_probe_state != TULIP_PROBE_INACTIVE
1018 || !TULIP_DO_AUTOSENSE(sc))
1019 return;
1020 sc->tulip_media = TULIP_MEDIA_UNKNOWN;
1021 tulip_reset(sc); /* start probe */
1022 return;
1023 }
1024
1025 /*
1026 * If we've been been asked to start a poll or link change interrupt
1027 * restart the probe (and reset the tulip to a known state).
1028 */
1029 if (event == TULIP_MEDIAPOLL_START) {
1030 sc->tulip_ifp->if_flags |= IFF_OACTIVE;
1031 sc->tulip_cmdmode &= ~(TULIP_CMD_FULLDUPLEX|TULIP_CMD_RXRUN);
1032#ifdef notyet
1033 if (sc->tulip_revinfo >= 0x20) {
1034 sc->tulip_cmdmode |= TULIP_CMD_FULLDUPLEX;
1035 sc->tulip_flags |= TULIP_DIDNWAY;
1036 }
1037#endif
1038 TULIP_CSR_WRITE(sc, csr_command, sc->tulip_cmdmode);
1039 sc->tulip_probe_state = TULIP_PROBE_MEDIATEST;
1040 sc->tulip_probe_media = TULIP_MEDIA_10BASET;
1041 sc->tulip_probe_timeout = TULIP_21041_PROBE_10BASET_TIMEOUT;
1042 tulip_media_set(sc, TULIP_MEDIA_10BASET);
1043 tulip_timeout(sc);
1044 return;
1045 }
1046
1047 if (sc->tulip_probe_state == TULIP_PROBE_INACTIVE)
1048 return;
1049
1050 if (event == TULIP_MEDIAPOLL_TXPROBE_OK) {
1051#if defined(TULIP_DEBUG)
1052 sc->tulip_dbg.dbg_txprobes_ok[sc->tulip_probe_media]++;
1053#endif
1054 tulip_linkup(sc, sc->tulip_probe_media);
1055 return;
1056 }
1057
1058 sia_status = TULIP_CSR_READ(sc, csr_sia_status);
1059 TULIP_CSR_WRITE(sc, csr_sia_status, sia_status);
1060 if ((sia_status & TULIP_SIASTS_LINKFAIL) == 0) {
1061 if (sc->tulip_revinfo >= 0x20) {
1062 if (sia_status & (PHYSTS_10BASET_FD << (16 - 6)))
1063 sc->tulip_probe_media = TULIP_MEDIA_10BASET_FD;
1064 }
1065 /*
1066 * If the link has passed LinkPass, 10baseT is the
1067 * proper media to use.
1068 */
1069 tulip_linkup(sc, sc->tulip_probe_media);
1070 return;
1071 }
1072
1073 /*
1074 * wait for up to 2.4 seconds for the link to reach pass state.
1075 * Only then start scanning the other media for activity.
1076 * choose media with receive activity over those without.
1077 */
1078 if (sc->tulip_probe_media == TULIP_MEDIA_10BASET) {
1079 if (event != TULIP_MEDIAPOLL_TIMER)
1080 return;
1081 if (sc->tulip_probe_timeout > 0
1082 && (sia_status & TULIP_SIASTS_OTHERRXACTIVITY) == 0) {
1083 tulip_timeout(sc);
1084 return;
1085 }
1086 sc->tulip_probe_timeout = TULIP_21041_PROBE_AUIBNC_TIMEOUT;
1087 sc->tulip_flags |= TULIP_WANTRXACT;
1088 if (sia_status & TULIP_SIASTS_OTHERRXACTIVITY) {
1089 sc->tulip_probe_media = TULIP_MEDIA_BNC;
1090 } else {
1091 sc->tulip_probe_media = TULIP_MEDIA_AUI;
1092 }
1093 tulip_media_set(sc, sc->tulip_probe_media);
1094 tulip_timeout(sc);
1095 return;
1096 }
1097
1098 /*
1099 * If we failed, clear the txprobe active flag.
1100 */
1101 if (event == TULIP_MEDIAPOLL_TXPROBE_FAILED)
1102 sc->tulip_flags &= ~TULIP_TXPROBE_ACTIVE;
1103
1104
1105 if (event == TULIP_MEDIAPOLL_TIMER) {
1106 /*
1107 * If we've received something, then that's our link!
1108 */
1109 if (sc->tulip_flags & TULIP_RXACT) {
1110 tulip_linkup(sc, sc->tulip_probe_media);
1111 return;
1112 }
1113 /*
1114 * if no txprobe active
1115 */
1116 if ((sc->tulip_flags & TULIP_TXPROBE_ACTIVE) == 0
1117 && ((sc->tulip_flags & TULIP_WANTRXACT) == 0
1118 || (sia_status & TULIP_SIASTS_RXACTIVITY))) {
1119 sc->tulip_probe_timeout = TULIP_21041_PROBE_AUIBNC_TIMEOUT;
1120 tulip_txprobe(sc);
1121 tulip_timeout(sc);
1122 return;
1123 }
1124 /*
1125 * Take 2 passes through before deciding to not
1126 * wait for receive activity. Then take another
1127 * two passes before spitting out a warning.
1128 */
1129 if (sc->tulip_probe_timeout <= 0) {
1130 if (sc->tulip_flags & TULIP_WANTRXACT) {
1131 sc->tulip_flags &= ~TULIP_WANTRXACT;
1132 sc->tulip_probe_timeout = TULIP_21041_PROBE_AUIBNC_TIMEOUT;
1133 } else {
1134 if_printf(sc->tulip_ifp,
1135 "autosense failed: cable problem?\n");
1136 if ((sc->tulip_ifp->if_flags & IFF_UP) == 0) {
1137 sc->tulip_ifp->if_flags &= ~IFF_RUNNING;
1138 sc->tulip_probe_state = TULIP_PROBE_INACTIVE;
1139 return;
1140 }
1141 }
1142 }
1143 }
1144
1145 /*
1146 * Since this media failed to probe, try the other one.
1147 */
1148 sc->tulip_probe_timeout = TULIP_21041_PROBE_AUIBNC_TIMEOUT;
1149 if (sc->tulip_probe_media == TULIP_MEDIA_AUI) {
1150 sc->tulip_probe_media = TULIP_MEDIA_BNC;
1151 } else {
1152 sc->tulip_probe_media = TULIP_MEDIA_AUI;
1153 }
1154 tulip_media_set(sc, sc->tulip_probe_media);
1155 sc->tulip_flags &= ~TULIP_TXPROBE_ACTIVE;
1156 tulip_timeout(sc);
1157}
1158
1159static const tulip_boardsw_t tulip_21041_boardsw = {
1160 TULIP_21041_GENERIC,
1161 tulip_21041_media_probe,
1162 tulip_media_select,
1163 tulip_21041_media_poll
1164};
1165
1166static const tulip_phy_attr_t tulip_mii_phy_attrlist[] = {
1167 { 0x20005c00, 0, /* 08-00-17 */
1168 {
1169 { 0x19, 0x0040, 0x0040 }, /* 10TX */
1170 { 0x19, 0x0040, 0x0000 }, /* 100TX */
1171 },
1172#if defined(TULIP_DEBUG)
1173 "NS DP83840",
1174#endif
1175 },
1176 { 0x0281F400, 0, /* 00-A0-7D */
1177 {
1178 { 0x12, 0x0010, 0x0000 }, /* 10T */
1179 { }, /* 100TX */
1180 { 0x12, 0x0010, 0x0010 }, /* 100T4 */
1181 { 0x12, 0x0008, 0x0008 }, /* FULL_DUPLEX */
1182 },
1183#if defined(TULIP_DEBUG)
1184 "Seeq 80C240"
1185#endif
1186 },
1187#if 0
1188 { 0x0015F420, 0, /* 00-A0-7D */
1189 {
1190 { 0x12, 0x0010, 0x0000 }, /* 10T */
1191 { }, /* 100TX */
1192 { 0x12, 0x0010, 0x0010 }, /* 100T4 */
1193 { 0x12, 0x0008, 0x0008 }, /* FULL_DUPLEX */
1194 },
1195#if defined(TULIP_DEBUG)
1196 "Broadcom BCM5000"
1197#endif
1198 },
1199#endif
1200 { 0x0281F400, 0, /* 00-A0-BE */
1201 {
1202 { 0x11, 0x8000, 0x0000 }, /* 10T */
1203 { 0x11, 0x8000, 0x8000 }, /* 100TX */
1204 { }, /* 100T4 */
1205 { 0x11, 0x4000, 0x4000 }, /* FULL_DUPLEX */
1206 },
1207#if defined(TULIP_DEBUG)
1208 "ICS 1890"
1209#endif
1210 },
1211 { 0 }
1212};
1213
1214static tulip_media_t
1215tulip_mii_phy_readspecific(
1216 tulip_softc_t * const sc)
1217{
1218 const tulip_phy_attr_t *attr;
1219 u_int16_t data;
1220 u_int32_t id;
1221 unsigned idx = 0;
1222 static const tulip_media_t table[] = {
1223 TULIP_MEDIA_UNKNOWN,
1224 TULIP_MEDIA_10BASET,
1225 TULIP_MEDIA_100BASETX,
1226 TULIP_MEDIA_100BASET4,
1227 TULIP_MEDIA_UNKNOWN,
1228 TULIP_MEDIA_10BASET_FD,
1229 TULIP_MEDIA_100BASETX_FD,
1230 TULIP_MEDIA_UNKNOWN
1231 };
1232
1233 TULIP_LOCK_ASSERT(sc);
1234
1235 /*
1236 * Don't read phy specific registers if link is not up.
1237 */
1238 data = tulip_mii_readreg(sc, sc->tulip_phyaddr, PHYREG_STATUS);
1239 if ((data & (PHYSTS_LINK_UP|PHYSTS_EXTENDED_REGS)) != (PHYSTS_LINK_UP|PHYSTS_EXTENDED_REGS))
1240 return TULIP_MEDIA_UNKNOWN;
1241
1242 id = (tulip_mii_readreg(sc, sc->tulip_phyaddr, PHYREG_IDLOW) << 16) |
1243 tulip_mii_readreg(sc, sc->tulip_phyaddr, PHYREG_IDHIGH);
1244 for (attr = tulip_mii_phy_attrlist;; attr++) {
1245 if (attr->attr_id == 0)
1246 return TULIP_MEDIA_UNKNOWN;
1247 if ((id & ~0x0F) == attr->attr_id)
1248 break;
1249 }
1250
1251 if (attr->attr_modes[PHY_MODE_100TX].pm_regno) {
1252 const tulip_phy_modedata_t * const pm = &attr->attr_modes[PHY_MODE_100TX];
1253 data = tulip_mii_readreg(sc, sc->tulip_phyaddr, pm->pm_regno);
1254 if ((data & pm->pm_mask) == pm->pm_value)
1255 idx = 2;
1256 }
1257 if (idx == 0 && attr->attr_modes[PHY_MODE_100T4].pm_regno) {
1258 const tulip_phy_modedata_t * const pm = &attr->attr_modes[PHY_MODE_100T4];
1259 data = tulip_mii_readreg(sc, sc->tulip_phyaddr, pm->pm_regno);
1260 if ((data & pm->pm_mask) == pm->pm_value)
1261 idx = 3;
1262 }
1263 if (idx == 0 && attr->attr_modes[PHY_MODE_10T].pm_regno) {
1264 const tulip_phy_modedata_t * const pm = &attr->attr_modes[PHY_MODE_10T];
1265 data = tulip_mii_readreg(sc, sc->tulip_phyaddr, pm->pm_regno);
1266 if ((data & pm->pm_mask) == pm->pm_value)
1267 idx = 1;
1268 }
1269 if (idx != 0 && attr->attr_modes[PHY_MODE_FULLDUPLEX].pm_regno) {
1270 const tulip_phy_modedata_t * const pm = &attr->attr_modes[PHY_MODE_FULLDUPLEX];
1271 data = tulip_mii_readreg(sc, sc->tulip_phyaddr, pm->pm_regno);
1272 idx += ((data & pm->pm_mask) == pm->pm_value ? 4 : 0);
1273 }
1274 return table[idx];
1275}
1276
1277static unsigned
1278tulip_mii_get_phyaddr(
1279 tulip_softc_t * const sc,
1280 unsigned offset)
1281{
1282 unsigned phyaddr;
1283
1284 TULIP_LOCK_ASSERT(sc);
1285 for (phyaddr = 1; phyaddr < 32; phyaddr++) {
1286 unsigned status = tulip_mii_readreg(sc, phyaddr, PHYREG_STATUS);
1287 if (status == 0 || status == 0xFFFF || status < PHYSTS_10BASET)
1288 continue;
1289 if (offset == 0)
1290 return phyaddr;
1291 offset--;
1292 }
1293 if (offset == 0) {
1294 unsigned status = tulip_mii_readreg(sc, 0, PHYREG_STATUS);
1295 if (status == 0 || status == 0xFFFF || status < PHYSTS_10BASET)
1296 return TULIP_MII_NOPHY;
1297 return 0;
1298 }
1299 return TULIP_MII_NOPHY;
1300}
1301
1302static int
1303tulip_mii_map_abilities(
1304 tulip_softc_t * const sc,
1305 unsigned abilities)
1306{
1307 TULIP_LOCK_ASSERT(sc);
1308 sc->tulip_abilities = abilities;
1309 if (abilities & PHYSTS_100BASETX_FD) {
1310 sc->tulip_probe_media = TULIP_MEDIA_100BASETX_FD;
1311 } else if (abilities & PHYSTS_100BASET4) {
1312 sc->tulip_probe_media = TULIP_MEDIA_100BASET4;
1313 } else if (abilities & PHYSTS_100BASETX) {
1314 sc->tulip_probe_media = TULIP_MEDIA_100BASETX;
1315 } else if (abilities & PHYSTS_10BASET_FD) {
1316 sc->tulip_probe_media = TULIP_MEDIA_10BASET_FD;
1317 } else if (abilities & PHYSTS_10BASET) {
1318 sc->tulip_probe_media = TULIP_MEDIA_10BASET;
1319 } else {
1320 sc->tulip_probe_state = TULIP_PROBE_MEDIATEST;
1321 return 0;
1322 }
1323 sc->tulip_probe_state = TULIP_PROBE_INACTIVE;
1324 return 1;
1325}
1326
1327static void
1328tulip_mii_autonegotiate(
1329 tulip_softc_t * const sc,
1330 const unsigned phyaddr)
1331{
1332 struct ifnet *ifp = sc->tulip_ifp;
1333
1334 TULIP_LOCK_ASSERT(sc);
1335 switch (sc->tulip_probe_state) {
1336 case TULIP_PROBE_MEDIATEST:
1337 case TULIP_PROBE_INACTIVE: {
1338 sc->tulip_flags |= TULIP_DIDNWAY;
1339 tulip_mii_writereg(sc, phyaddr, PHYREG_CONTROL, PHYCTL_RESET);
1340 sc->tulip_probe_timeout = 3000;
1341 sc->tulip_intrmask |= TULIP_STS_ABNRMLINTR|TULIP_STS_NORMALINTR;
1342 sc->tulip_probe_state = TULIP_PROBE_PHYRESET;
1343 }
1344 /* FALLTHROUGH */
1345 case TULIP_PROBE_PHYRESET: {
1346 u_int32_t status;
1347 u_int32_t data = tulip_mii_readreg(sc, phyaddr, PHYREG_CONTROL);
1348 if (data & PHYCTL_RESET) {
1349 if (sc->tulip_probe_timeout > 0) {
1350 tulip_timeout(sc);
1351 return;
1352 }
1353 printf("%s(phy%d): error: reset of PHY never completed!\n",
1354 ifp->if_xname, phyaddr);
1355 sc->tulip_flags &= ~TULIP_TXPROBE_ACTIVE;
1356 sc->tulip_probe_state = TULIP_PROBE_FAILED;
1357 sc->tulip_ifp->if_flags &= ~(IFF_UP|IFF_RUNNING);
1358 return;
1359 }
1360 status = tulip_mii_readreg(sc, phyaddr, PHYREG_STATUS);
1361 if ((status & PHYSTS_CAN_AUTONEG) == 0) {
1362#if defined(TULIP_DEBUG)
1363 loudprintf("%s(phy%d): autonegotiation disabled\n",
1364 ifp->if_xname, phyaddr);
1365#endif
1366 sc->tulip_flags &= ~TULIP_DIDNWAY;
1367 sc->tulip_probe_state = TULIP_PROBE_MEDIATEST;
1368 return;
1369 }
1370 if (tulip_mii_readreg(sc, phyaddr, PHYREG_AUTONEG_ADVERTISEMENT) != ((status >> 6) | 0x01))
1371 tulip_mii_writereg(sc, phyaddr, PHYREG_AUTONEG_ADVERTISEMENT, (status >> 6) | 0x01);
1372 tulip_mii_writereg(sc, phyaddr, PHYREG_CONTROL, data|PHYCTL_AUTONEG_RESTART|PHYCTL_AUTONEG_ENABLE);
1373 data = tulip_mii_readreg(sc, phyaddr, PHYREG_CONTROL);
1374#if defined(TULIP_DEBUG)
1375 if ((data & PHYCTL_AUTONEG_ENABLE) == 0)
1376 loudprintf("%s(phy%d): oops: enable autonegotiation failed: 0x%04x\n",
1377 ifp->if_xname, phyaddr, data);
1378 else
1379 loudprintf("%s(phy%d): autonegotiation restarted: 0x%04x\n",
1380 ifp->if_xname, phyaddr, data);
1381 sc->tulip_dbg.dbg_nway_starts++;
1382#endif
1383 sc->tulip_probe_state = TULIP_PROBE_PHYAUTONEG;
1384 sc->tulip_probe_timeout = 3000;
1385 }
1386 /* FALLTHROUGH */
1387 case TULIP_PROBE_PHYAUTONEG: {
1388 u_int32_t status = tulip_mii_readreg(sc, phyaddr, PHYREG_STATUS);
1389 u_int32_t data;
1390 if ((status & PHYSTS_AUTONEG_DONE) == 0) {
1391 if (sc->tulip_probe_timeout > 0) {
1392 tulip_timeout(sc);
1393 return;
1394 }
1395#if defined(TULIP_DEBUG)
1396 loudprintf("%s(phy%d): autonegotiation timeout: sts=0x%04x, ctl=0x%04x\n",
1397 ifp->if_xname, phyaddr, status,
1398 tulip_mii_readreg(sc, phyaddr, PHYREG_CONTROL));
1399#endif
1400 sc->tulip_flags &= ~TULIP_DIDNWAY;
1401 sc->tulip_probe_state = TULIP_PROBE_MEDIATEST;
1402 return;
1403 }
1404 data = tulip_mii_readreg(sc, phyaddr, PHYREG_AUTONEG_ABILITIES);
1405#if defined(TULIP_DEBUG)
1406 loudprintf("%s(phy%d): autonegotiation complete: 0x%04x\n",
1407 ifp->if_xname, phyaddr, data);
1408#endif
1409 data = (data << 6) & status;
1410 if (!tulip_mii_map_abilities(sc, data))
1411 sc->tulip_flags &= ~TULIP_DIDNWAY;
1412 return;
1413 }
1414 default: {
1415#if defined(DIAGNOSTIC)
1416 panic("tulip_media_poll: botch at line %d\n", __LINE__);
1417#endif
1418 break;
1419 }
1420 }
1421#if defined(TULIP_DEBUG)
1422 loudprintf("%s(phy%d): autonegotiation failure: state = %d\n",
1423 ifp->if_xname, phyaddr, sc->tulip_probe_state);
1424 sc->tulip_dbg.dbg_nway_failures++;
1425#endif
1426}
1427
1428static void
1429tulip_2114x_media_preset(
1430 tulip_softc_t * const sc)
1431{
1432 const tulip_media_info_t *mi = NULL;
1433 tulip_media_t media = sc->tulip_media;
1434
1435 TULIP_LOCK_ASSERT(sc);
1436 if (sc->tulip_probe_state == TULIP_PROBE_INACTIVE)
1437 media = sc->tulip_media;
1438 else
1439 media = sc->tulip_probe_media;
1440
1441 sc->tulip_cmdmode &= ~TULIP_CMD_PORTSELECT;
1442 sc->tulip_flags &= ~TULIP_SQETEST;
1443 if (media != TULIP_MEDIA_UNKNOWN && media != TULIP_MEDIA_MAX) {
1444#if defined(TULIP_DEBUG)
1445 if (media < TULIP_MEDIA_MAX && sc->tulip_mediums[media] != NULL) {
1446#endif
1447 mi = sc->tulip_mediums[media];
1448 if (mi->mi_type == TULIP_MEDIAINFO_MII) {
1449 sc->tulip_cmdmode |= TULIP_CMD_PORTSELECT;
1450 } else if (mi->mi_type == TULIP_MEDIAINFO_GPR
1451 || mi->mi_type == TULIP_MEDIAINFO_SYM) {
1452 sc->tulip_cmdmode &= ~TULIP_GPR_CMDBITS;
1453 sc->tulip_cmdmode |= mi->mi_cmdmode;
1454 } else if (mi->mi_type == TULIP_MEDIAINFO_SIA) {
1455 TULIP_CSR_WRITE(sc, csr_sia_connectivity, TULIP_SIACONN_RESET);
1456 }
1457#if defined(TULIP_DEBUG)
1458 } else {
1459 if_printf(sc->tulip_ifp, "preset: bad media %d!\n", media);
1460 }
1461#endif
1462 }
1463 switch (media) {
1464 case TULIP_MEDIA_BNC:
1465 case TULIP_MEDIA_AUI:
1466 case TULIP_MEDIA_10BASET: {
1467 sc->tulip_cmdmode &= ~TULIP_CMD_FULLDUPLEX;
1468 sc->tulip_cmdmode |= TULIP_CMD_TXTHRSHLDCTL;
1469 sc->tulip_ifp->if_baudrate = 10000000;
1470 sc->tulip_flags |= TULIP_SQETEST;
1471 break;
1472 }
1473 case TULIP_MEDIA_10BASET_FD: {
1474 sc->tulip_cmdmode |= TULIP_CMD_FULLDUPLEX|TULIP_CMD_TXTHRSHLDCTL;
1475 sc->tulip_ifp->if_baudrate = 10000000;
1476 break;
1477 }
1478 case TULIP_MEDIA_100BASEFX:
1479 case TULIP_MEDIA_100BASET4:
1480 case TULIP_MEDIA_100BASETX: {
1481 sc->tulip_cmdmode &= ~(TULIP_CMD_FULLDUPLEX|TULIP_CMD_TXTHRSHLDCTL);
1482 sc->tulip_cmdmode |= TULIP_CMD_PORTSELECT;
1483 sc->tulip_ifp->if_baudrate = 100000000;
1484 break;
1485 }
1486 case TULIP_MEDIA_100BASEFX_FD:
1487 case TULIP_MEDIA_100BASETX_FD: {
1488 sc->tulip_cmdmode |= TULIP_CMD_FULLDUPLEX|TULIP_CMD_PORTSELECT;
1489 sc->tulip_cmdmode &= ~TULIP_CMD_TXTHRSHLDCTL;
1490 sc->tulip_ifp->if_baudrate = 100000000;
1491 break;
1492 }
1493 default: {
1494 break;
1495 }
1496 }
1497 TULIP_CSR_WRITE(sc, csr_command, sc->tulip_cmdmode);
1498}
1499
1500/*
1501 ********************************************************************
1502 * Start of 21140/21140A support which does not use the MII interface
1503 */
1504
1505static void
1506tulip_null_media_poll(
1507 tulip_softc_t * const sc,
1508 tulip_mediapoll_event_t event)
1509{
1510#if defined(TULIP_DEBUG)
1511 sc->tulip_dbg.dbg_events[event]++;
1512#endif
1513#if defined(DIAGNOSTIC)
1514 if_printf(sc->tulip_ifp, "botch(media_poll) at line %d\n", __LINE__);
1515#endif
1516}
1517
1518__inline static void
1519tulip_21140_mediainit(
1520 tulip_softc_t * const sc,
1521 tulip_media_info_t * const mip,
1522 tulip_media_t const media,
1523 unsigned gpdata,
1524 unsigned cmdmode)
1525{
1526 TULIP_LOCK_ASSERT(sc);
1527 sc->tulip_mediums[media] = mip;
1528 mip->mi_type = TULIP_MEDIAINFO_GPR;
1529 mip->mi_cmdmode = cmdmode;
1530 mip->mi_gpdata = gpdata;
1531}
1532
1533static void
1534tulip_21140_evalboard_media_probe(
1535 tulip_softc_t * const sc)
1536{
1537 tulip_media_info_t *mip = sc->tulip_mediainfo;
1538
1539 TULIP_LOCK_ASSERT(sc);
1540 sc->tulip_gpinit = TULIP_GP_EB_PINS;
1541 sc->tulip_gpdata = TULIP_GP_EB_INIT;
1542 TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_EB_PINS);
1543 TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_EB_INIT);
1544 TULIP_CSR_WRITE(sc, csr_command,
1545 TULIP_CSR_READ(sc, csr_command) | TULIP_CMD_PORTSELECT |
1546 TULIP_CMD_PCSFUNCTION | TULIP_CMD_SCRAMBLER | TULIP_CMD_MUSTBEONE);
1547 TULIP_CSR_WRITE(sc, csr_command,
1548 TULIP_CSR_READ(sc, csr_command) & ~TULIP_CMD_TXTHRSHLDCTL);
1549 DELAY(1000000);
1550 if ((TULIP_CSR_READ(sc, csr_gp) & TULIP_GP_EB_OK100) != 0) {
1551 sc->tulip_media = TULIP_MEDIA_10BASET;
1552 } else {
1553 sc->tulip_media = TULIP_MEDIA_100BASETX;
1554 }
1555 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_10BASET,
1556 TULIP_GP_EB_INIT,
1557 TULIP_CMD_TXTHRSHLDCTL);
1558 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_10BASET_FD,
1559 TULIP_GP_EB_INIT,
1560 TULIP_CMD_TXTHRSHLDCTL|TULIP_CMD_FULLDUPLEX);
1561 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASETX,
1562 TULIP_GP_EB_INIT,
1563 TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION
1564 |TULIP_CMD_SCRAMBLER);
1565 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASETX_FD,
1566 TULIP_GP_EB_INIT,
1567 TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION
1568 |TULIP_CMD_SCRAMBLER|TULIP_CMD_FULLDUPLEX);
1569}
1570
1571static const tulip_boardsw_t tulip_21140_eb_boardsw = {
1572 TULIP_21140_DEC_EB,
1573 tulip_21140_evalboard_media_probe,
1574 tulip_media_select,
1575 tulip_null_media_poll,
1576 tulip_2114x_media_preset,
1577};
1578
1579static void
1580tulip_21140_accton_media_probe(
1581 tulip_softc_t * const sc)
1582{
1583 tulip_media_info_t *mip = sc->tulip_mediainfo;
1584 unsigned gpdata;
1585
1586 TULIP_LOCK_ASSERT(sc);
1587 sc->tulip_gpinit = TULIP_GP_EB_PINS;
1588 sc->tulip_gpdata = TULIP_GP_EB_INIT;
1589 TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_EB_PINS);
1590 TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_EB_INIT);
1591 TULIP_CSR_WRITE(sc, csr_command,
1592 TULIP_CSR_READ(sc, csr_command) | TULIP_CMD_PORTSELECT |
1593 TULIP_CMD_PCSFUNCTION | TULIP_CMD_SCRAMBLER | TULIP_CMD_MUSTBEONE);
1594 TULIP_CSR_WRITE(sc, csr_command,
1595 TULIP_CSR_READ(sc, csr_command) & ~TULIP_CMD_TXTHRSHLDCTL);
1596 DELAY(1000000);
1597 gpdata = TULIP_CSR_READ(sc, csr_gp);
1598 if ((gpdata & TULIP_GP_EN1207_UTP_INIT) == 0) {
1599 sc->tulip_media = TULIP_MEDIA_10BASET;
1600 } else {
1601 if ((gpdata & TULIP_GP_EN1207_BNC_INIT) == 0) {
1602 sc->tulip_media = TULIP_MEDIA_BNC;
1603 } else {
1604 sc->tulip_media = TULIP_MEDIA_100BASETX;
1605 }
1606 }
1607 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_BNC,
1608 TULIP_GP_EN1207_BNC_INIT,
1609 TULIP_CMD_TXTHRSHLDCTL);
1610 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_10BASET,
1611 TULIP_GP_EN1207_UTP_INIT,
1612 TULIP_CMD_TXTHRSHLDCTL);
1613 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_10BASET_FD,
1614 TULIP_GP_EN1207_UTP_INIT,
1615 TULIP_CMD_TXTHRSHLDCTL|TULIP_CMD_FULLDUPLEX);
1616 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASETX,
1617 TULIP_GP_EN1207_100_INIT,
1618 TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION
1619 |TULIP_CMD_SCRAMBLER);
1620 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASETX_FD,
1621 TULIP_GP_EN1207_100_INIT,
1622 TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION
1623 |TULIP_CMD_SCRAMBLER|TULIP_CMD_FULLDUPLEX);
1624}
1625
1626static const tulip_boardsw_t tulip_21140_accton_boardsw = {
1627 TULIP_21140_EN1207,
1628 tulip_21140_accton_media_probe,
1629 tulip_media_select,
1630 tulip_null_media_poll,
1631 tulip_2114x_media_preset,
1632};
1633
1634static void
1635tulip_21140_smc9332_media_probe(
1636 tulip_softc_t * const sc)
1637{
1638 tulip_media_info_t *mip = sc->tulip_mediainfo;
1639 int idx, cnt = 0;
1640
1641 TULIP_LOCK_ASSERT(sc);
1642 TULIP_CSR_WRITE(sc, csr_command, TULIP_CMD_PORTSELECT|TULIP_CMD_MUSTBEONE);
1643 TULIP_CSR_WRITE(sc, csr_busmode, TULIP_BUSMODE_SWRESET);
1644 DELAY(10); /* Wait 10 microseconds (actually 50 PCI cycles but at
1645 33MHz that comes to two microseconds but wait a
1646 bit longer anyways) */
1647 TULIP_CSR_WRITE(sc, csr_command, TULIP_CMD_PORTSELECT |
1648 TULIP_CMD_PCSFUNCTION | TULIP_CMD_SCRAMBLER | TULIP_CMD_MUSTBEONE);
1649 sc->tulip_gpinit = TULIP_GP_SMC_9332_PINS;
1650 sc->tulip_gpdata = TULIP_GP_SMC_9332_INIT;
1651 TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_SMC_9332_PINS|TULIP_GP_PINSET);
1652 TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_SMC_9332_INIT);
1653 DELAY(200000);
1654 for (idx = 1000; idx > 0; idx--) {
1655 u_int32_t csr = TULIP_CSR_READ(sc, csr_gp);
1656 if ((csr & (TULIP_GP_SMC_9332_OK10|TULIP_GP_SMC_9332_OK100)) == (TULIP_GP_SMC_9332_OK10|TULIP_GP_SMC_9332_OK100)) {
1657 if (++cnt > 100)
1658 break;
1659 } else if ((csr & TULIP_GP_SMC_9332_OK10) == 0) {
1660 break;
1661 } else {
1662 cnt = 0;
1663 }
1664 DELAY(1000);
1665 }
1666 sc->tulip_media = cnt > 100 ? TULIP_MEDIA_100BASETX : TULIP_MEDIA_10BASET;
1667 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASETX,
1668 TULIP_GP_SMC_9332_INIT,
1669 TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION
1670 |TULIP_CMD_SCRAMBLER);
1671 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASETX_FD,
1672 TULIP_GP_SMC_9332_INIT,
1673 TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION
1674 |TULIP_CMD_SCRAMBLER|TULIP_CMD_FULLDUPLEX);
1675 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_10BASET,
1676 TULIP_GP_SMC_9332_INIT,
1677 TULIP_CMD_TXTHRSHLDCTL);
1678 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_10BASET_FD,
1679 TULIP_GP_SMC_9332_INIT,
1680 TULIP_CMD_TXTHRSHLDCTL|TULIP_CMD_FULLDUPLEX);
1681}
1682
1683static const tulip_boardsw_t tulip_21140_smc9332_boardsw = {
1684 TULIP_21140_SMC_9332,
1685 tulip_21140_smc9332_media_probe,
1686 tulip_media_select,
1687 tulip_null_media_poll,
1688 tulip_2114x_media_preset,
1689};
1690
1691static void
1692tulip_21140_cogent_em100_media_probe(
1693 tulip_softc_t * const sc)
1694{
1695 tulip_media_info_t *mip = sc->tulip_mediainfo;
1696 u_int32_t cmdmode = TULIP_CSR_READ(sc, csr_command);
1697
1698 TULIP_LOCK_ASSERT(sc);
1699 sc->tulip_gpinit = TULIP_GP_EM100_PINS;
1700 sc->tulip_gpdata = TULIP_GP_EM100_INIT;
1701 TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_EM100_PINS);
1702 TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_EM100_INIT);
1703
1704 cmdmode = TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION|TULIP_CMD_MUSTBEONE;
1705 cmdmode &= ~(TULIP_CMD_TXTHRSHLDCTL|TULIP_CMD_SCRAMBLER);
1706 if (sc->tulip_rombuf[32] == TULIP_COGENT_EM100FX_ID) {
1707 TULIP_CSR_WRITE(sc, csr_command, cmdmode);
1708 sc->tulip_media = TULIP_MEDIA_100BASEFX;
1709
1710 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASEFX,
1711 TULIP_GP_EM100_INIT,
1712 TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION);
1713 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASEFX_FD,
1714 TULIP_GP_EM100_INIT,
1715 TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION
1716 |TULIP_CMD_FULLDUPLEX);
1717 } else {
1718 TULIP_CSR_WRITE(sc, csr_command, cmdmode|TULIP_CMD_SCRAMBLER);
1719 sc->tulip_media = TULIP_MEDIA_100BASETX;
1720 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASETX,
1721 TULIP_GP_EM100_INIT,
1722 TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION
1723 |TULIP_CMD_SCRAMBLER);
1724 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASETX_FD,
1725 TULIP_GP_EM100_INIT,
1726 TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION
1727 |TULIP_CMD_SCRAMBLER|TULIP_CMD_FULLDUPLEX);
1728 }
1729}
1730
1731static const tulip_boardsw_t tulip_21140_cogent_em100_boardsw = {
1732 TULIP_21140_COGENT_EM100,
1733 tulip_21140_cogent_em100_media_probe,
1734 tulip_media_select,
1735 tulip_null_media_poll,
1736 tulip_2114x_media_preset
1737};
1738
1739static void
1740tulip_21140_znyx_zx34x_media_probe(
1741 tulip_softc_t * const sc)
1742{
1743 tulip_media_info_t *mip = sc->tulip_mediainfo;
1744 int cnt10 = 0, cnt100 = 0, idx;
1745
1746 TULIP_LOCK_ASSERT(sc);
1747 sc->tulip_gpinit = TULIP_GP_ZX34X_PINS;
1748 sc->tulip_gpdata = TULIP_GP_ZX34X_INIT;
1749 TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_ZX34X_PINS);
1750 TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_ZX34X_INIT);
1751 TULIP_CSR_WRITE(sc, csr_command,
1752 TULIP_CSR_READ(sc, csr_command) | TULIP_CMD_PORTSELECT |
1753 TULIP_CMD_PCSFUNCTION | TULIP_CMD_SCRAMBLER | TULIP_CMD_MUSTBEONE);
1754 TULIP_CSR_WRITE(sc, csr_command,
1755 TULIP_CSR_READ(sc, csr_command) & ~TULIP_CMD_TXTHRSHLDCTL);
1756
1757 DELAY(200000);
1758 for (idx = 1000; idx > 0; idx--) {
1759 u_int32_t csr = TULIP_CSR_READ(sc, csr_gp);
1760 if ((csr & (TULIP_GP_ZX34X_LNKFAIL|TULIP_GP_ZX34X_SYMDET|TULIP_GP_ZX34X_SIGDET)) == (TULIP_GP_ZX34X_LNKFAIL|TULIP_GP_ZX34X_SYMDET|TULIP_GP_ZX34X_SIGDET)) {
1761 if (++cnt100 > 100)
1762 break;
1763 } else if ((csr & TULIP_GP_ZX34X_LNKFAIL) == 0) {
1764 if (++cnt10 > 100)
1765 break;
1766 } else {
1767 cnt10 = 0;
1768 cnt100 = 0;
1769 }
1770 DELAY(1000);
1771 }
1772 sc->tulip_media = cnt100 > 100 ? TULIP_MEDIA_100BASETX : TULIP_MEDIA_10BASET;
1773 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_10BASET,
1774 TULIP_GP_ZX34X_INIT,
1775 TULIP_CMD_TXTHRSHLDCTL);
1776 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_10BASET_FD,
1777 TULIP_GP_ZX34X_INIT,
1778 TULIP_CMD_TXTHRSHLDCTL|TULIP_CMD_FULLDUPLEX);
1779 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASETX,
1780 TULIP_GP_ZX34X_INIT,
1781 TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION
1782 |TULIP_CMD_SCRAMBLER);
1783 tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASETX_FD,
1784 TULIP_GP_ZX34X_INIT,
1785 TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION
1786 |TULIP_CMD_SCRAMBLER|TULIP_CMD_FULLDUPLEX);
1787}
1788
1789static const tulip_boardsw_t tulip_21140_znyx_zx34x_boardsw = {
1790 TULIP_21140_ZNYX_ZX34X,
1791 tulip_21140_znyx_zx34x_media_probe,
1792 tulip_media_select,
1793 tulip_null_media_poll,
1794 tulip_2114x_media_preset,
1795};
1796
1797static void
1798tulip_2114x_media_probe(
1799 tulip_softc_t * const sc)
1800{
1801 TULIP_LOCK_ASSERT(sc);
1802 sc->tulip_cmdmode |= TULIP_CMD_MUSTBEONE
1803 |TULIP_CMD_BACKOFFCTR|TULIP_CMD_THRSHLD72;
1804}
1805
1806static const tulip_boardsw_t tulip_2114x_isv_boardsw = {
1807 TULIP_21140_ISV,
1808 tulip_2114x_media_probe,
1809 tulip_media_select,
1810 tulip_media_poll,
1811 tulip_2114x_media_preset,
1812};
1813
1814/*
1815 * ******** END of chip-specific handlers. ***********
1816 */
1817
1818/*
1819 * Code the read the SROM and MII bit streams (I2C)
1820 */
1821#define EMIT do { TULIP_CSR_WRITE(sc, csr_srom_mii, csr); DELAY(1); } while (0)
1822
1823static void
1824tulip_srom_idle(
1825 tulip_softc_t * const sc)
1826{
1827 unsigned bit, csr;
1828
1829 csr = SROMSEL ; EMIT;
1830 csr = SROMSEL | SROMRD; EMIT;
1831 csr ^= SROMCS; EMIT;
1832 csr ^= SROMCLKON; EMIT;
1833
1834 /*
1835 * Write 25 cycles of 0 which will force the SROM to be idle.
1836 */
1837 for (bit = 3 + SROM_BITWIDTH + 16; bit > 0; bit--) {
1838 csr ^= SROMCLKOFF; EMIT; /* clock low; data not valid */
1839 csr ^= SROMCLKON; EMIT; /* clock high; data valid */
1840 }
1841 csr ^= SROMCLKOFF; EMIT;
1842 csr ^= SROMCS; EMIT;
1843 csr = 0; EMIT;
1844}
1845
1846
1847static void
1848tulip_srom_read(
1849 tulip_softc_t * const sc)
1850{
1851 unsigned idx;
1852 const unsigned bitwidth = SROM_BITWIDTH;
1853 const unsigned cmdmask = (SROMCMD_RD << bitwidth);
1854 const unsigned msb = 1 << (bitwidth + 3 - 1);
1855 unsigned lastidx = (1 << bitwidth) - 1;
1856
1857 tulip_srom_idle(sc);
1858
1859 for (idx = 0; idx <= lastidx; idx++) {
1860 unsigned lastbit, data, bits, bit, csr;
1861 csr = SROMSEL ; EMIT;
1862 csr = SROMSEL | SROMRD; EMIT;
1863 csr ^= SROMCSON; EMIT;
1864 csr ^= SROMCLKON; EMIT;
1865
1866 lastbit = 0;
1867 for (bits = idx|cmdmask, bit = bitwidth + 3; bit > 0; bit--, bits <<= 1) {
1868 const unsigned thisbit = bits & msb;
1869 csr ^= SROMCLKOFF; EMIT; /* clock low; data not valid */
1870 if (thisbit != lastbit) {
1871 csr ^= SROMDOUT; EMIT; /* clock low; invert data */
1872 } else {
1873 EMIT;
1874 }
1875 csr ^= SROMCLKON; EMIT; /* clock high; data valid */
1876 lastbit = thisbit;
1877 }
1878 csr ^= SROMCLKOFF; EMIT;
1879
1880 for (data = 0, bits = 0; bits < 16; bits++) {
1881 data <<= 1;
1882 csr ^= SROMCLKON; EMIT; /* clock high; data valid */
1883 data |= TULIP_CSR_READ(sc, csr_srom_mii) & SROMDIN ? 1 : 0;
1884 csr ^= SROMCLKOFF; EMIT; /* clock low; data not valid */
1885 }
1886 sc->tulip_rombuf[idx*2] = data & 0xFF;
1887 sc->tulip_rombuf[idx*2+1] = data >> 8;
1888 csr = SROMSEL | SROMRD; EMIT;
1889 csr = 0; EMIT;
1890 }
1891 tulip_srom_idle(sc);
1892}
1893
1894#define MII_EMIT do { TULIP_CSR_WRITE(sc, csr_srom_mii, csr); DELAY(1); } while (0)
1895
1896static void
1897tulip_mii_writebits(
1898 tulip_softc_t * const sc,
1899 unsigned data,
1900 unsigned bits)
1901{
1902 unsigned msb = 1 << (bits - 1);
1903 unsigned csr = TULIP_CSR_READ(sc, csr_srom_mii) & (MII_RD|MII_DOUT|MII_CLK);
1904 unsigned lastbit = (csr & MII_DOUT) ? msb : 0;
1905
1906 TULIP_LOCK_ASSERT(sc);
1907 csr |= MII_WR; MII_EMIT; /* clock low; assert write */
1908
1909 for (; bits > 0; bits--, data <<= 1) {
1910 const unsigned thisbit = data & msb;
1911 if (thisbit != lastbit) {
1912 csr ^= MII_DOUT; MII_EMIT; /* clock low; invert data */
1913 }
1914 csr ^= MII_CLKON; MII_EMIT; /* clock high; data valid */
1915 lastbit = thisbit;
1916 csr ^= MII_CLKOFF; MII_EMIT; /* clock low; data not valid */
1917 }
1918}
1919
1920static void
1921tulip_mii_turnaround(
1922 tulip_softc_t * const sc,
1923 unsigned cmd)
1924{
1925 unsigned csr = TULIP_CSR_READ(sc, csr_srom_mii) & (MII_RD|MII_DOUT|MII_CLK);
1926
1927 TULIP_LOCK_ASSERT(sc);
1928 if (cmd == MII_WRCMD) {
1929 csr |= MII_DOUT; MII_EMIT; /* clock low; change data */
1930 csr ^= MII_CLKON; MII_EMIT; /* clock high; data valid */
1931 csr ^= MII_CLKOFF; MII_EMIT; /* clock low; data not valid */
1932 csr ^= MII_DOUT; MII_EMIT; /* clock low; change data */
1933 } else {
1934 csr |= MII_RD; MII_EMIT; /* clock low; switch to read */
1935 }
1936 csr ^= MII_CLKON; MII_EMIT; /* clock high; data valid */
1937 csr ^= MII_CLKOFF; MII_EMIT; /* clock low; data not valid */
1938}
1939
1940static unsigned
1941tulip_mii_readbits(
1942 tulip_softc_t * const sc)
1943{
1944 unsigned data;
1945 unsigned csr = TULIP_CSR_READ(sc, csr_srom_mii) & (MII_RD|MII_DOUT|MII_CLK);
1946 int idx;
1947
1948 TULIP_LOCK_ASSERT(sc);
1949 for (idx = 0, data = 0; idx < 16; idx++) {
1950 data <<= 1; /* this is NOOP on the first pass through */
1951 csr ^= MII_CLKON; MII_EMIT; /* clock high; data valid */
1952 if (TULIP_CSR_READ(sc, csr_srom_mii) & MII_DIN)
1953 data |= 1;
1954 csr ^= MII_CLKOFF; MII_EMIT; /* clock low; data not valid */
1955 }
1956 csr ^= MII_RD; MII_EMIT; /* clock low; turn off read */
1957
1958 return data;
1959}
1960
1961static unsigned
1962tulip_mii_readreg(
1963 tulip_softc_t * const sc,
1964 unsigned devaddr,
1965 unsigned regno)
1966{
1967 unsigned csr = TULIP_CSR_READ(sc, csr_srom_mii) & (MII_RD|MII_DOUT|MII_CLK);
1968 unsigned data;
1969
1970 TULIP_LOCK_ASSERT(sc);
1971 csr &= ~(MII_RD|MII_CLK); MII_EMIT;
1972 tulip_mii_writebits(sc, MII_PREAMBLE, 32);
1973 tulip_mii_writebits(sc, MII_RDCMD, 8);
1974 tulip_mii_writebits(sc, devaddr, 5);
1975 tulip_mii_writebits(sc, regno, 5);
1976 tulip_mii_turnaround(sc, MII_RDCMD);
1977
1978 data = tulip_mii_readbits(sc);
1979#if defined(TULIP_DEBUG)
1980 sc->tulip_dbg.dbg_phyregs[regno][0] = data;
1981 sc->tulip_dbg.dbg_phyregs[regno][1]++;
1982#endif
1983 return data;
1984}
1985
1986static void
1987tulip_mii_writereg(
1988 tulip_softc_t * const sc,
1989 unsigned devaddr,
1990 unsigned regno,
1991 unsigned data)
1992{
1993 unsigned csr = TULIP_CSR_READ(sc, csr_srom_mii) & (MII_RD|MII_DOUT|MII_CLK);
1994
1995 TULIP_LOCK_ASSERT(sc);
1996 csr &= ~(MII_RD|MII_CLK); MII_EMIT;
1997 tulip_mii_writebits(sc, MII_PREAMBLE, 32);
1998 tulip_mii_writebits(sc, MII_WRCMD, 8);
1999 tulip_mii_writebits(sc, devaddr, 5);
2000 tulip_mii_writebits(sc, regno, 5);
2001 tulip_mii_turnaround(sc, MII_WRCMD);
2002 tulip_mii_writebits(sc, data, 16);
2003#if defined(TULIP_DEBUG)
2004 sc->tulip_dbg.dbg_phyregs[regno][2] = data;
2005 sc->tulip_dbg.dbg_phyregs[regno][3]++;
2006#endif
2007}
2008
2009#define tulip_mchash(mca) (ether_crc32_le(mca, 6) & 0x1FF)
2010#define tulip_srom_crcok(databuf) ( \
2011 ((ether_crc32_le(databuf, 126) & 0xFFFFU) ^ 0xFFFFU) == \
2012 ((databuf)[126] | ((databuf)[127] << 8)))
2013
2014static void
2015tulip_identify_dec_nic(
2016 tulip_softc_t * const sc)
2017{
2018 TULIP_LOCK_ASSERT(sc);
2019 strcpy(sc->tulip_boardid, "DEC ");
2020#define D0 4
2021 if (sc->tulip_chipid <= TULIP_21040)
2022 return;
2023 if (bcmp(sc->tulip_rombuf + 29, "DE500", 5) == 0
2024 || bcmp(sc->tulip_rombuf + 29, "DE450", 5) == 0) {
2025 bcopy(sc->tulip_rombuf + 29, &sc->tulip_boardid[D0], 8);
2026 sc->tulip_boardid[D0+8] = ' ';
2027 }
2028#undef D0
2029}
2030
2031static void
2032tulip_identify_znyx_nic(
2033 tulip_softc_t * const sc)
2034{
2035 unsigned id = 0;
2036
2037 TULIP_LOCK_ASSERT(sc);
2038 strcpy(sc->tulip_boardid, "ZNYX ZX3XX ");
2039 if (sc->tulip_chipid == TULIP_21140 || sc->tulip_chipid == TULIP_21140A) {
2040 unsigned znyx_ptr;
2041 sc->tulip_boardid[8] = '4';
2042 znyx_ptr = sc->tulip_rombuf[124] + 256 * sc->tulip_rombuf[125];
2043 if (znyx_ptr < 26 || znyx_ptr > 116) {
2044 sc->tulip_boardsw = &tulip_21140_znyx_zx34x_boardsw;
2045 return;
2046 }
2047 /* ZX344 = 0010 .. 0013FF
2048 */
2049 if (sc->tulip_rombuf[znyx_ptr] == 0x4A
2050 && sc->tulip_rombuf[znyx_ptr + 1] == 0x52
2051 && sc->tulip_rombuf[znyx_ptr + 2] == 0x01) {
2052 id = sc->tulip_rombuf[znyx_ptr + 5] + 256 * sc->tulip_rombuf[znyx_ptr + 4];
2053 if ((id >> 8) == (TULIP_ZNYX_ID_ZX342 >> 8)) {
2054 sc->tulip_boardid[9] = '2';
2055 if (id == TULIP_ZNYX_ID_ZX342B) {
2056 sc->tulip_boardid[10] = 'B';
2057 sc->tulip_boardid[11] = ' ';
2058 }
2059 sc->tulip_boardsw = &tulip_21140_znyx_zx34x_boardsw;
2060 } else if (id == TULIP_ZNYX_ID_ZX344) {
2061 sc->tulip_boardid[10] = '4';
2062 sc->tulip_boardsw = &tulip_21140_znyx_zx34x_boardsw;
2063 } else if (id == TULIP_ZNYX_ID_ZX345) {
2064 sc->tulip_boardid[9] = (sc->tulip_rombuf[19] > 1) ? '8' : '5';
2065 } else if (id == TULIP_ZNYX_ID_ZX346) {
2066 sc->tulip_boardid[9] = '6';
2067 } else if (id == TULIP_ZNYX_ID_ZX351) {
2068 sc->tulip_boardid[8] = '5';
2069 sc->tulip_boardid[9] = '1';
2070 }
2071 }
2072 if (id == 0) {
2073 /*
2074 * Assume it's a ZX342...
2075 */
2076 sc->tulip_boardsw = &tulip_21140_znyx_zx34x_boardsw;
2077 }
2078 return;
2079 }
2080 sc->tulip_boardid[8] = '1';
2081 if (sc->tulip_chipid == TULIP_21041) {
2082 sc->tulip_boardid[10] = '1';
2083 return;
2084 }
2085 if (sc->tulip_rombuf[32] == 0x4A && sc->tulip_rombuf[33] == 0x52) {
2086 id = sc->tulip_rombuf[37] + 256 * sc->tulip_rombuf[36];
2087 if (id == TULIP_ZNYX_ID_ZX312T) {
2088 sc->tulip_boardid[9] = '2';
2089 sc->tulip_boardid[10] = 'T';
2090 sc->tulip_boardid[11] = ' ';
2091 sc->tulip_boardsw = &tulip_21040_10baset_only_boardsw;
2092 } else if (id == TULIP_ZNYX_ID_ZX314_INTA) {
2093 sc->tulip_boardid[9] = '4';
2094 sc->tulip_boardsw = &tulip_21040_10baset_only_boardsw;
2095 sc->tulip_features |= TULIP_HAVE_SHAREDINTR|TULIP_HAVE_BASEROM;
2096 } else if (id == TULIP_ZNYX_ID_ZX314) {
2097 sc->tulip_boardid[9] = '4';
2098 sc->tulip_boardsw = &tulip_21040_10baset_only_boardsw;
2099 sc->tulip_features |= TULIP_HAVE_BASEROM;
2100 } else if (id == TULIP_ZNYX_ID_ZX315_INTA) {
2101 sc->tulip_boardid[9] = '5';
2102 sc->tulip_features |= TULIP_HAVE_SHAREDINTR|TULIP_HAVE_BASEROM;
2103 } else if (id == TULIP_ZNYX_ID_ZX315) {
2104 sc->tulip_boardid[9] = '5';
2105 sc->tulip_features |= TULIP_HAVE_BASEROM;
2106 } else {
2107 id = 0;
2108 }
2109 }
2110 if (id == 0) {
2111 if ((sc->tulip_enaddr[3] & ~3) == 0xF0 && (sc->tulip_enaddr[5] & 2) == 0) {
2112 sc->tulip_boardid[9] = '4';
2113 sc->tulip_boardsw = &tulip_21040_10baset_only_boardsw;
2114 sc->tulip_features |= TULIP_HAVE_SHAREDINTR|TULIP_HAVE_BASEROM;
2115 } else if ((sc->tulip_enaddr[3] & ~3) == 0xF4 && (sc->tulip_enaddr[5] & 1) == 0) {
2116 sc->tulip_boardid[9] = '5';
2117 sc->tulip_boardsw = &tulip_21040_boardsw;
2118 sc->tulip_features |= TULIP_HAVE_SHAREDINTR|TULIP_HAVE_BASEROM;
2119 } else if ((sc->tulip_enaddr[3] & ~3) == 0xEC) {
2120 sc->tulip_boardid[9] = '2';
2121 sc->tulip_boardsw = &tulip_21040_boardsw;
2122 }
2123 }
2124}
2125
2126static void
2127tulip_identify_smc_nic(
2128 tulip_softc_t * const sc)
2129{
2130 u_int32_t id1, id2, ei;
2131 int auibnc = 0, utp = 0;
2132 char *cp;
2133
2134 TULIP_LOCK_ASSERT(sc);
2135 strcpy(sc->tulip_boardid, "SMC ");
2136 if (sc->tulip_chipid == TULIP_21041)
2137 return;
2138 if (sc->tulip_chipid != TULIP_21040) {
2139 if (sc->tulip_boardsw != &tulip_2114x_isv_boardsw) {
2140 strcpy(&sc->tulip_boardid[4], "9332DST ");
2141 sc->tulip_boardsw = &tulip_21140_smc9332_boardsw;
2142 } else if (sc->tulip_features & (TULIP_HAVE_BASEROM|TULIP_HAVE_SLAVEDROM)) {
2143 strcpy(&sc->tulip_boardid[4], "9334BDT ");
2144 } else {
2145 strcpy(&sc->tulip_boardid[4], "9332BDT ");
2146 }
2147 return;
2148 }
2149 id1 = sc->tulip_rombuf[0x60] | (sc->tulip_rombuf[0x61] << 8);
2150 id2 = sc->tulip_rombuf[0x62] | (sc->tulip_rombuf[0x63] << 8);
2151 ei = sc->tulip_rombuf[0x66] | (sc->tulip_rombuf[0x67] << 8);
2152
2153 strcpy(&sc->tulip_boardid[4], "8432");
2154 cp = &sc->tulip_boardid[8];
2155 if ((id1 & 1) == 0)
2156 *cp++ = 'B', auibnc = 1;
2157 if ((id1 & 0xFF) > 0x32)
2158 *cp++ = 'T', utp = 1;
2159 if ((id1 & 0x4000) == 0)
2160 *cp++ = 'A', auibnc = 1;
2161 if (id2 == 0x15) {
2162 sc->tulip_boardid[7] = '4';
2163 *cp++ = '-';
2164 *cp++ = 'C';
2165 *cp++ = 'H';
2166 *cp++ = (ei ? '2' : '1');
2167 }
2168 *cp++ = ' ';
2169 *cp = '\0';
2170 if (utp && !auibnc)
2171 sc->tulip_boardsw = &tulip_21040_10baset_only_boardsw;
2172 else if (!utp && auibnc)
2173 sc->tulip_boardsw = &tulip_21040_auibnc_only_boardsw;
2174}
2175
2176static void
2177tulip_identify_cogent_nic(
2178 tulip_softc_t * const sc)
2179{
2180 TULIP_LOCK_ASSERT(sc);
2181 strcpy(sc->tulip_boardid, "Cogent ");
2182 if (sc->tulip_chipid == TULIP_21140 || sc->tulip_chipid == TULIP_21140A) {
2183 if (sc->tulip_rombuf[32] == TULIP_COGENT_EM100TX_ID) {
2184 strcat(sc->tulip_boardid, "EM100TX ");
2185 sc->tulip_boardsw = &tulip_21140_cogent_em100_boardsw;
2186#if defined(TULIP_COGENT_EM110TX_ID)
2187 } else if (sc->tulip_rombuf[32] == TULIP_COGENT_EM110TX_ID) {
2188 strcat(sc->tulip_boardid, "EM110TX ");
2189 sc->tulip_boardsw = &tulip_21140_cogent_em100_boardsw;
2190#endif
2191 } else if (sc->tulip_rombuf[32] == TULIP_COGENT_EM100FX_ID) {
2192 strcat(sc->tulip_boardid, "EM100FX ");
2193 sc->tulip_boardsw = &tulip_21140_cogent_em100_boardsw;
2194 }
2195 /*
2196 * Magic number (0x24001109U) is the SubVendor (0x2400) and
2197 * SubDevId (0x1109) for the ANA6944TX (EM440TX).
2198 */
2199 if (*(u_int32_t *) sc->tulip_rombuf == 0x24001109U
2200 && (sc->tulip_features & TULIP_HAVE_BASEROM)) {
2201 /*
2202 * Cogent (Adaptec) is still mapping all INTs to INTA of
2203 * first 21140. Dumb! Dumb!
2204 */
2205 strcat(sc->tulip_boardid, "EM440TX ");
2206 sc->tulip_features |= TULIP_HAVE_SHAREDINTR;
2207 }
2208 } else if (sc->tulip_chipid == TULIP_21040) {
2209 sc->tulip_features |= TULIP_HAVE_SHAREDINTR|TULIP_HAVE_BASEROM;
2210 }
2211}
2212
2213static void
2214tulip_identify_accton_nic(
2215 tulip_softc_t * const sc)
2216{
2217 TULIP_LOCK_ASSERT(sc);
2218 strcpy(sc->tulip_boardid, "ACCTON ");
2219 switch (sc->tulip_chipid) {
2220 case TULIP_21140A:
2221 strcat(sc->tulip_boardid, "EN1207 ");
2222 if (sc->tulip_boardsw != &tulip_2114x_isv_boardsw)
2223 sc->tulip_boardsw = &tulip_21140_accton_boardsw;
2224 break;
2225 case TULIP_21140:
2226 strcat(sc->tulip_boardid, "EN1207TX ");
2227 if (sc->tulip_boardsw != &tulip_2114x_isv_boardsw)
2228 sc->tulip_boardsw = &tulip_21140_eb_boardsw;
2229 break;
2230 case TULIP_21040:
2231 strcat(sc->tulip_boardid, "EN1203 ");
2232 sc->tulip_boardsw = &tulip_21040_boardsw;
2233 break;
2234 case TULIP_21041:
2235 strcat(sc->tulip_boardid, "EN1203 ");
2236 sc->tulip_boardsw = &tulip_21041_boardsw;
2237 break;
2238 default:
2239 sc->tulip_boardsw = &tulip_2114x_isv_boardsw;
2240 break;
2241 }
2242}
2243
2244static void
2245tulip_identify_asante_nic(
2246 tulip_softc_t * const sc)
2247{
2248 TULIP_LOCK_ASSERT(sc);
2249 strcpy(sc->tulip_boardid, "Asante ");
2250 if ((sc->tulip_chipid == TULIP_21140 || sc->tulip_chipid == TULIP_21140A)
2251 && sc->tulip_boardsw != &tulip_2114x_isv_boardsw) {
2252 tulip_media_info_t *mi = sc->tulip_mediainfo;
2253 int idx;
2254 /*
2255 * The Asante Fast Ethernet doesn't always ship with a valid
2256 * new format SROM. So if isn't in the new format, we cheat
2257 * set it up as if we had.
2258 */
2259
2260 sc->tulip_gpinit = TULIP_GP_ASANTE_PINS;
2261 sc->tulip_gpdata = 0;
2262
2263 TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_ASANTE_PINS|TULIP_GP_PINSET);
2264 TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_ASANTE_PHYRESET);
2265 DELAY(100);
2266 TULIP_CSR_WRITE(sc, csr_gp, 0);
2267
2268 mi->mi_type = TULIP_MEDIAINFO_MII;
2269 mi->mi_gpr_length = 0;
2270 mi->mi_gpr_offset = 0;
2271 mi->mi_reset_length = 0;
2272 mi->mi_reset_offset = 0;;
2273
2274 mi->mi_phyaddr = TULIP_MII_NOPHY;
2275 for (idx = 20; idx > 0 && mi->mi_phyaddr == TULIP_MII_NOPHY; idx--) {
2276 DELAY(10000);
2277 mi->mi_phyaddr = tulip_mii_get_phyaddr(sc, 0);
2278 }
2279 if (mi->mi_phyaddr == TULIP_MII_NOPHY) {
2280 if_printf(sc->tulip_ifp, "can't find phy 0\n");
2281 return;
2282 }
2283
2284 sc->tulip_features |= TULIP_HAVE_MII;
2285 mi->mi_capabilities = PHYSTS_10BASET|PHYSTS_10BASET_FD|PHYSTS_100BASETX|PHYSTS_100BASETX_FD;
2286 mi->mi_advertisement = PHYSTS_10BASET|PHYSTS_10BASET_FD|PHYSTS_100BASETX|PHYSTS_100BASETX_FD;
2287 mi->mi_full_duplex = PHYSTS_10BASET_FD|PHYSTS_100BASETX_FD;
2288 mi->mi_tx_threshold = PHYSTS_10BASET|PHYSTS_10BASET_FD;
2289 TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 100BASETX_FD);
2290 TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 100BASETX);
2291 TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 100BASET4);
2292 TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 10BASET_FD);
2293 TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 10BASET);
2294 mi->mi_phyid = (tulip_mii_readreg(sc, mi->mi_phyaddr, PHYREG_IDLOW) << 16) |
2295 tulip_mii_readreg(sc, mi->mi_phyaddr, PHYREG_IDHIGH);
2296
2297 sc->tulip_boardsw = &tulip_2114x_isv_boardsw;
2298 }
2299}
2300
2301static void
2302tulip_identify_compex_nic(
2303 tulip_softc_t * const sc)
2304{
2305 TULIP_LOCK_ASSERT(sc);
2306 strcpy(sc->tulip_boardid, "COMPEX ");
2307 if (sc->tulip_chipid == TULIP_21140A) {
2308 int root_unit;
2309 tulip_softc_t *root_sc = NULL;
2310
2311 strcat(sc->tulip_boardid, "400TX/PCI ");
2312 /*
2313 * All 4 chips on these boards share an interrupt. This code
2314 * copied from tulip_read_macaddr.
2315 */
2316 sc->tulip_features |= TULIP_HAVE_SHAREDINTR;
2317 for (root_unit = sc->tulip_unit - 1; root_unit >= 0; root_unit--) {
2318 root_sc = tulips[root_unit];
2319 if (root_sc == NULL
2320 || !(root_sc->tulip_features & TULIP_HAVE_SLAVEDINTR))
2321 break;
2322 root_sc = NULL;
2323 }
2324 if (root_sc != NULL
2325 && root_sc->tulip_chipid == sc->tulip_chipid
2326 && root_sc->tulip_pci_busno == sc->tulip_pci_busno) {
2327 sc->tulip_features |= TULIP_HAVE_SLAVEDINTR;
2328 sc->tulip_slaves = root_sc->tulip_slaves;
2329 root_sc->tulip_slaves = sc;
2330 } else if(sc->tulip_features & TULIP_HAVE_SLAVEDINTR) {
2331 printf("\nCannot find master device for %s interrupts",
2332 sc->tulip_ifp->if_xname);
2333 }
2334 } else {
2335 strcat(sc->tulip_boardid, "unknown ");
2336 }
2337 /* sc->tulip_boardsw = &tulip_21140_eb_boardsw; */
2338 return;
2339}
2340
2341static int
2342tulip_srom_decode(
2343 tulip_softc_t * const sc)
2344{
2345 unsigned idx1, idx2, idx3;
2346
2347 const tulip_srom_header_t *shp = (const tulip_srom_header_t *) &sc->tulip_rombuf[0];
2348 const tulip_srom_adapter_info_t *saip = (const tulip_srom_adapter_info_t *) (shp + 1);
2349 tulip_srom_media_t srom_media;
2350 tulip_media_info_t *mi = sc->tulip_mediainfo;
2351 const u_int8_t *dp;
2352 u_int32_t leaf_offset, blocks, data;
2353
2354 TULIP_LOCK_ASSERT(sc);
2355 for (idx1 = 0; idx1 < shp->sh_adapter_count; idx1++, saip++) {
2356 if (shp->sh_adapter_count == 1)
2357 break;
2358 if (saip->sai_device == sc->tulip_pci_devno)
2359 break;
2360 }
2361 /*
2362 * Didn't find the right media block for this card.
2363 */
2364 if (idx1 == shp->sh_adapter_count)
2365 return 0;
2366
2367 /*
2368 * Save the hardware address.
2369 */
2370 bcopy(shp->sh_ieee802_address, sc->tulip_enaddr, 6);
2371 /*
2372 * If this is a multiple port card, add the adapter index to the last
2373 * byte of the hardware address. (if it isn't multiport, adding 0
2374 * won't hurt.
2375 */
2376 sc->tulip_enaddr[5] += idx1;
2377
2378 leaf_offset = saip->sai_leaf_offset_lowbyte
2379 + saip->sai_leaf_offset_highbyte * 256;
2380 dp = sc->tulip_rombuf + leaf_offset;
2381
2382 sc->tulip_conntype = (tulip_srom_connection_t) (dp[0] + dp[1] * 256); dp += 2;
2383
2384 for (idx2 = 0;; idx2++) {
2385 if (tulip_srom_conninfo[idx2].sc_type == sc->tulip_conntype
2386 || tulip_srom_conninfo[idx2].sc_type == TULIP_SROM_CONNTYPE_NOT_USED)
2387 break;
2388 }
2389 sc->tulip_connidx = idx2;
2390
2391 if (sc->tulip_chipid == TULIP_21041) {
2392 blocks = *dp++;
2393 for (idx2 = 0; idx2 < blocks; idx2++) {
2394 tulip_media_t media;
2395 data = *dp++;
2396 srom_media = (tulip_srom_media_t) (data & 0x3F);
2397 for (idx3 = 0; tulip_srom_mediums[idx3].sm_type != TULIP_MEDIA_UNKNOWN; idx3++) {
2398 if (tulip_srom_mediums[idx3].sm_srom_type == srom_media)
2399 break;
2400 }
2401 media = tulip_srom_mediums[idx3].sm_type;
2402 if (media != TULIP_MEDIA_UNKNOWN) {
2403 if (data & TULIP_SROM_21041_EXTENDED) {
2404 mi->mi_type = TULIP_MEDIAINFO_SIA;
2405 sc->tulip_mediums[media] = mi;
2406 mi->mi_sia_connectivity = dp[0] + dp[1] * 256;
2407 mi->mi_sia_tx_rx = dp[2] + dp[3] * 256;
2408 mi->mi_sia_general = dp[4] + dp[5] * 256;
2409 mi++;
2410 } else {
2411 switch (media) {
2412 case TULIP_MEDIA_BNC: {
2413 TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21041, BNC);
2414 mi++;
2415 break;
2416 }
2417 case TULIP_MEDIA_AUI: {
2418 TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21041, AUI);
2419 mi++;
2420 break;
2421 }
2422 case TULIP_MEDIA_10BASET: {
2423 TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21041, 10BASET);
2424 mi++;
2425 break;
2426 }
2427 case TULIP_MEDIA_10BASET_FD: {
2428 TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21041, 10BASET_FD);
2429 mi++;
2430 break;
2431 }
2432 default: {
2433 break;
2434 }
2435 }
2436 }
2437 }
2438 if (data & TULIP_SROM_21041_EXTENDED)
2439 dp += 6;
2440 }
2441#ifdef notdef
2442 if (blocks == 0) {
2443 TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21041, BNC); mi++;
2444 TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21041, AUI); mi++;
2445 TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21041, 10BASET); mi++;
2446 TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21041, 10BASET_FD); mi++;
2447 }
2448#endif
2449 } else {
2450 unsigned length, type;
2451 tulip_media_t gp_media = TULIP_MEDIA_UNKNOWN;
2452 if (sc->tulip_features & TULIP_HAVE_GPR)
2453 sc->tulip_gpinit = *dp++;
2454 blocks = *dp++;
2455 for (idx2 = 0; idx2 < blocks; idx2++) {
2456 const u_int8_t *ep;
2457 if ((*dp & 0x80) == 0) {
2458 length = 4;
2459 type = 0;
2460 } else {
2461 length = (*dp++ & 0x7f) - 1;
2462 type = *dp++ & 0x3f;
2463 }
2464 ep = dp + length;
2465 switch (type & 0x3f) {
2466 case 0: { /* 21140[A] GPR block */
2467 tulip_media_t media;
2468 srom_media = (tulip_srom_media_t)(dp[0] & 0x3f);
2469 for (idx3 = 0; tulip_srom_mediums[idx3].sm_type != TULIP_MEDIA_UNKNOWN; idx3++) {
2470 if (tulip_srom_mediums[idx3].sm_srom_type == srom_media)
2471 break;
2472 }
2473 media = tulip_srom_mediums[idx3].sm_type;
2474 if (media == TULIP_MEDIA_UNKNOWN)
2475 break;
2476 mi->mi_type = TULIP_MEDIAINFO_GPR;
2477 sc->tulip_mediums[media] = mi;
2478 mi->mi_gpdata = dp[1];
2479 if (media > gp_media && !TULIP_IS_MEDIA_FD(media)) {
2480 sc->tulip_gpdata = mi->mi_gpdata;
2481 gp_media = media;
2482 }
2483 data = dp[2] + dp[3] * 256;
2484 mi->mi_cmdmode = TULIP_SROM_2114X_CMDBITS(data);
2485 if (data & TULIP_SROM_2114X_NOINDICATOR) {
2486 mi->mi_actmask = 0;
2487 } else {
2488#if 0
2489 mi->mi_default = (data & TULIP_SROM_2114X_DEFAULT) != 0;
2490#endif
2491 mi->mi_actmask = TULIP_SROM_2114X_BITPOS(data);
2492 mi->mi_actdata = (data & TULIP_SROM_2114X_POLARITY) ? 0 : mi->mi_actmask;
2493 }
2494 mi++;
2495 break;
2496 }
2497 case 1: { /* 21140[A] MII block */
2498 const unsigned phyno = *dp++;
2499 mi->mi_type = TULIP_MEDIAINFO_MII;
2500 mi->mi_gpr_length = *dp++;
2501 mi->mi_gpr_offset = dp - sc->tulip_rombuf;
2502 dp += mi->mi_gpr_length;
2503 mi->mi_reset_length = *dp++;
2504 mi->mi_reset_offset = dp - sc->tulip_rombuf;
2505 dp += mi->mi_reset_length;
2506
2507 /*
2508 * Before we probe for a PHY, use the GPR information
2509 * to select it. If we don't, it may be inaccessible.
2510 */
2511 TULIP_CSR_WRITE(sc, csr_gp, sc->tulip_gpinit|TULIP_GP_PINSET);
2512 for (idx3 = 0; idx3 < mi->mi_reset_length; idx3++) {
2513 DELAY(10);
2514 TULIP_CSR_WRITE(sc, csr_gp, sc->tulip_rombuf[mi->mi_reset_offset + idx3]);
2515 }
2516 sc->tulip_phyaddr = mi->mi_phyaddr;
2517 for (idx3 = 0; idx3 < mi->mi_gpr_length; idx3++) {
2518 DELAY(10);
2519 TULIP_CSR_WRITE(sc, csr_gp, sc->tulip_rombuf[mi->mi_gpr_offset + idx3]);
2520 }
2521
2522 /*
2523 * At least write something!
2524 */
2525 if (mi->mi_reset_length == 0 && mi->mi_gpr_length == 0)
2526 TULIP_CSR_WRITE(sc, csr_gp, 0);
2527
2528 mi->mi_phyaddr = TULIP_MII_NOPHY;
2529 for (idx3 = 20; idx3 > 0 && mi->mi_phyaddr == TULIP_MII_NOPHY; idx3--) {
2530 DELAY(10000);
2531 mi->mi_phyaddr = tulip_mii_get_phyaddr(sc, phyno);
2532 }
2533 if (mi->mi_phyaddr == TULIP_MII_NOPHY) {
2534#if defined(TULIP_DEBUG)
2535 if_printf(sc->tulip_ifp, "can't find phy %d\n",
2536 phyno);
2537#endif
2538 break;
2539 }
2540 sc->tulip_features |= TULIP_HAVE_MII;
2541 mi->mi_capabilities = dp[0] + dp[1] * 256; dp += 2;
2542 mi->mi_advertisement = dp[0] + dp[1] * 256; dp += 2;
2543 mi->mi_full_duplex = dp[0] + dp[1] * 256; dp += 2;
2544 mi->mi_tx_threshold = dp[0] + dp[1] * 256; dp += 2;
2545 TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 100BASETX_FD);
2546 TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 100BASETX);
2547 TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 100BASET4);
2548 TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 10BASET_FD);
2549 TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 10BASET);
2550 mi->mi_phyid = (tulip_mii_readreg(sc, mi->mi_phyaddr, PHYREG_IDLOW) << 16) |
2551 tulip_mii_readreg(sc, mi->mi_phyaddr, PHYREG_IDHIGH);
2552 mi++;
2553 break;
2554 }
2555 case 2: { /* 2114[23] SIA block */
2556 tulip_media_t media;
2557 srom_media = (tulip_srom_media_t)(dp[0] & 0x3f);
2558 for (idx3 = 0; tulip_srom_mediums[idx3].sm_type != TULIP_MEDIA_UNKNOWN; idx3++) {
2559 if (tulip_srom_mediums[idx3].sm_srom_type == srom_media)
2560 break;
2561 }
2562 media = tulip_srom_mediums[idx3].sm_type;
2563 if (media == TULIP_MEDIA_UNKNOWN)
2564 break;
2565 mi->mi_type = TULIP_MEDIAINFO_SIA;
2566 sc->tulip_mediums[media] = mi;
2567 if (dp[0] & 0x40) {
2568 mi->mi_sia_connectivity = dp[1] + dp[2] * 256;
2569 mi->mi_sia_tx_rx = dp[3] + dp[4] * 256;
2570 mi->mi_sia_general = dp[5] + dp[6] * 256;
2571 dp += 6;
2572 } else {
2573 switch (media) {
2574 case TULIP_MEDIA_BNC: {
2575 TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21142, BNC);
2576 break;
2577 }
2578 case TULIP_MEDIA_AUI: {
2579 TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21142, AUI);
2580 break;
2581 }
2582 case TULIP_MEDIA_10BASET: {
2583 TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21142, 10BASET);
2584 sc->tulip_intrmask |= TULIP_STS_LINKPASS|TULIP_STS_LINKFAIL;
2585 break;
2586 }
2587 case TULIP_MEDIA_10BASET_FD: {
2588 TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21142, 10BASET_FD);
2589 sc->tulip_intrmask |= TULIP_STS_LINKPASS|TULIP_STS_LINKFAIL;
2590 break;
2591 }
2592 default: {
2593 goto bad_media;
2594 }
2595 }
2596 }
2597 mi->mi_sia_gp_control = (dp[1] + dp[2] * 256) << 16;
2598 mi->mi_sia_gp_data = (dp[3] + dp[4] * 256) << 16;
2599 mi++;
2600 bad_media:
2601 break;
2602 }
2603 case 3: { /* 2114[23] MII PHY block */
2604 const unsigned phyno = *dp++;
2605 const u_int8_t *dp0;
2606 mi->mi_type = TULIP_MEDIAINFO_MII;
2607 mi->mi_gpr_length = *dp++;
2608 mi->mi_gpr_offset = dp - sc->tulip_rombuf;
2609 dp += 2 * mi->mi_gpr_length;
2610 mi->mi_reset_length = *dp++;
2611 mi->mi_reset_offset = dp - sc->tulip_rombuf;
2612 dp += 2 * mi->mi_reset_length;
2613
2614 dp0 = &sc->tulip_rombuf[mi->mi_reset_offset];
2615 for (idx3 = 0; idx3 < mi->mi_reset_length; idx3++, dp0 += 2) {
2616 DELAY(10);
2617 TULIP_CSR_WRITE(sc, csr_sia_general, (dp0[0] + 256 * dp0[1]) << 16);
2618 }
2619 sc->tulip_phyaddr = mi->mi_phyaddr;
2620 dp0 = &sc->tulip_rombuf[mi->mi_gpr_offset];
2621 for (idx3 = 0; idx3 < mi->mi_gpr_length; idx3++, dp0 += 2) {
2622 DELAY(10);
2623 TULIP_CSR_WRITE(sc, csr_sia_general, (dp0[0] + 256 * dp0[1]) << 16);
2624 }
2625
2626 if (mi->mi_reset_length == 0 && mi->mi_gpr_length == 0)
2627 TULIP_CSR_WRITE(sc, csr_sia_general, 0);
2628
2629 mi->mi_phyaddr = TULIP_MII_NOPHY;
2630 for (idx3 = 20; idx3 > 0 && mi->mi_phyaddr == TULIP_MII_NOPHY; idx3--) {
2631 DELAY(10000);
2632 mi->mi_phyaddr = tulip_mii_get_phyaddr(sc, phyno);
2633 }
2634 if (mi->mi_phyaddr == TULIP_MII_NOPHY) {
2635#if defined(TULIP_DEBUG)
2636 if_printf(sc->tulip_ifp, "can't find phy %d\n",
2637 phyno);
2638#endif
2639 break;
2640 }
2641 sc->tulip_features |= TULIP_HAVE_MII;
2642 mi->mi_capabilities = dp[0] + dp[1] * 256; dp += 2;
2643 mi->mi_advertisement = dp[0] + dp[1] * 256; dp += 2;
2644 mi->mi_full_duplex = dp[0] + dp[1] * 256; dp += 2;
2645 mi->mi_tx_threshold = dp[0] + dp[1] * 256; dp += 2;
2646 mi->mi_mii_interrupt = dp[0] + dp[1] * 256; dp += 2;
2647 TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 100BASETX_FD);
2648 TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 100BASETX);
2649 TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 100BASET4);
2650 TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 10BASET_FD);
2651 TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 10BASET);
2652 mi->mi_phyid = (tulip_mii_readreg(sc, mi->mi_phyaddr, PHYREG_IDLOW) << 16) |
2653 tulip_mii_readreg(sc, mi->mi_phyaddr, PHYREG_IDHIGH);
2654 mi++;
2655 break;
2656 }
2657 case 4: { /* 21143 SYM block */
2658 tulip_media_t media;
2659 srom_media = (tulip_srom_media_t) dp[0];
2660 for (idx3 = 0; tulip_srom_mediums[idx3].sm_type != TULIP_MEDIA_UNKNOWN; idx3++) {
2661 if (tulip_srom_mediums[idx3].sm_srom_type == srom_media)
2662 break;
2663 }
2664 media = tulip_srom_mediums[idx3].sm_type;
2665 if (media == TULIP_MEDIA_UNKNOWN)
2666 break;
2667 mi->mi_type = TULIP_MEDIAINFO_SYM;
2668 sc->tulip_mediums[media] = mi;
2669 mi->mi_gpcontrol = (dp[1] + dp[2] * 256) << 16;
2670 mi->mi_gpdata = (dp[3] + dp[4] * 256) << 16;
2671 data = dp[5] + dp[6] * 256;
2672 mi->mi_cmdmode = TULIP_SROM_2114X_CMDBITS(data);
2673 if (data & TULIP_SROM_2114X_NOINDICATOR) {
2674 mi->mi_actmask = 0;
2675 } else {
2676 mi->mi_default = (data & TULIP_SROM_2114X_DEFAULT) != 0;
2677 mi->mi_actmask = TULIP_SROM_2114X_BITPOS(data);
2678 mi->mi_actdata = (data & TULIP_SROM_2114X_POLARITY) ? 0 : mi->mi_actmask;
2679 }
2680 if (TULIP_IS_MEDIA_TP(media))
2681 sc->tulip_intrmask |= TULIP_STS_LINKPASS|TULIP_STS_LINKFAIL;
2682 mi++;
2683 break;
2684 }
2685#if 0
2686 case 5: { /* 21143 Reset block */
2687 mi->mi_type = TULIP_MEDIAINFO_RESET;
2688 mi->mi_reset_length = *dp++;
2689 mi->mi_reset_offset = dp - sc->tulip_rombuf;
2690 dp += 2 * mi->mi_reset_length;
2691 mi++;
2692 break;
2693 }
2694#endif
2695 default: {
2696 }
2697 }
2698 dp = ep;
2699 }
2700 }
2701 return mi - sc->tulip_mediainfo;
2702}
2703
2704static const struct {
2705 void (*vendor_identify_nic)(tulip_softc_t * const sc);
2706 unsigned char vendor_oui[3];
2707} tulip_vendors[] = {
2708 { tulip_identify_dec_nic, { 0x08, 0x00, 0x2B } },
2709 { tulip_identify_dec_nic, { 0x00, 0x00, 0xF8 } },
2710 { tulip_identify_smc_nic, { 0x00, 0x00, 0xC0 } },
2711 { tulip_identify_smc_nic, { 0x00, 0xE0, 0x29 } },
2712 { tulip_identify_znyx_nic, { 0x00, 0xC0, 0x95 } },
2713 { tulip_identify_cogent_nic, { 0x00, 0x00, 0x92 } },
2714 { tulip_identify_asante_nic, { 0x00, 0x00, 0x94 } },
2715 { tulip_identify_cogent_nic, { 0x00, 0x00, 0xD1 } },
2716 { tulip_identify_accton_nic, { 0x00, 0x00, 0xE8 } },
2717 { tulip_identify_compex_nic, { 0x00, 0x80, 0x48 } },
2718 { NULL }
2719};
2720
2721/*
2722 * This deals with the vagaries of the address roms and the
2723 * brain-deadness that various vendors commit in using them.
2724 */
2725static int
2726tulip_read_macaddr(
2727 tulip_softc_t * const sc)
2728{
2729 unsigned cksum, rom_cksum, idx;
2730 u_int32_t csr;
2731 unsigned char tmpbuf[8];
2732 static const u_char testpat[] = { 0xFF, 0, 0x55, 0xAA, 0xFF, 0, 0x55, 0xAA };
2733
2734 sc->tulip_connidx = TULIP_SROM_LASTCONNIDX;
2735
2736 if (sc->tulip_chipid == TULIP_21040) {
2737 TULIP_CSR_WRITE(sc, csr_enetrom, 1);
2738 for (idx = 0; idx < sizeof(sc->tulip_rombuf); idx++) {
2739 int cnt = 0;
2740 while (((csr = TULIP_CSR_READ(sc, csr_enetrom)) & 0x80000000L) && cnt < 10000)
2741 cnt++;
2742 sc->tulip_rombuf[idx] = csr & 0xFF;
2743 }
2744 sc->tulip_boardsw = &tulip_21040_boardsw;
2745 } else {
2746 if (sc->tulip_chipid == TULIP_21041) {
2747 /*
2748 * Thankfully all 21041's act the same.
2749 */
2750 sc->tulip_boardsw = &tulip_21041_boardsw;
2751 } else {
2752 /*
2753 * Assume all 21140 board are compatible with the
2754 * DEC 10/100 evaluation board. Not really valid but
2755 * it's the best we can do until every one switches to
2756 * the new SROM format.
2757 */
2758
2759 sc->tulip_boardsw = &tulip_21140_eb_boardsw;
2760 }
2761 tulip_srom_read(sc);
2762 if (tulip_srom_crcok(sc->tulip_rombuf)) {
2763 /*
2764 * SROM CRC is valid therefore it must be in the
2765 * new format.
2766 */
2767 sc->tulip_features |= TULIP_HAVE_ISVSROM|TULIP_HAVE_OKSROM;
2768 } else if (sc->tulip_rombuf[126] == 0xff && sc->tulip_rombuf[127] == 0xFF) {
2769 /*
2770 * No checksum is present. See if the SROM id checks out;
2771 * the first 18 bytes should be 0 followed by a 1 followed
2772 * by the number of adapters (which we don't deal with yet).
2773 */
2774 for (idx = 0; idx < 18; idx++) {
2775 if (sc->tulip_rombuf[idx] != 0)
2776 break;
2777 }
2778 if (idx == 18 && sc->tulip_rombuf[18] == 1 && sc->tulip_rombuf[19] != 0)
2779 sc->tulip_features |= TULIP_HAVE_ISVSROM;
2780 } else if (sc->tulip_chipid >= TULIP_21142) {
2781 sc->tulip_features |= TULIP_HAVE_ISVSROM;
2782 sc->tulip_boardsw = &tulip_2114x_isv_boardsw;
2783 }
2784 if ((sc->tulip_features & TULIP_HAVE_ISVSROM) && tulip_srom_decode(sc)) {
2785 if (sc->tulip_chipid != TULIP_21041)
2786 sc->tulip_boardsw = &tulip_2114x_isv_boardsw;
2787
2788 /*
2789 * If the SROM specifies more than one adapter, tag this as a
2790 * BASE rom.
2791 */
2792 if (sc->tulip_rombuf[19] > 1)
2793 sc->tulip_features |= TULIP_HAVE_BASEROM;
2794 if (sc->tulip_boardsw == NULL)
2795 return -6;
2796 goto check_oui;
2797 }
2798 }
2799
2800
2801 if (bcmp(&sc->tulip_rombuf[0], &sc->tulip_rombuf[16], 8) != 0) {
2802 /*
2803 * Some folks don't use the standard ethernet rom format
2804 * but instead just put the address in the first 6 bytes
2805 * of the rom and let the rest be all 0xffs. (Can we say
2806 * ZNYX?) (well sometimes they put in a checksum so we'll
2807 * start at 8).
2808 */
2809 for (idx = 8; idx < 32; idx++) {
2810 if (sc->tulip_rombuf[idx] != 0xFF)
2811 return -4;
2812 }
2813 /*
2814 * Make sure the address is not multicast or locally assigned
2815 * that the OUI is not 00-00-00.
2816 */
2817 if ((sc->tulip_rombuf[0] & 3) != 0)
2818 return -4;
2819 if (sc->tulip_rombuf[0] == 0 && sc->tulip_rombuf[1] == 0
2820 && sc->tulip_rombuf[2] == 0)
2821 return -4;
2822 bcopy(sc->tulip_rombuf, sc->tulip_enaddr, 6);
2823 sc->tulip_features |= TULIP_HAVE_OKROM;
2824 goto check_oui;
2825 } else {
2826 /*
2827 * A number of makers of multiport boards (ZNYX and Cogent)
2828 * only put on one address ROM on their 21040 boards. So
2829 * if the ROM is all zeros (or all 0xFFs), look at the
2830 * previous configured boards (as long as they are on the same
2831 * PCI bus and the bus number is non-zero) until we find the
2832 * master board with address ROM. We then use its address ROM
2833 * as the base for this board. (we add our relative board
2834 * to the last byte of its address).
2835 */
2836 for (idx = 0; idx < sizeof(sc->tulip_rombuf); idx++) {
2837 if (sc->tulip_rombuf[idx] != 0 && sc->tulip_rombuf[idx] != 0xFF)
2838 break;
2839 }
2840 if (idx == sizeof(sc->tulip_rombuf)) {
2841 int root_unit;
2842 tulip_softc_t *root_sc = NULL;
2843 for (root_unit = sc->tulip_unit - 1; root_unit >= 0; root_unit--) {
2844 root_sc = tulips[root_unit];
2845 if (root_sc == NULL || (root_sc->tulip_features & (TULIP_HAVE_OKROM|TULIP_HAVE_SLAVEDROM)) == TULIP_HAVE_OKROM)
2846 break;
2847 root_sc = NULL;
2848 }
2849 if (root_sc != NULL && (root_sc->tulip_features & TULIP_HAVE_BASEROM)
2850 && root_sc->tulip_chipid == sc->tulip_chipid
2851 && root_sc->tulip_pci_busno == sc->tulip_pci_busno) {
2852 sc->tulip_features |= TULIP_HAVE_SLAVEDROM;
2853 sc->tulip_boardsw = root_sc->tulip_boardsw;
2854 strcpy(sc->tulip_boardid, root_sc->tulip_boardid);
2855 if (sc->tulip_boardsw->bd_type == TULIP_21140_ISV) {
2856 bcopy(root_sc->tulip_rombuf, sc->tulip_rombuf,
2857 sizeof(sc->tulip_rombuf));
2858 if (!tulip_srom_decode(sc))
2859 return -5;
2860 } else {
2861 bcopy(root_sc->tulip_enaddr, sc->tulip_enaddr, 6);
2862 sc->tulip_enaddr[5] += sc->tulip_unit - root_sc->tulip_unit;
2863 }
2864 /*
2865 * Now for a truly disgusting kludge: all 4 21040s on
2866 * the ZX314 share the same INTA line so the mapping
2867 * setup by the BIOS on the PCI bridge is worthless.
2868 * Rather than reprogramming the value in the config
2869 * register, we will handle this internally.
2870 */
2871 if (root_sc->tulip_features & TULIP_HAVE_SHAREDINTR) {
2872 sc->tulip_slaves = root_sc->tulip_slaves;
2873 root_sc->tulip_slaves = sc;
2874 sc->tulip_features |= TULIP_HAVE_SLAVEDINTR;
2875 }
2876 return 0;
2877 }
2878 }
2879 }
2880
2881 /*
2882 * This is the standard DEC address ROM test.
2883 */
2884
2885 if (bcmp(&sc->tulip_rombuf[24], testpat, 8) != 0)
2886 return -3;
2887
2888 tmpbuf[0] = sc->tulip_rombuf[15]; tmpbuf[1] = sc->tulip_rombuf[14];
2889 tmpbuf[2] = sc->tulip_rombuf[13]; tmpbuf[3] = sc->tulip_rombuf[12];
2890 tmpbuf[4] = sc->tulip_rombuf[11]; tmpbuf[5] = sc->tulip_rombuf[10];
2891 tmpbuf[6] = sc->tulip_rombuf[9]; tmpbuf[7] = sc->tulip_rombuf[8];
2892 if (bcmp(&sc->tulip_rombuf[0], tmpbuf, 8) != 0)
2893 return -2;
2894
2895 bcopy(sc->tulip_rombuf, sc->tulip_enaddr, 6);
2896
2897 cksum = *(u_int16_t *) &sc->tulip_enaddr[0];
2898 cksum *= 2;
2899 if (cksum > 65535) cksum -= 65535;
2900 cksum += *(u_int16_t *) &sc->tulip_enaddr[2];
2901 if (cksum > 65535) cksum -= 65535;
2902 cksum *= 2;
2903 if (cksum > 65535) cksum -= 65535;
2904 cksum += *(u_int16_t *) &sc->tulip_enaddr[4];
2905 if (cksum >= 65535) cksum -= 65535;
2906
2907 rom_cksum = *(u_int16_t *) &sc->tulip_rombuf[6];
2908
2909 if (cksum != rom_cksum)
2910 return -1;
2911
2912 check_oui:
2913 /*
2914 * Check for various boards based on OUI. Did I say braindead?
2915 */
2916 for (idx = 0; tulip_vendors[idx].vendor_identify_nic != NULL; idx++) {
2917 if (bcmp(sc->tulip_enaddr, tulip_vendors[idx].vendor_oui, 3) == 0) {
2918 (*tulip_vendors[idx].vendor_identify_nic)(sc);
2919 break;
2920 }
2921 }
2922
2923 sc->tulip_features |= TULIP_HAVE_OKROM;
2924 return 0;
2925}
2926
2927static void
2928tulip_ifmedia_add(
2929 tulip_softc_t * const sc)
2930{
2931 tulip_media_t media;
2932 int medias = 0;
2933
2934 TULIP_LOCK_ASSERT(sc);
2935 for (media = TULIP_MEDIA_UNKNOWN; media < TULIP_MEDIA_MAX; media++) {
2936 if (sc->tulip_mediums[media] != NULL) {
2937 ifmedia_add(&sc->tulip_ifmedia, tulip_media_to_ifmedia[media],
2938 0, 0);
2939 medias++;
2940 }
2941 }
2942 if (medias == 0) {
2943 sc->tulip_features |= TULIP_HAVE_NOMEDIA;
2944 ifmedia_add(&sc->tulip_ifmedia, IFM_ETHER | IFM_NONE, 0, 0);
2945 ifmedia_set(&sc->tulip_ifmedia, IFM_ETHER | IFM_NONE);
2946 } else if (sc->tulip_media == TULIP_MEDIA_UNKNOWN) {
2947 ifmedia_add(&sc->tulip_ifmedia, IFM_ETHER | IFM_AUTO, 0, 0);
2948 ifmedia_set(&sc->tulip_ifmedia, IFM_ETHER | IFM_AUTO);
2949 } else {
2950 ifmedia_set(&sc->tulip_ifmedia, tulip_media_to_ifmedia[sc->tulip_media]);
2951 sc->tulip_flags |= TULIP_PRINTMEDIA;
2952 tulip_linkup(sc, sc->tulip_media);
2953 }
2954}
2955
2956static int
2957tulip_ifmedia_change(
2958 struct ifnet * const ifp)
2959{
2960 tulip_softc_t * const sc = (tulip_softc_t *)ifp->if_softc;
2961
2962 TULIP_LOCK(sc);
2963 sc->tulip_flags |= TULIP_NEEDRESET;
2964 sc->tulip_probe_state = TULIP_PROBE_INACTIVE;
2965 sc->tulip_media = TULIP_MEDIA_UNKNOWN;
2966 if (IFM_SUBTYPE(sc->tulip_ifmedia.ifm_media) != IFM_AUTO) {
2967 tulip_media_t media;
2968 for (media = TULIP_MEDIA_UNKNOWN; media < TULIP_MEDIA_MAX; media++) {
2969 if (sc->tulip_mediums[media] != NULL
2970 && sc->tulip_ifmedia.ifm_media == tulip_media_to_ifmedia[media]) {
2971 sc->tulip_flags |= TULIP_PRINTMEDIA;
2972 sc->tulip_flags &= ~TULIP_DIDNWAY;
2973 tulip_linkup(sc, media);
2974 TULIP_UNLOCK(sc);
2975 return 0;
2976 }
2977 }
2978 }
2979 sc->tulip_flags &= ~(TULIP_TXPROBE_ACTIVE|TULIP_WANTRXACT);
2980 tulip_reset(sc);
2981 tulip_init(sc);
2982 TULIP_UNLOCK(sc);
2983 return 0;
2984}
2985
2986/*
2987 * Media status callback
2988 */
2989static void
2990tulip_ifmedia_status(
2991 struct ifnet * const ifp,
2992 struct ifmediareq *req)
2993{
2994 tulip_softc_t *sc = (tulip_softc_t *)ifp->if_softc;
2995
2996 TULIP_LOCK(sc);
2997 if (sc->tulip_media == TULIP_MEDIA_UNKNOWN) {
2998 TULIP_UNLOCK(sc);
2999 return;
3000 }
3001
3002 req->ifm_status = IFM_AVALID;
3003 if (sc->tulip_flags & TULIP_LINKUP)
3004 req->ifm_status |= IFM_ACTIVE;
3005
3006 req->ifm_active = tulip_media_to_ifmedia[sc->tulip_media];
3007 TULIP_UNLOCK(sc);
3008}
3009
3010static void
3011tulip_addr_filter(
3012 tulip_softc_t * const sc)
3013{
3014 struct ifmultiaddr *ifma;
3015 u_char *addrp;
3016 int multicnt;
3017
3018 TULIP_LOCK_ASSERT(sc);
3019 sc->tulip_flags &= ~(TULIP_WANTHASHPERFECT|TULIP_WANTHASHONLY|TULIP_ALLMULTI);
3020 sc->tulip_flags |= TULIP_WANTSETUP|TULIP_WANTTXSTART;
3021 sc->tulip_cmdmode &= ~TULIP_CMD_RXRUN;
3022 sc->tulip_intrmask &= ~TULIP_STS_RXSTOPPED;
3023#if defined(IFF_ALLMULTI)
3024 if (sc->tulip_ifp->if_flags & IFF_ALLMULTI)
3025 sc->tulip_flags |= TULIP_ALLMULTI ;
3026#endif
3027
3028 multicnt = 0;
|
3152#if defined(IFF_ALLMULTI)
3153 if (sc->tulip_flags & TULIP_ALLMULTI)
3154 sc->tulip_ifp->if_flags |= IFF_ALLMULTI;
3155#endif
3156}
3157
3158static void
3159tulip_reset(
3160 tulip_softc_t * const sc)
3161{
3162 tulip_ringinfo_t *ri;
3163 tulip_desc_t *di;
3164 u_int32_t inreset = (sc->tulip_flags & TULIP_INRESET);
3165
3166 TULIP_LOCK_ASSERT(sc);
3167
3168 /*
3169 * Brilliant. Simply brilliant. When switching modes/speeds
3170 * on a 2114*, you need to set the appriopriate MII/PCS/SCL/PS
3171 * bits in CSR6 and then do a software reset to get the 21140
3172 * to properly reset its internal pathways to the right places.
3173 * Grrrr.
3174 */
3175 if ((sc->tulip_flags & TULIP_DEVICEPROBE) == 0
3176 && sc->tulip_boardsw->bd_media_preset != NULL)
3177 (*sc->tulip_boardsw->bd_media_preset)(sc);
3178
3179 TULIP_CSR_WRITE(sc, csr_busmode, TULIP_BUSMODE_SWRESET);
3180 DELAY(10); /* Wait 10 microseconds (actually 50 PCI cycles but at
3181 33MHz that comes to two microseconds but wait a
3182 bit longer anyways) */
3183
3184 if (!inreset) {
3185 sc->tulip_flags |= TULIP_INRESET;
3186 sc->tulip_flags &= ~(TULIP_NEEDRESET|TULIP_RXBUFSLOW);
3187 sc->tulip_ifp->if_flags &= ~IFF_OACTIVE;
3188 }
3189
3190#if defined(TULIP_BUS_DMA) && !defined(TULIP_BUS_DMA_NOTX)
3191 TULIP_CSR_WRITE(sc, csr_txlist, sc->tulip_txdescmap->dm_segs[0].ds_addr);
3192#else
3193 TULIP_CSR_WRITE(sc, csr_txlist, TULIP_KVATOPHYS(sc, &sc->tulip_txinfo.ri_first[0]));
3194#endif
3195#if defined(TULIP_BUS_DMA) && !defined(TULIP_BUS_DMA_NORX)
3196 TULIP_CSR_WRITE(sc, csr_rxlist, sc->tulip_rxdescmap->dm_segs[0].ds_addr);
3197#else
3198 TULIP_CSR_WRITE(sc, csr_rxlist, TULIP_KVATOPHYS(sc, &sc->tulip_rxinfo.ri_first[0]));
3199#endif
3200 TULIP_CSR_WRITE(sc, csr_busmode,
3201 (1 << (3 /*pci_max_burst_len*/ + 8))
3202 |TULIP_BUSMODE_CACHE_ALIGN8
3203 |TULIP_BUSMODE_READMULTIPLE
3204 |(BYTE_ORDER != LITTLE_ENDIAN ?
3205 TULIP_BUSMODE_DESC_BIGENDIAN : 0));
3206
3207 sc->tulip_txtimer = 0;
3208 sc->tulip_txq.ifq_maxlen = TULIP_TXDESCS;
3209 /*
3210 * Free all the mbufs that were on the transmit ring.
3211 */
3212 for (;;) {
3213#if defined(TULIP_BUS_DMA) && !defined(TULIP_BUS_DMA_NOTX)
3214 bus_dmamap_t map;
3215#endif
3216 struct mbuf *m;
3217 _IF_DEQUEUE(&sc->tulip_txq, m);
3218 if (m == NULL)
3219 break;
3220#if defined(TULIP_BUS_DMA) && !defined(TULIP_BUS_DMA_NOTX)
3221 map = M_GETCTX(m, bus_dmamap_t);
3222 bus_dmamap_unload(sc->tulip_dmatag, map);
3223 sc->tulip_txmaps[sc->tulip_txmaps_free++] = map;
3224#endif
3225 m_freem(m);
3226 }
3227
3228 ri = &sc->tulip_txinfo;
3229 ri->ri_nextin = ri->ri_nextout = ri->ri_first;
3230 ri->ri_free = ri->ri_max;
3231 for (di = ri->ri_first; di < ri->ri_last; di++)
3232 di->d_status = 0;
3233#if defined(TULIP_BUS_DMA) && !defined(TULIP_BUS_DMA_NOTX)
3234 bus_dmamap_sync(sc->tulip_dmatag, sc->tulip_txdescmap,
3235 0, sc->tulip_txdescmap->dm_mapsize,
3236 BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
3237#endif
3238
3239 /*
3240 * We need to collect all the mbufs were on the
3241 * receive ring before we reinit it either to put
3242 * them back on or to know if we have to allocate
3243 * more.
3244 */
3245 ri = &sc->tulip_rxinfo;
3246 ri->ri_nextin = ri->ri_nextout = ri->ri_first;
3247 ri->ri_free = ri->ri_max;
3248 for (di = ri->ri_first; di < ri->ri_last; di++) {
3249 di->d_status = 0;
3250 di->d_length1 = 0; di->d_addr1 = 0;
3251 di->d_length2 = 0; di->d_addr2 = 0;
3252 }
3253#if defined(TULIP_BUS_DMA) && !defined(TULIP_BUS_DMA_NORX)
3254 bus_dmamap_sync(sc->tulip_dmatag, sc->tulip_rxdescmap,
3255 0, sc->tulip_rxdescmap->dm_mapsize,
3256 BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
3257#endif
3258 for (;;) {
3259#if defined(TULIP_BUS_DMA) && !defined(TULIP_BUS_DMA_NORX)
3260 bus_dmamap_t map;
3261#endif
3262 struct mbuf *m;
3263 _IF_DEQUEUE(&sc->tulip_rxq, m);
3264 if (m == NULL)
3265 break;
3266#if defined(TULIP_BUS_DMA) && !defined(TULIP_BUS_DMA_NORX)
3267 map = M_GETCTX(m, bus_dmamap_t);
3268 bus_dmamap_unload(sc->tulip_dmatag, map);
3269 sc->tulip_rxmaps[sc->tulip_rxmaps_free++] = map;
3270#endif
3271 m_freem(m);
3272 }
3273
3274 /*
3275 * If tulip_reset is being called recurisvely, exit quickly knowing
3276 * that when the outer tulip_reset returns all the right stuff will
3277 * have happened.
3278 */
3279 if (inreset)
3280 return;
3281
3282 sc->tulip_intrmask |= TULIP_STS_NORMALINTR|TULIP_STS_RXINTR|TULIP_STS_TXINTR
3283 |TULIP_STS_ABNRMLINTR|TULIP_STS_SYSERROR|TULIP_STS_TXSTOPPED
3284 |TULIP_STS_TXUNDERFLOW|TULIP_STS_TXBABBLE
3285 |TULIP_STS_RXSTOPPED;
3286
3287 if ((sc->tulip_flags & TULIP_DEVICEPROBE) == 0)
3288 (*sc->tulip_boardsw->bd_media_select)(sc);
3289#if defined(TULIP_DEBUG)
3290 if ((sc->tulip_flags & TULIP_NEEDRESET) == TULIP_NEEDRESET)
3291 if_printf(sc->tulip_ifp,
3292 "tulip_reset: additional reset needed?!?\n");
3293#endif
3294 if (bootverbose)
3295 tulip_media_print(sc);
3296 if (sc->tulip_features & TULIP_HAVE_DUALSENSE)
3297 TULIP_CSR_WRITE(sc, csr_sia_status, TULIP_CSR_READ(sc, csr_sia_status));
3298
3299 sc->tulip_flags &= ~(TULIP_DOINGSETUP|TULIP_WANTSETUP|TULIP_INRESET
3300 |TULIP_RXACT);
3301 tulip_addr_filter(sc);
3302}
3303
3304
3305static void
3306tulip_ifinit(
3307 void *arg)
3308{
3309 tulip_softc_t *sc = (tulip_softc_t *)arg;
3310
3311 TULIP_LOCK(sc);
3312 tulip_init(sc);
3313 TULIP_UNLOCK(sc);
3314}
3315
3316static void
3317tulip_init(
3318 tulip_softc_t * const sc)
3319{
3320 if (sc->tulip_ifp->if_flags & IFF_UP) {
3321 if ((sc->tulip_ifp->if_flags & IFF_RUNNING) == 0) {
3322 /* initialize the media */
3323 tulip_reset(sc);
3324 }
3325 sc->tulip_ifp->if_flags |= IFF_RUNNING;
3326 if (sc->tulip_ifp->if_flags & IFF_PROMISC) {
3327 sc->tulip_flags |= TULIP_PROMISC;
3328 sc->tulip_cmdmode |= TULIP_CMD_PROMISCUOUS;
3329 sc->tulip_intrmask |= TULIP_STS_TXINTR;
3330 } else {
3331 sc->tulip_flags &= ~TULIP_PROMISC;
3332 sc->tulip_cmdmode &= ~TULIP_CMD_PROMISCUOUS;
3333 if (sc->tulip_flags & TULIP_ALLMULTI) {
3334 sc->tulip_cmdmode |= TULIP_CMD_ALLMULTI;
3335 } else {
3336 sc->tulip_cmdmode &= ~TULIP_CMD_ALLMULTI;
3337 }
3338 }
3339 sc->tulip_cmdmode |= TULIP_CMD_TXRUN;
3340 if ((sc->tulip_flags & (TULIP_TXPROBE_ACTIVE|TULIP_WANTSETUP)) == 0) {
3341 tulip_rx_intr(sc);
3342 sc->tulip_cmdmode |= TULIP_CMD_RXRUN;
3343 sc->tulip_intrmask |= TULIP_STS_RXSTOPPED;
3344 } else {
3345 sc->tulip_ifp->if_flags |= IFF_OACTIVE;
3346 sc->tulip_cmdmode &= ~TULIP_CMD_RXRUN;
3347 sc->tulip_intrmask &= ~TULIP_STS_RXSTOPPED;
3348 }
3349 TULIP_CSR_WRITE(sc, csr_intr, sc->tulip_intrmask);
3350 TULIP_CSR_WRITE(sc, csr_command, sc->tulip_cmdmode);
3351 if ((sc->tulip_flags & (TULIP_WANTSETUP|TULIP_TXPROBE_ACTIVE)) == TULIP_WANTSETUP)
3352 tulip_txput_setup(sc);
3353 } else {
3354 sc->tulip_ifp->if_flags &= ~IFF_RUNNING;
3355 tulip_reset(sc);
3356 }
3357}
3358
3359static void
3360tulip_rx_intr(
3361 tulip_softc_t * const sc)
3362{
3363 TULIP_PERFSTART(rxintr)
3364 tulip_ringinfo_t * const ri = &sc->tulip_rxinfo;
3365 struct ifnet * const ifp = sc->tulip_ifp;
3366 int fillok = 1;
3367#if defined(TULIP_DEBUG)
3368 int cnt = 0;
3369#endif
3370
3371 TULIP_LOCK_ASSERT(sc);
3372 for (;;) {
3373 TULIP_PERFSTART(rxget)
3374 tulip_desc_t *eop = ri->ri_nextin;
3375 int total_len = 0, last_offset = 0;
3376 struct mbuf *ms = NULL, *me = NULL;
3377 int accept = 0;
3378#if defined(TULIP_BUS_DMA) && !defined(TULIP_BUS_DMA_NORX)
3379 bus_dmamap_t map;
3380 int error;
3381#endif
3382
3383 if (fillok && sc->tulip_rxq.ifq_len < TULIP_RXQ_TARGET)
3384 goto queue_mbuf;
3385
3386#if defined(TULIP_DEBUG)
3387 if (cnt == ri->ri_max)
3388 break;
3389#endif
3390 /*
3391 * If the TULIP has no descriptors, there can't be any receive
3392 * descriptors to process.
3393 */
3394 if (eop == ri->ri_nextout)
3395 break;
3396
3397 /*
3398 * 90% of the packets will fit in one descriptor. So we optimize
3399 * for that case.
3400 */
3401 TULIP_RXDESC_POSTSYNC(sc, eop, sizeof(*eop));
3402 if ((((volatile tulip_desc_t *) eop)->d_status & (TULIP_DSTS_OWNER|TULIP_DSTS_RxFIRSTDESC|TULIP_DSTS_RxLASTDESC)) == (TULIP_DSTS_RxFIRSTDESC|TULIP_DSTS_RxLASTDESC)) {
3403 _IF_DEQUEUE(&sc->tulip_rxq, ms);
3404 me = ms;
3405 } else {
3406 /*
3407 * If still owned by the TULIP, don't touch it.
3408 */
3409 if (((volatile tulip_desc_t *) eop)->d_status & TULIP_DSTS_OWNER)
3410 break;
3411
3412 /*
3413 * It is possible (though improbable unless MCLBYTES < 1518) for
3414 * a received packet to cross more than one receive descriptor.
3415 */
3416 while ((((volatile tulip_desc_t *) eop)->d_status & TULIP_DSTS_RxLASTDESC) == 0) {
3417 if (++eop == ri->ri_last)
3418 eop = ri->ri_first;
3419 TULIP_RXDESC_POSTSYNC(sc, eop, sizeof(*eop));
3420 if (eop == ri->ri_nextout || ((((volatile tulip_desc_t *) eop)->d_status & TULIP_DSTS_OWNER))) {
3421#if defined(TULIP_DEBUG)
3422 sc->tulip_dbg.dbg_rxintrs++;
3423 sc->tulip_dbg.dbg_rxpktsperintr[cnt]++;
3424#endif
3425 TULIP_PERFEND(rxget);
3426 TULIP_PERFEND(rxintr);
3427 return;
3428 }
3429 total_len++;
3430 }
3431
3432 /*
3433 * Dequeue the first buffer for the start of the packet. Hopefully
3434 * this will be the only one we need to dequeue. However, if the
3435 * packet consumed multiple descriptors, then we need to dequeue
3436 * those buffers and chain to the starting mbuf. All buffers but
3437 * the last buffer have the same length so we can set that now.
3438 * (we add to last_offset instead of multiplying since we normally
3439 * won't go into the loop and thereby saving ourselves from
3440 * doing a multiplication by 0 in the normal case).
3441 */
3442 _IF_DEQUEUE(&sc->tulip_rxq, ms);
3443 for (me = ms; total_len > 0; total_len--) {
3444#if defined(TULIP_BUS_DMA) && !defined(TULIP_BUS_DMA_NORX)
3445 map = M_GETCTX(me, bus_dmamap_t);
3446 TULIP_RXMAP_POSTSYNC(sc, map);
3447 bus_dmamap_unload(sc->tulip_dmatag, map);
3448 sc->tulip_rxmaps[sc->tulip_rxmaps_free++] = map;
3449#if defined(DIAGNOSTIC)
3450 M_SETCTX(me, NULL);
3451#endif
3452#endif /* TULIP_BUS_DMA */
3453 me->m_len = TULIP_RX_BUFLEN;
3454 last_offset += TULIP_RX_BUFLEN;
3455 _IF_DEQUEUE(&sc->tulip_rxq, me->m_next);
3456 me = me->m_next;
3457 }
3458 }
3459
3460 /*
3461 * Now get the size of received packet (minus the CRC).
3462 */
3463 total_len = ((eop->d_status >> 16) & 0x7FFF) - 4;
3464 if ((sc->tulip_flags & TULIP_RXIGNORE) == 0
3465 && ((eop->d_status & TULIP_DSTS_ERRSUM) == 0)) {
3466 me->m_len = total_len - last_offset;
3467
3468#if defined(TULIP_BUS_DMA) && !defined(TULIP_BUS_DMA_NORX)
3469 map = M_GETCTX(me, bus_dmamap_t);
3470 bus_dmamap_sync(sc->tulip_dmatag, map, 0, me->m_len,
3471 BUS_DMASYNC_POSTREAD|BUS_DMASYNC_POSTWRITE);
3472 bus_dmamap_unload(sc->tulip_dmatag, map);
3473 sc->tulip_rxmaps[sc->tulip_rxmaps_free++] = map;
3474#if defined(DIAGNOSTIC)
3475 M_SETCTX(me, NULL);
3476#endif
3477#endif /* TULIP_BUS_DMA */
3478
3479 sc->tulip_flags |= TULIP_RXACT;
3480 accept = 1;
3481 } else {
3482 ifp->if_ierrors++;
3483 if (eop->d_status & (TULIP_DSTS_RxBADLENGTH|TULIP_DSTS_RxOVERFLOW|TULIP_DSTS_RxWATCHDOG)) {
3484 sc->tulip_dot3stats.dot3StatsInternalMacReceiveErrors++;
3485 } else {
3486#if defined(TULIP_VERBOSE)
3487 const char *error = NULL;
3488#endif
3489 if (eop->d_status & TULIP_DSTS_RxTOOLONG) {
3490 sc->tulip_dot3stats.dot3StatsFrameTooLongs++;
3491#if defined(TULIP_VERBOSE)
3492 error = "frame too long";
3493#endif
3494 }
3495 if (eop->d_status & TULIP_DSTS_RxBADCRC) {
3496 if (eop->d_status & TULIP_DSTS_RxDRBBLBIT) {
3497 sc->tulip_dot3stats.dot3StatsAlignmentErrors++;
3498#if defined(TULIP_VERBOSE)
3499 error = "alignment error";
3500#endif
3501 } else {
3502 sc->tulip_dot3stats.dot3StatsFCSErrors++;
3503#if defined(TULIP_VERBOSE)
3504 error = "bad crc";
3505#endif
3506 }
3507 }
3508#if defined(TULIP_VERBOSE)
3509 if (error != NULL && (sc->tulip_flags & TULIP_NOMESSAGES) == 0) {
3510 if_printf(sc->tulip_ifp, "receive: %6D: %s\n",
3511 mtod(ms, u_char *) + 6, ":",
3512 error);
3513 sc->tulip_flags |= TULIP_NOMESSAGES;
3514 }
3515#endif
3516 }
3517
3518#if defined(TULIP_BUS_DMA) && !defined(TULIP_BUS_DMA_NORX)
3519 map = M_GETCTX(me, bus_dmamap_t);
3520 bus_dmamap_unload(sc->tulip_dmatag, map);
3521 sc->tulip_rxmaps[sc->tulip_rxmaps_free++] = map;
3522#if defined(DIAGNOSTIC)
3523 M_SETCTX(me, NULL);
3524#endif
3525#endif /* TULIP_BUS_DMA */
3526 }
3527#if defined(TULIP_DEBUG)
3528 cnt++;
3529#endif
3530 ifp->if_ipackets++;
3531 if (++eop == ri->ri_last)
3532 eop = ri->ri_first;
3533 ri->ri_nextin = eop;
3534 queue_mbuf:
3535 /*
3536 * Either we are priming the TULIP with mbufs (m == NULL)
3537 * or we are about to accept an mbuf for the upper layers
3538 * so we need to allocate an mbuf to replace it. If we
3539 * can't replace it, send up it anyways. This may cause
3540 * us to drop packets in the future but that's better than
3541 * being caught in livelock.
3542 *
3543 * Note that if this packet crossed multiple descriptors
3544 * we don't even try to reallocate all the mbufs here.
3545 * Instead we rely on the test of the beginning of
3546 * the loop to refill for the extra consumed mbufs.
3547 */
3548 if (accept || ms == NULL) {
3549 struct mbuf *m0;
3550 MGETHDR(m0, M_DONTWAIT, MT_DATA);
3551 if (m0 != NULL) {
3552#if defined(TULIP_COPY_RXDATA)
3553 if (!accept || total_len >= (MHLEN - 2)) {
3554#endif
3555 MCLGET(m0, M_DONTWAIT);
3556 if ((m0->m_flags & M_EXT) == 0) {
3557 m_freem(m0);
3558 m0 = NULL;
3559 }
3560#if defined(TULIP_COPY_RXDATA)
3561 }
3562#endif
3563 }
3564 if (accept
3565#if defined(TULIP_COPY_RXDATA)
3566 && m0 != NULL
3567#endif
3568 ) {
3569 TULIP_UNLOCK(sc);
3570#if !defined(TULIP_COPY_RXDATA)
3571 ms->m_pkthdr.len = total_len;
3572 ms->m_pkthdr.rcvif = ifp;
3573 (*ifp->if_input)(ifp, ms);
3574#else
3575 m0->m_data += 2; /* align data after header */
3576 m_copydata(ms, 0, total_len, mtod(m0, caddr_t));
3577 m0->m_len = m0->m_pkthdr.len = total_len;
3578 m0->m_pkthdr.rcvif = ifp;
3579 (*ifp->if_input)(ifp, m0);
3580 m0 = ms;
3581#endif /* ! TULIP_COPY_RXDATA */
3582 TULIP_LOCK(sc);
3583 }
3584 ms = m0;
3585 }
3586 if (ms == NULL) {
3587 /*
3588 * Couldn't allocate a new buffer. Don't bother
3589 * trying to replenish the receive queue.
3590 */
3591 fillok = 0;
3592 sc->tulip_flags |= TULIP_RXBUFSLOW;
3593#if defined(TULIP_DEBUG)
3594 sc->tulip_dbg.dbg_rxlowbufs++;
3595#endif
3596 TULIP_PERFEND(rxget);
3597 continue;
3598 }
3599 /*
3600 * Now give the buffer(s) to the TULIP and save in our
3601 * receive queue.
3602 */
3603 do {
3604 tulip_desc_t * const nextout = ri->ri_nextout;
3605#if defined(TULIP_BUS_DMA) && !defined(TULIP_BUS_DMA_NORX)
3606 if (sc->tulip_rxmaps_free > 0) {
3607 map = sc->tulip_rxmaps[--sc->tulip_rxmaps_free];
3608 } else {
3609 m_freem(ms);
3610 sc->tulip_flags |= TULIP_RXBUFSLOW;
3611#if defined(TULIP_DEBUG)
3612 sc->tulip_dbg.dbg_rxlowbufs++;
3613#endif
3614 break;
3615 }
3616 M_SETCTX(ms, map);
3617 error = bus_dmamap_load(sc->tulip_dmatag, map, mtod(ms, void *),
3618 TULIP_RX_BUFLEN, NULL, BUS_DMA_NOWAIT);
3619 if (error) {
3620 if_printf(sc->tulip_ifp,
3621 "unable to load rx map, error = %d\n", error);
3622 panic("tulip_rx_intr"); /* XXX */
3623 }
3624 nextout->d_addr1 = map->dm_segs[0].ds_addr;
3625 nextout->d_length1 = map->dm_segs[0].ds_len;
3626 if (map->dm_nsegs == 2) {
3627 nextout->d_addr2 = map->dm_segs[1].ds_addr;
3628 nextout->d_length2 = map->dm_segs[1].ds_len;
3629 } else {
3630 nextout->d_addr2 = 0;
3631 nextout->d_length2 = 0;
3632 }
3633 TULIP_RXDESC_POSTSYNC(sc, nextout, sizeof(*nextout));
3634#else /* TULIP_BUS_DMA */
3635 nextout->d_addr1 = TULIP_KVATOPHYS(sc, mtod(ms, caddr_t));
3636 nextout->d_length1 = TULIP_RX_BUFLEN;
3637#endif /* TULIP_BUS_DMA */
3638 nextout->d_status = TULIP_DSTS_OWNER;
3639 TULIP_RXDESC_POSTSYNC(sc, nextout, sizeof(u_int32_t));
3640 if (++ri->ri_nextout == ri->ri_last)
3641 ri->ri_nextout = ri->ri_first;
3642 me = ms->m_next;
3643 ms->m_next = NULL;
3644 _IF_ENQUEUE(&sc->tulip_rxq, ms);
3645 } while ((ms = me) != NULL);
3646
3647 if (sc->tulip_rxq.ifq_len >= TULIP_RXQ_TARGET)
3648 sc->tulip_flags &= ~TULIP_RXBUFSLOW;
3649 TULIP_PERFEND(rxget);
3650 }
3651
3652#if defined(TULIP_DEBUG)
3653 sc->tulip_dbg.dbg_rxintrs++;
3654 sc->tulip_dbg.dbg_rxpktsperintr[cnt]++;
3655#endif
3656 TULIP_PERFEND(rxintr);
3657}
3658
3659static int
3660tulip_tx_intr(
3661 tulip_softc_t * const sc)
3662{
3663 TULIP_PERFSTART(txintr)
3664 tulip_ringinfo_t * const ri = &sc->tulip_txinfo;
3665 struct mbuf *m;
3666 int xmits = 0;
3667 int descs = 0;
3668
3669 TULIP_LOCK_ASSERT(sc);
3670 while (ri->ri_free < ri->ri_max) {
3671 u_int32_t d_flag;
3672
3673 TULIP_TXDESC_POSTSYNC(sc, ri->ri_nextin, sizeof(*ri->ri_nextin));
3674 if (((volatile tulip_desc_t *) ri->ri_nextin)->d_status & TULIP_DSTS_OWNER)
3675 break;
3676
3677 ri->ri_free++;
3678 descs++;
3679 d_flag = ri->ri_nextin->d_flag;
3680 if (d_flag & TULIP_DFLAG_TxLASTSEG) {
3681 if (d_flag & TULIP_DFLAG_TxSETUPPKT) {
3682 /*
3683 * We've just finished processing a setup packet.
3684 * Mark that we finished it. If there's not
3685 * another pending, startup the TULIP receiver.
3686 * Make sure we ack the RXSTOPPED so we won't get
3687 * an abormal interrupt indication.
3688 */
3689 TULIP_TXMAP_POSTSYNC(sc, sc->tulip_setupmap);
3690 sc->tulip_flags &= ~(TULIP_DOINGSETUP|TULIP_HASHONLY);
3691 if (ri->ri_nextin->d_flag & TULIP_DFLAG_TxINVRSFILT)
3692 sc->tulip_flags |= TULIP_HASHONLY;
3693 if ((sc->tulip_flags & (TULIP_WANTSETUP|TULIP_TXPROBE_ACTIVE)) == 0) {
3694 tulip_rx_intr(sc);
3695 sc->tulip_cmdmode |= TULIP_CMD_RXRUN;
3696 sc->tulip_intrmask |= TULIP_STS_RXSTOPPED;
3697 TULIP_CSR_WRITE(sc, csr_status, TULIP_STS_RXSTOPPED);
3698 TULIP_CSR_WRITE(sc, csr_intr, sc->tulip_intrmask);
3699 TULIP_CSR_WRITE(sc, csr_command, sc->tulip_cmdmode);
3700 }
3701 } else {
3702 const u_int32_t d_status = ri->ri_nextin->d_status;
3703 _IF_DEQUEUE(&sc->tulip_txq, m);
3704 if (m != NULL) {
3705#if defined(TULIP_BUS_DMA) && !defined(TULIP_BUS_DMA_NOTX)
3706 bus_dmamap_t map = M_GETCTX(m, bus_dmamap_t);
3707 TULIP_TXMAP_POSTSYNC(sc, map);
3708 sc->tulip_txmaps[sc->tulip_txmaps_free++] = map;
3709#endif /* TULIP_BUS_DMA */
3710 m_freem(m);
3711#if defined(TULIP_DEBUG)
3712 } else {
3713 if_printf(sc->tulip_ifp,
3714 "tx_intr: failed to dequeue mbuf?!?\n");
3715#endif
3716 }
3717 if (sc->tulip_flags & TULIP_TXPROBE_ACTIVE) {
3718 tulip_mediapoll_event_t event = TULIP_MEDIAPOLL_TXPROBE_OK;
3719 if (d_status & (TULIP_DSTS_TxNOCARR|TULIP_DSTS_TxEXCCOLL)) {
3720#if defined(TULIP_DEBUG)
3721 if (d_status & TULIP_DSTS_TxNOCARR)
3722 sc->tulip_dbg.dbg_txprobe_nocarr++;
3723 if (d_status & TULIP_DSTS_TxEXCCOLL)
3724 sc->tulip_dbg.dbg_txprobe_exccoll++;
3725#endif
3726 event = TULIP_MEDIAPOLL_TXPROBE_FAILED;
3727 }
3728 (*sc->tulip_boardsw->bd_media_poll)(sc, event);
3729 /*
3730 * Escape from the loop before media poll has reset the TULIP!
3731 */
3732 break;
3733 } else {
3734 xmits++;
3735 if (d_status & TULIP_DSTS_ERRSUM) {
3736 sc->tulip_ifp->if_oerrors++;
3737 if (d_status & TULIP_DSTS_TxEXCCOLL)
3738 sc->tulip_dot3stats.dot3StatsExcessiveCollisions++;
3739 if (d_status & TULIP_DSTS_TxLATECOLL)
3740 sc->tulip_dot3stats.dot3StatsLateCollisions++;
3741 if (d_status & (TULIP_DSTS_TxNOCARR|TULIP_DSTS_TxCARRLOSS))
3742 sc->tulip_dot3stats.dot3StatsCarrierSenseErrors++;
3743 if (d_status & (TULIP_DSTS_TxUNDERFLOW|TULIP_DSTS_TxBABBLE))
3744 sc->tulip_dot3stats.dot3StatsInternalMacTransmitErrors++;
3745 if (d_status & TULIP_DSTS_TxUNDERFLOW)
3746 sc->tulip_dot3stats.dot3StatsInternalTransmitUnderflows++;
3747 if (d_status & TULIP_DSTS_TxBABBLE)
3748 sc->tulip_dot3stats.dot3StatsInternalTransmitBabbles++;
3749 } else {
3750 u_int32_t collisions =
3751 (d_status & TULIP_DSTS_TxCOLLMASK)
3752 >> TULIP_DSTS_V_TxCOLLCNT;
3753 sc->tulip_ifp->if_collisions += collisions;
3754 if (collisions == 1)
3755 sc->tulip_dot3stats.dot3StatsSingleCollisionFrames++;
3756 else if (collisions > 1)
3757 sc->tulip_dot3stats.dot3StatsMultipleCollisionFrames++;
3758 else if (d_status & TULIP_DSTS_TxDEFERRED)
3759 sc->tulip_dot3stats.dot3StatsDeferredTransmissions++;
3760 /*
3761 * SQE is only valid for 10baseT/BNC/AUI when not
3762 * running in full-duplex. In order to speed up the
3763 * test, the corresponding bit in tulip_flags needs to
3764 * set as well to get us to count SQE Test Errors.
3765 */
3766 if (d_status & TULIP_DSTS_TxNOHRTBT & sc->tulip_flags)
3767 sc->tulip_dot3stats.dot3StatsSQETestErrors++;
3768 }
3769 }
3770 }
3771 }
3772
3773 if (++ri->ri_nextin == ri->ri_last)
3774 ri->ri_nextin = ri->ri_first;
3775
3776 if ((sc->tulip_flags & TULIP_TXPROBE_ACTIVE) == 0)
3777 sc->tulip_ifp->if_flags &= ~IFF_OACTIVE;
3778 }
3779 /*
3780 * If nothing left to transmit, disable the timer.
3781 * Else if progress, reset the timer back to 2 ticks.
3782 */
3783 if (ri->ri_free == ri->ri_max || (sc->tulip_flags & TULIP_TXPROBE_ACTIVE))
3784 sc->tulip_txtimer = 0;
3785 else if (xmits > 0)
3786 sc->tulip_txtimer = TULIP_TXTIMER;
3787 sc->tulip_ifp->if_opackets += xmits;
3788 TULIP_PERFEND(txintr);
3789 return descs;
3790}
3791
3792static void
3793tulip_print_abnormal_interrupt(
3794 tulip_softc_t * const sc,
3795 u_int32_t csr)
3796{
3797 const char * const *msgp = tulip_status_bits;
3798 const char *sep;
3799 u_int32_t mask;
3800 const char thrsh[] = "72|128\0\0\0" "96|256\0\0\0" "128|512\0\0" "160|1024";
3801
3802 TULIP_LOCK_ASSERT(sc);
3803 csr &= (1 << (sizeof(tulip_status_bits)/sizeof(tulip_status_bits[0]))) - 1;
3804 if_printf(sc->tulip_ifp, "abnormal interrupt:");
3805 for (sep = " ", mask = 1; mask <= csr; mask <<= 1, msgp++) {
3806 if ((csr & mask) && *msgp != NULL) {
3807 printf("%s%s", sep, *msgp);
3808 if (mask == TULIP_STS_TXUNDERFLOW && (sc->tulip_flags & TULIP_NEWTXTHRESH)) {
3809 sc->tulip_flags &= ~TULIP_NEWTXTHRESH;
3810 if (sc->tulip_cmdmode & TULIP_CMD_STOREFWD) {
3811 printf(" (switching to store-and-forward mode)");
3812 } else {
3813 printf(" (raising TX threshold to %s)",
3814 &thrsh[9 * ((sc->tulip_cmdmode & TULIP_CMD_THRESHOLDCTL) >> 14)]);
3815 }
3816 }
3817 sep = ", ";
3818 }
3819 }
3820 printf("\n");
3821}
3822
3823static void
3824tulip_intr_handler(
3825 tulip_softc_t * const sc)
3826{
3827 TULIP_PERFSTART(intr)
3828 u_int32_t csr;
3829
3830 TULIP_LOCK_ASSERT(sc);
3831 while ((csr = TULIP_CSR_READ(sc, csr_status)) & sc->tulip_intrmask) {
3832 TULIP_CSR_WRITE(sc, csr_status, csr);
3833
3834 if (csr & TULIP_STS_SYSERROR) {
3835 sc->tulip_last_system_error = (csr & TULIP_STS_ERRORMASK) >> TULIP_STS_ERR_SHIFT;
3836 if (sc->tulip_flags & TULIP_NOMESSAGES) {
3837 sc->tulip_flags |= TULIP_SYSTEMERROR;
3838 } else {
3839 if_printf(sc->tulip_ifp, "system error: %s\n",
3840 tulip_system_errors[sc->tulip_last_system_error]);
3841 }
3842 sc->tulip_flags |= TULIP_NEEDRESET;
3843 sc->tulip_system_errors++;
3844 break;
3845 }
3846 if (csr & (TULIP_STS_LINKPASS|TULIP_STS_LINKFAIL) & sc->tulip_intrmask) {
3847#if defined(TULIP_DEBUG)
3848 sc->tulip_dbg.dbg_link_intrs++;
3849#endif
3850 if (sc->tulip_boardsw->bd_media_poll != NULL) {
3851 (*sc->tulip_boardsw->bd_media_poll)(sc, csr & TULIP_STS_LINKFAIL
3852 ? TULIP_MEDIAPOLL_LINKFAIL
3853 : TULIP_MEDIAPOLL_LINKPASS);
3854 csr &= ~TULIP_STS_ABNRMLINTR;
3855 }
3856 tulip_media_print(sc);
3857 }
3858 if (csr & (TULIP_STS_RXINTR|TULIP_STS_RXNOBUF)) {
3859 u_int32_t misses = TULIP_CSR_READ(sc, csr_missed_frames);
3860 if (csr & TULIP_STS_RXNOBUF)
3861 sc->tulip_dot3stats.dot3StatsMissedFrames += misses & 0xFFFF;
3862 /*
3863 * Pass 2.[012] of the 21140A-A[CDE] may hang and/or corrupt data
3864 * on receive overflows.
3865 */
3866 if ((misses & 0x0FFE0000) && (sc->tulip_features & TULIP_HAVE_RXBADOVRFLW)) {
3867 sc->tulip_dot3stats.dot3StatsInternalMacReceiveErrors++;
3868 /*
3869 * Stop the receiver process and spin until it's stopped.
3870 * Tell rx_intr to drop the packets it dequeues.
3871 */
3872 TULIP_CSR_WRITE(sc, csr_command, sc->tulip_cmdmode & ~TULIP_CMD_RXRUN);
3873 while ((TULIP_CSR_READ(sc, csr_status) & TULIP_STS_RXSTOPPED) == 0)
3874 ;
3875 TULIP_CSR_WRITE(sc, csr_status, TULIP_STS_RXSTOPPED);
3876 sc->tulip_flags |= TULIP_RXIGNORE;
3877 }
3878 tulip_rx_intr(sc);
3879 if (sc->tulip_flags & TULIP_RXIGNORE) {
3880 /*
3881 * Restart the receiver.
3882 */
3883 sc->tulip_flags &= ~TULIP_RXIGNORE;
3884 TULIP_CSR_WRITE(sc, csr_command, sc->tulip_cmdmode);
3885 }
3886 }
3887 if (csr & TULIP_STS_ABNRMLINTR) {
3888 u_int32_t tmp = csr & sc->tulip_intrmask
3889 & ~(TULIP_STS_NORMALINTR|TULIP_STS_ABNRMLINTR);
3890 if (csr & TULIP_STS_TXUNDERFLOW) {
3891 if ((sc->tulip_cmdmode & TULIP_CMD_THRESHOLDCTL) != TULIP_CMD_THRSHLD160) {
3892 sc->tulip_cmdmode += TULIP_CMD_THRSHLD96;
3893 sc->tulip_flags |= TULIP_NEWTXTHRESH;
3894 } else if (sc->tulip_features & TULIP_HAVE_STOREFWD) {
3895 sc->tulip_cmdmode |= TULIP_CMD_STOREFWD;
3896 sc->tulip_flags |= TULIP_NEWTXTHRESH;
3897 }
3898 }
3899 if (sc->tulip_flags & TULIP_NOMESSAGES) {
3900 sc->tulip_statusbits |= tmp;
3901 } else {
3902 tulip_print_abnormal_interrupt(sc, tmp);
3903 sc->tulip_flags |= TULIP_NOMESSAGES;
3904 }
3905 TULIP_CSR_WRITE(sc, csr_command, sc->tulip_cmdmode);
3906 }
3907 if (sc->tulip_flags & (TULIP_WANTTXSTART|TULIP_TXPROBE_ACTIVE|TULIP_DOINGSETUP|TULIP_PROMISC)) {
3908 tulip_tx_intr(sc);
3909 if ((sc->tulip_flags & TULIP_TXPROBE_ACTIVE) == 0)
3910 tulip_ifstart(sc->tulip_ifp);
3911 }
3912 }
3913 if (sc->tulip_flags & TULIP_NEEDRESET) {
3914 tulip_reset(sc);
3915 tulip_init(sc);
3916 }
3917 TULIP_PERFEND(intr);
3918}
3919
3920static void
3921tulip_intr_shared(
3922 void *arg)
3923{
3924 tulip_softc_t * sc = arg;
3925
3926 for (; sc != NULL; sc = sc->tulip_slaves) {
3927 TULIP_LOCK(sc);
3928#if defined(TULIP_DEBUG)
3929 sc->tulip_dbg.dbg_intrs++;
3930#endif
3931 tulip_intr_handler(sc);
3932 TULIP_UNLOCK(sc);
3933 }
3934}
3935
3936static void
3937tulip_intr_normal(
3938 void *arg)
3939{
3940 tulip_softc_t * sc = (tulip_softc_t *) arg;
3941
3942 TULIP_LOCK(sc);
3943#if defined(TULIP_DEBUG)
3944 sc->tulip_dbg.dbg_intrs++;
3945#endif
3946 tulip_intr_handler(sc);
3947 TULIP_UNLOCK(sc);
3948}
3949
3950static struct mbuf *
3951tulip_mbuf_compress(
3952 struct mbuf *m)
3953{
3954 struct mbuf *m0;
3955
3956#if MCLBYTES >= ETHERMTU + 18
3957 MGETHDR(m0, M_DONTWAIT, MT_DATA);
3958 if (m0 != NULL) {
3959 if (m->m_pkthdr.len > MHLEN) {
3960 MCLGET(m0, M_DONTWAIT);
3961 if ((m0->m_flags & M_EXT) == 0) {
3962 m_freem(m);
3963 m_freem(m0);
3964 return NULL;
3965 }
3966 }
3967 m_copydata(m, 0, m->m_pkthdr.len, mtod(m0, caddr_t));
3968 m0->m_pkthdr.len = m0->m_len = m->m_pkthdr.len;
3969 }
3970#else
3971 int mlen = MHLEN;
3972 int len = m->m_pkthdr.len;
3973 struct mbuf **mp = &m0;
3974
3975 while (len > 0) {
3976 if (mlen == MHLEN) {
3977 MGETHDR(*mp, M_DONTWAIT, MT_DATA);
3978 } else {
3979 MGET(*mp, M_DONTWAIT, MT_DATA);
3980 }
3981 if (*mp == NULL) {
3982 m_freem(m0);
3983 m0 = NULL;
3984 break;
3985 }
3986 if (len > MLEN) {
3987 MCLGET(*mp, M_DONTWAIT);
3988 if (((*mp)->m_flags & M_EXT) == 0) {
3989 m_freem(m0);
3990 m0 = NULL;
3991 break;
3992 }
3993 (*mp)->m_len = len <= MCLBYTES ? len : MCLBYTES;
3994 } else {
3995 (*mp)->m_len = len <= mlen ? len : mlen;
3996 }
3997 m_copydata(m, m->m_pkthdr.len - len,
3998 (*mp)->m_len, mtod((*mp), caddr_t));
3999 len -= (*mp)->m_len;
4000 mp = &(*mp)->m_next;
4001 mlen = MLEN;
4002 }
4003#endif
4004 m_freem(m);
4005 return m0;
4006}
4007
4008static struct mbuf *
4009tulip_txput(
4010 tulip_softc_t * const sc,
4011 struct mbuf *m)
4012{
4013 TULIP_PERFSTART(txput)
4014 tulip_ringinfo_t * const ri = &sc->tulip_txinfo;
4015 tulip_desc_t *eop, *nextout;
4016 int segcnt, free;
4017 u_int32_t d_status;
4018#if defined(TULIP_BUS_DMA) && !defined(TULIP_BUS_DMA_NOTX)
4019 bus_dmamap_t map;
4020 int error;
4021#else
4022 struct mbuf *m0;
4023#endif
4024
4025 TULIP_LOCK_ASSERT(sc);
4026#if defined(TULIP_DEBUG)
4027 if ((sc->tulip_cmdmode & TULIP_CMD_TXRUN) == 0) {
4028 if_printf(sc->tulip_ifp, "txput%s: tx not running\n",
4029 (sc->tulip_flags & TULIP_TXPROBE_ACTIVE) ? "(probe)" : "");
4030 sc->tulip_flags |= TULIP_WANTTXSTART;
4031 sc->tulip_dbg.dbg_txput_finishes[0]++;
4032 goto finish;
4033 }
4034#endif
4035
4036 /*
4037 * Now we try to fill in our transmit descriptors. This is
4038 * a bit reminiscent of going on the Ark two by two
4039 * since each descriptor for the TULIP can describe
4040 * two buffers. So we advance through packet filling
4041 * each of the two entries at a time to to fill each
4042 * descriptor. Clear the first and last segment bits
4043 * in each descriptor (actually just clear everything
4044 * but the end-of-ring or chain bits) to make sure
4045 * we don't get messed up by previously sent packets.
4046 *
4047 * We may fail to put the entire packet on the ring if
4048 * there is either not enough ring entries free or if the
4049 * packet has more than MAX_TXSEG segments. In the former
4050 * case we will just wait for the ring to empty. In the
4051 * latter case we have to recopy.
4052 */
4053#if !defined(TULIP_BUS_DMA) || defined(TULIP_BUS_DMA_NOTX)
4054 again:
4055 m0 = m;
4056#endif
4057 d_status = 0;
4058 eop = nextout = ri->ri_nextout;
4059 segcnt = 0;
4060 free = ri->ri_free;
4061
4062#if defined(TULIP_BUS_DMA) && !defined(TULIP_BUS_DMA_NOTX)
4063 /*
4064 * Reclaim some dma maps from if we are out.
4065 */
4066 if (sc->tulip_txmaps_free == 0) {
4067#if defined(TULIP_DEBUG)
4068 sc->tulip_dbg.dbg_no_txmaps++;
4069#endif
4070 free += tulip_tx_intr(sc);
4071 }
4072 if (sc->tulip_txmaps_free > 0) {
4073 map = sc->tulip_txmaps[sc->tulip_txmaps_free-1];
4074 } else {
4075 sc->tulip_flags |= TULIP_WANTTXSTART;
4076#if defined(TULIP_DEBUG)
4077 sc->tulip_dbg.dbg_txput_finishes[1]++;
4078#endif
4079 goto finish;
4080 }
4081 error = bus_dmamap_load_mbuf(sc->tulip_dmatag, map, m, BUS_DMA_NOWAIT);
4082 if (error != 0) {
4083 if (error == EFBIG) {
4084 /*
4085 * The packet exceeds the number of transmit buffer
4086 * entries that we can use for one packet, so we have
4087 * to recopy it into one mbuf and then try again.
4088 */
4089 m = tulip_mbuf_compress(m);
4090 if (m == NULL) {
4091#if defined(TULIP_DEBUG)
4092 sc->tulip_dbg.dbg_txput_finishes[2]++;
4093#endif
4094 goto finish;
4095 }
4096 error = bus_dmamap_load_mbuf(sc->tulip_dmatag, map, m, BUS_DMA_NOWAIT);
4097 }
4098 if (error != 0) {
4099 if_printf(sc->tulip_ifp,
4100 "unable to load tx map, error = %d\n", error);
4101#if defined(TULIP_DEBUG)
4102 sc->tulip_dbg.dbg_txput_finishes[3]++;
4103#endif
4104 goto finish;
4105 }
4106 }
4107 if ((free -= (map->dm_nsegs + 1) / 2) <= 0
4108 /*
4109 * See if there's any unclaimed space in the transmit ring.
4110 */
4111 && (free += tulip_tx_intr(sc)) <= 0) {
4112 /*
4113 * There's no more room but since nothing
4114 * has been committed at this point, just
4115 * show output is active, put back the
4116 * mbuf and return.
4117 */
4118 sc->tulip_flags |= TULIP_WANTTXSTART;
4119#if defined(TULIP_DEBUG)
4120 sc->tulip_dbg.dbg_txput_finishes[4]++;
4121#endif
4122 bus_dmamap_unload(sc->tulip_dmatag, map);
4123 goto finish;
4124 }
4125 for (; map->dm_nsegs - segcnt > 1; segcnt += 2) {
4126 eop = nextout;
4127 eop->d_flag &= TULIP_DFLAG_ENDRING|TULIP_DFLAG_CHAIN;
4128 eop->d_status = d_status;
4129 eop->d_addr1 = map->dm_segs[segcnt].ds_addr;
4130 eop->d_length1 = map->dm_segs[segcnt].ds_len;
4131 eop->d_addr2 = map->dm_segs[segcnt+1].ds_addr;
4132 eop->d_length2 = map->dm_segs[segcnt+1].ds_len;
4133 d_status = TULIP_DSTS_OWNER;
4134 if (++nextout == ri->ri_last)
4135 nextout = ri->ri_first;
4136 }
4137 if (segcnt < map->dm_nsegs) {
4138 eop = nextout;
4139 eop->d_flag &= TULIP_DFLAG_ENDRING|TULIP_DFLAG_CHAIN;
4140 eop->d_status = d_status;
4141 eop->d_addr1 = map->dm_segs[segcnt].ds_addr;
4142 eop->d_length1 = map->dm_segs[segcnt].ds_len;
4143 eop->d_addr2 = 0;
4144 eop->d_length2 = 0;
4145 if (++nextout == ri->ri_last)
4146 nextout = ri->ri_first;
4147 }
4148 TULIP_TXMAP_PRESYNC(sc, map);
4149 M_SETCTX(m, map);
4150 map = NULL;
4151 --sc->tulip_txmaps_free; /* commit to using the dmamap */
4152
4153#else /* !TULIP_BUS_DMA */
4154
4155 do {
4156 int len = m0->m_len;
4157 caddr_t addr = mtod(m0, caddr_t);
4158 unsigned clsize = PAGE_SIZE - (((uintptr_t) addr) & (PAGE_SIZE-1));
4159
4160 while (len > 0) {
4161 unsigned slen = min(len, clsize);
4162 segcnt++;
4163 if (segcnt > TULIP_MAX_TXSEG) {
4164 /*
4165 * The packet exceeds the number of transmit buffer
4166 * entries that we can use for one packet, so we have
4167 * recopy it into one mbuf and then try again.
4168 */
4169 m = tulip_mbuf_compress(m);
4170 if (m == NULL)
4171 goto finish;
4172 goto again;
4173 }
4174 if (segcnt & 1) {
4175 if (--free == 0) {
4176 /*
4177 * See if there's any unclaimed space in the
4178 * transmit ring.
4179 */
4180 if ((free += tulip_tx_intr(sc)) == 0) {
4181 /*
4182 * There's no more room but since nothing
4183 * has been committed at this point, just
4184 * show output is active, put back the
4185 * mbuf and return.
4186 */
4187 sc->tulip_flags |= TULIP_WANTTXSTART;
4188#if defined(TULIP_DEBUG)
4189 sc->tulip_dbg.dbg_txput_finishes[1]++;
4190#endif
4191 goto finish;
4192 }
4193 }
4194 eop = nextout;
4195 if (++nextout == ri->ri_last)
4196 nextout = ri->ri_first;
4197 eop->d_flag &= TULIP_DFLAG_ENDRING|TULIP_DFLAG_CHAIN;
4198 eop->d_status = d_status;
4199 eop->d_addr1 = TULIP_KVATOPHYS(sc, addr);
4200 eop->d_length1 = slen;
4201 } else {
4202 /*
4203 * Fill in second half of descriptor
4204 */
4205 eop->d_addr2 = TULIP_KVATOPHYS(sc, addr);
4206 eop->d_length2 = slen;
4207 }
4208 d_status = TULIP_DSTS_OWNER;
4209 len -= slen;
4210 addr += slen;
4211 clsize = PAGE_SIZE;
4212 }
4213 } while ((m0 = m0->m_next) != NULL);
4214#endif /* TULIP_BUS_DMA */
4215
4216 /*
4217 * bounce a copy to the bpf listener, if any.
4218 */
4219 BPF_MTAP(sc->tulip_ifp, m);
4220
4221 /*
4222 * The descriptors have been filled in. Now get ready
4223 * to transmit.
4224 */
4225 _IF_ENQUEUE(&sc->tulip_txq, m);
4226 m = NULL;
4227
4228 /*
4229 * Make sure the next descriptor after this packet is owned
4230 * by us since it may have been set up above if we ran out
4231 * of room in the ring.
4232 */
4233 nextout->d_status = 0;
4234 TULIP_TXDESC_PRESYNC(sc, nextout, sizeof(u_int32_t));
4235
4236#if !defined(TULIP_BUS_DMA) || defined(TULIP_BUS_DMA_NOTX)
4237 /*
4238 * If we only used the first segment of the last descriptor,
4239 * make sure the second segment will not be used.
4240 */
4241 if (segcnt & 1) {
4242 eop->d_addr2 = 0;
4243 eop->d_length2 = 0;
4244 }
4245#endif /* TULIP_BUS_DMA */
4246
4247 /*
4248 * Mark the last and first segments, indicate we want a transmit
4249 * complete interrupt, and tell it to transmit!
4250 */
4251 eop->d_flag |= TULIP_DFLAG_TxLASTSEG|TULIP_DFLAG_TxWANTINTR;
4252
4253 /*
4254 * Note that ri->ri_nextout is still the start of the packet
4255 * and until we set the OWNER bit, we can still back out of
4256 * everything we have done.
4257 */
4258 ri->ri_nextout->d_flag |= TULIP_DFLAG_TxFIRSTSEG;
4259#if defined(TULIP_BUS_MAP) && !defined(TULIP_BUS_DMA_NOTX)
4260 if (eop < ri->ri_nextout) {
4261 TULIP_TXDESC_PRESYNC(sc, ri->ri_nextout,
4262 (caddr_t) ri->ri_last - (caddr_t) ri->ri_nextout);
4263 TULIP_TXDESC_PRESYNC(sc, ri->ri_first,
4264 (caddr_t) (eop + 1) - (caddr_t) ri->ri_first);
4265 } else {
4266 TULIP_TXDESC_PRESYNC(sc, ri->ri_nextout,
4267 (caddr_t) (eop + 1) - (caddr_t) ri->ri_nextout);
4268 }
4269#endif
4270 ri->ri_nextout->d_status = TULIP_DSTS_OWNER;
4271 TULIP_TXDESC_PRESYNC(sc, ri->ri_nextout, sizeof(u_int32_t));
4272
4273 /*
4274 * This advances the ring for us.
4275 */
4276 ri->ri_nextout = nextout;
4277 ri->ri_free = free;
4278
4279 TULIP_PERFEND(txput);
4280
4281 if (sc->tulip_flags & TULIP_TXPROBE_ACTIVE) {
4282 TULIP_CSR_WRITE(sc, csr_txpoll, 1);
4283 sc->tulip_ifp->if_flags |= IFF_OACTIVE;
4284 TULIP_PERFEND(txput);
4285 return NULL;
4286 }
4287
4288 /*
4289 * switch back to the single queueing ifstart.
4290 */
4291 sc->tulip_flags &= ~TULIP_WANTTXSTART;
4292 if (sc->tulip_txtimer == 0)
4293 sc->tulip_txtimer = TULIP_TXTIMER;
4294#if defined(TULIP_DEBUG)
4295 sc->tulip_dbg.dbg_txput_finishes[5]++;
4296#endif
4297
4298 /*
4299 * If we want a txstart, there must be not enough space in the
4300 * transmit ring. So we want to enable transmit done interrupts
4301 * so we can immediately reclaim some space. When the transmit
4302 * interrupt is posted, the interrupt handler will call tx_intr
4303 * to reclaim space and then txstart (since WANTTXSTART is set).
4304 * txstart will move the packet into the transmit ring and clear
4305 * WANTTXSTART thereby causing TXINTR to be cleared.
4306 */
4307 finish:
4308#if defined(TULIP_DEBUG)
4309 sc->tulip_dbg.dbg_txput_finishes[6]++;
4310#endif
4311 if (sc->tulip_flags & (TULIP_WANTTXSTART|TULIP_DOINGSETUP)) {
4312 sc->tulip_ifp->if_flags |= IFF_OACTIVE;
4313 if ((sc->tulip_intrmask & TULIP_STS_TXINTR) == 0) {
4314 sc->tulip_intrmask |= TULIP_STS_TXINTR;
4315 TULIP_CSR_WRITE(sc, csr_intr, sc->tulip_intrmask);
4316 }
4317 } else if ((sc->tulip_flags & TULIP_PROMISC) == 0) {
4318 if (sc->tulip_intrmask & TULIP_STS_TXINTR) {
4319 sc->tulip_intrmask &= ~TULIP_STS_TXINTR;
4320 TULIP_CSR_WRITE(sc, csr_intr, sc->tulip_intrmask);
4321 }
4322 }
4323 TULIP_CSR_WRITE(sc, csr_txpoll, 1);
4324 TULIP_PERFEND(txput);
4325 return m;
4326}
4327
4328static void
4329tulip_txput_setup(
4330 tulip_softc_t * const sc)
4331{
4332 tulip_ringinfo_t * const ri = &sc->tulip_txinfo;
4333 tulip_desc_t *nextout;
4334
4335 TULIP_LOCK_ASSERT(sc);
4336
4337 /*
4338 * We will transmit, at most, one setup packet per call to ifstart.
4339 */
4340
4341#if defined(TULIP_DEBUG)
4342 if ((sc->tulip_cmdmode & TULIP_CMD_TXRUN) == 0) {
4343 if_printf(sc->tulip_ifp, "txput_setup: tx not running\n");
4344 sc->tulip_flags |= TULIP_WANTTXSTART;
4345 return;
4346 }
4347#endif
4348 /*
4349 * Try to reclaim some free descriptors..
4350 */
4351 if (ri->ri_free < 2)
4352 tulip_tx_intr(sc);
4353 if ((sc->tulip_flags & TULIP_DOINGSETUP) || ri->ri_free == 1) {
4354 sc->tulip_flags |= TULIP_WANTTXSTART;
4355 return;
4356 }
4357 bcopy(sc->tulip_setupdata, sc->tulip_setupbuf,
4358 sizeof(sc->tulip_setupbuf));
4359 /*
4360 * Clear WANTSETUP and set DOINGSETUP. Set know that WANTSETUP is
4361 * set and DOINGSETUP is clear doing an XOR of the two will DTRT.
4362 */
4363 sc->tulip_flags ^= TULIP_WANTSETUP|TULIP_DOINGSETUP;
4364 ri->ri_free--;
4365 nextout = ri->ri_nextout;
4366 nextout->d_flag &= TULIP_DFLAG_ENDRING|TULIP_DFLAG_CHAIN;
4367 nextout->d_flag |= TULIP_DFLAG_TxFIRSTSEG|TULIP_DFLAG_TxLASTSEG
4368 |TULIP_DFLAG_TxSETUPPKT|TULIP_DFLAG_TxWANTINTR;
4369 if (sc->tulip_flags & TULIP_WANTHASHPERFECT)
4370 nextout->d_flag |= TULIP_DFLAG_TxHASHFILT;
4371 else if (sc->tulip_flags & TULIP_WANTHASHONLY)
4372 nextout->d_flag |= TULIP_DFLAG_TxHASHFILT|TULIP_DFLAG_TxINVRSFILT;
4373
4374 nextout->d_length2 = 0;
4375 nextout->d_addr2 = 0;
4376#if defined(TULIP_BUS_DMA) && !defined(TULIP_BUS_DMA_NOTX)
4377 nextout->d_length1 = sc->tulip_setupmap->dm_segs[0].ds_len;
4378 nextout->d_addr1 = sc->tulip_setupmap->dm_segs[0].ds_addr;
4379 if (sc->tulip_setupmap->dm_nsegs == 2) {
4380 nextout->d_length2 = sc->tulip_setupmap->dm_segs[1].ds_len;
4381 nextout->d_addr2 = sc->tulip_setupmap->dm_segs[1].ds_addr;
4382 }
4383 TULIP_TXMAP_PRESYNC(sc, sc->tulip_setupmap);
4384 TULIP_TXDESC_PRESYNC(sc, nextout, sizeof(*nextout));
4385#else
4386 nextout->d_length1 = sizeof(sc->tulip_setupbuf);
4387 nextout->d_addr1 = TULIP_KVATOPHYS(sc, sc->tulip_setupbuf);
4388#endif
4389
4390 /*
4391 * Advance the ring for the next transmit packet.
4392 */
4393 if (++ri->ri_nextout == ri->ri_last)
4394 ri->ri_nextout = ri->ri_first;
4395
4396 /*
4397 * Make sure the next descriptor is owned by us since it
4398 * may have been set up above if we ran out of room in the
4399 * ring.
4400 */
4401 ri->ri_nextout->d_status = 0;
4402 TULIP_TXDESC_PRESYNC(sc, ri->ri_nextout, sizeof(u_int32_t));
4403 nextout->d_status = TULIP_DSTS_OWNER;
4404 /*
4405 * Flush the ownwership of the current descriptor
4406 */
4407 TULIP_TXDESC_PRESYNC(sc, nextout, sizeof(u_int32_t));
4408 TULIP_CSR_WRITE(sc, csr_txpoll, 1);
4409 if ((sc->tulip_intrmask & TULIP_STS_TXINTR) == 0) {
4410 sc->tulip_intrmask |= TULIP_STS_TXINTR;
4411 TULIP_CSR_WRITE(sc, csr_intr, sc->tulip_intrmask);
4412 }
4413}
4414
4415
4416static int
4417tulip_ifioctl(
4418 struct ifnet * ifp,
4419 u_long cmd,
4420 caddr_t data)
4421{
4422 TULIP_PERFSTART(ifioctl)
4423 tulip_softc_t * const sc = (tulip_softc_t *)ifp->if_softc;
4424 struct ifreq *ifr = (struct ifreq *) data;
4425 int error = 0;
4426
4427 switch (cmd) {
4428 case SIOCSIFFLAGS: {
4429 TULIP_LOCK(sc);
4430 tulip_addr_filter(sc); /* reinit multicast filter */
4431 tulip_init(sc);
4432 TULIP_UNLOCK(sc);
4433 break;
4434 }
4435
4436 case SIOCSIFMEDIA:
4437 case SIOCGIFMEDIA: {
4438 error = ifmedia_ioctl(ifp, ifr, &sc->tulip_ifmedia, cmd);
4439 break;
4440 }
4441
4442 case SIOCADDMULTI:
4443 case SIOCDELMULTI: {
4444 /*
4445 * Update multicast listeners
4446 */
4447 TULIP_LOCK(sc);
4448 tulip_addr_filter(sc); /* reset multicast filtering */
4449 tulip_init(sc);
4450 TULIP_UNLOCK(sc);
4451 error = 0;
4452 break;
4453 }
4454
4455 case SIOCSIFMTU:
4456 /*
4457 * Set the interface MTU.
4458 */
4459 TULIP_LOCK(sc);
4460 if (ifr->ifr_mtu > ETHERMTU) {
4461 error = EINVAL;
4462 break;
4463 }
4464 ifp->if_mtu = ifr->ifr_mtu;
4465 TULIP_UNLOCK(sc);
4466 break;
4467
4468#ifdef SIOCGADDRROM
4469 case SIOCGADDRROM: {
4470 error = copyout(sc->tulip_rombuf, ifr->ifr_data, sizeof(sc->tulip_rombuf));
4471 break;
4472 }
4473#endif
4474#ifdef SIOCGCHIPID
4475 case SIOCGCHIPID: {
4476 ifr->ifr_metric = (int) sc->tulip_chipid;
4477 break;
4478 }
4479#endif
4480 default: {
4481 error = ether_ioctl(ifp, cmd, data);
4482 break;
4483 }
4484 }
4485
4486 TULIP_PERFEND(ifioctl);
4487 return error;
4488}
4489
4490static void
4491tulip_ifstart(
4492 struct ifnet * const ifp)
4493{
4494 TULIP_PERFSTART(ifstart)
4495 tulip_softc_t * const sc = (tulip_softc_t *)ifp->if_softc;
4496
4497 if (ifp->if_flags & IFF_RUNNING) {
4498 TULIP_LOCK(sc);
4499 tulip_start(sc);
4500 TULIP_UNLOCK(sc);
4501 }
4502
4503 TULIP_PERFEND(ifstart);
4504}
4505
4506static void
4507tulip_start(tulip_softc_t * const sc)
4508{
4509 struct mbuf *m;
4510
4511 TULIP_LOCK_ASSERT(sc);
4512
4513 if ((sc->tulip_flags & (TULIP_WANTSETUP|TULIP_TXPROBE_ACTIVE)) == TULIP_WANTSETUP)
4514 tulip_txput_setup(sc);
4515
4516 while (!IFQ_DRV_IS_EMPTY(&sc->tulip_ifp->if_snd)) {
4517 IFQ_DRV_DEQUEUE(&sc->tulip_ifp->if_snd, m);
4518 if(m == NULL)
4519 break;
4520 if ((m = tulip_txput(sc, m)) != NULL) {
4521 IFQ_DRV_PREPEND(&sc->tulip_ifp->if_snd, m);
4522 break;
4523 }
4524 }
4525}
4526
4527/*
4528 * Even though this routine runs at device spl, it does not break
4529 * our use of splnet (splsoftnet under NetBSD) for the majority
4530 * of this driver since
4531 * if_watcbog is called from if_watchdog which is called from
4532 * splsoftclock which is below spl[soft]net.
4533 */
4534static void
4535tulip_ifwatchdog(
4536 struct ifnet *ifp)
4537{
4538 TULIP_PERFSTART(ifwatchdog)
4539 tulip_softc_t * const sc = (tulip_softc_t *)ifp->if_softc;
4540#if defined(TULIP_DEBUG)
4541 u_int32_t rxintrs;
4542#endif
4543
4544 TULIP_LOCK(sc);
4545#if defined(TULIP_DEBUG)
4546 rxintrs = sc->tulip_dbg.dbg_rxintrs - sc->tulip_dbg.dbg_last_rxintrs;
4547 if (rxintrs > sc->tulip_dbg.dbg_high_rxintrs_hz)
4548 sc->tulip_dbg.dbg_high_rxintrs_hz = rxintrs;
4549 sc->tulip_dbg.dbg_last_rxintrs = sc->tulip_dbg.dbg_rxintrs;
4550#endif /* TULIP_DEBUG */
4551
4552 sc->tulip_ifp->if_timer = 1;
4553 /*
4554 * These should be rare so do a bulk test up front so we can just skip
4555 * them if needed.
4556 */
4557 if (sc->tulip_flags & (TULIP_SYSTEMERROR|TULIP_RXBUFSLOW|TULIP_NOMESSAGES)) {
4558 /*
4559 * If the number of receive buffer is low, try to refill
4560 */
4561 if (sc->tulip_flags & TULIP_RXBUFSLOW)
4562 tulip_rx_intr(sc);
4563
4564 if (sc->tulip_flags & TULIP_SYSTEMERROR) {
4565 if_printf(sc->tulip_ifp, "%d system errors: last was %s\n",
4566 sc->tulip_system_errors,
4567 tulip_system_errors[sc->tulip_last_system_error]);
4568 }
4569 if (sc->tulip_statusbits) {
4570 tulip_print_abnormal_interrupt(sc, sc->tulip_statusbits);
4571 sc->tulip_statusbits = 0;
4572 }
4573
4574 sc->tulip_flags &= ~(TULIP_NOMESSAGES|TULIP_SYSTEMERROR);
4575 }
4576
4577 if (sc->tulip_txtimer)
4578 tulip_tx_intr(sc);
4579 if (sc->tulip_txtimer && --sc->tulip_txtimer == 0) {
4580 if_printf(sc->tulip_ifp, "transmission timeout\n");
4581 if (TULIP_DO_AUTOSENSE(sc)) {
4582 sc->tulip_media = TULIP_MEDIA_UNKNOWN;
4583 sc->tulip_probe_state = TULIP_PROBE_INACTIVE;
4584 sc->tulip_flags &= ~(TULIP_WANTRXACT|TULIP_LINKUP);
4585 }
4586 tulip_reset(sc);
4587 tulip_init(sc);
4588 }
4589
4590 TULIP_PERFEND(ifwatchdog);
4591 TULIP_PERFMERGE(sc, perf_intr_cycles);
4592 TULIP_PERFMERGE(sc, perf_ifstart_cycles);
4593 TULIP_PERFMERGE(sc, perf_ifioctl_cycles);
4594 TULIP_PERFMERGE(sc, perf_ifwatchdog_cycles);
4595 TULIP_PERFMERGE(sc, perf_timeout_cycles);
4596 TULIP_PERFMERGE(sc, perf_ifstart_one_cycles);
4597 TULIP_PERFMERGE(sc, perf_txput_cycles);
4598 TULIP_PERFMERGE(sc, perf_txintr_cycles);
4599 TULIP_PERFMERGE(sc, perf_rxintr_cycles);
4600 TULIP_PERFMERGE(sc, perf_rxget_cycles);
4601 TULIP_PERFMERGE(sc, perf_intr);
4602 TULIP_PERFMERGE(sc, perf_ifstart);
4603 TULIP_PERFMERGE(sc, perf_ifioctl);
4604 TULIP_PERFMERGE(sc, perf_ifwatchdog);
4605 TULIP_PERFMERGE(sc, perf_timeout);
4606 TULIP_PERFMERGE(sc, perf_ifstart_one);
4607 TULIP_PERFMERGE(sc, perf_txput);
4608 TULIP_PERFMERGE(sc, perf_txintr);
4609 TULIP_PERFMERGE(sc, perf_rxintr);
4610 TULIP_PERFMERGE(sc, perf_rxget);
4611 TULIP_UNLOCK(sc);
4612}
4613
4614/*
4615 * All printf's are real as of now!
4616 */
4617#ifdef printf
4618#undef printf
4619#endif
4620
4621static void
4622tulip_attach(
4623 tulip_softc_t * const sc)
4624{
4625 struct ifnet *ifp;
4626
4627 ifp = sc->tulip_ifp = if_alloc(IFT_ETHER);
4628
4629 /* XXX: driver name/unit should be set some other way */
4630 if_initname(ifp, "de", sc->tulip_unit);
4631 ifp->if_softc = sc;
4632 ifp->if_flags = IFF_BROADCAST|IFF_SIMPLEX|IFF_MULTICAST;
4633 ifp->if_ioctl = tulip_ifioctl;
4634 ifp->if_start = tulip_ifstart;
4635 ifp->if_watchdog = tulip_ifwatchdog;
4636 ifp->if_timer = 1;
4637 ifp->if_init = tulip_ifinit;
4638 IFQ_SET_MAXLEN(&ifp->if_snd, ifqmaxlen);
4639 ifp->if_snd.ifq_drv_maxlen = ifqmaxlen;
4640 IFQ_SET_READY(&ifp->if_snd);
4641
4642 if_printf(ifp, "%s%s pass %d.%d%s\n",
4643 sc->tulip_boardid,
4644 tulip_chipdescs[sc->tulip_chipid],
4645 (sc->tulip_revinfo & 0xF0) >> 4,
4646 sc->tulip_revinfo & 0x0F,
4647 (sc->tulip_features & (TULIP_HAVE_ISVSROM|TULIP_HAVE_OKSROM))
4648 == TULIP_HAVE_ISVSROM ? " (invalid EESPROM checksum)" : "");
4649
4650 TULIP_LOCK(sc);
4651#if defined(__alpha__)
4652 /*
4653 * In case the SRM console told us about a bogus media,
4654 * we need to check to be safe.
4655 */
4656 if (sc->tulip_mediums[sc->tulip_media] == NULL)
4657 sc->tulip_media = TULIP_MEDIA_UNKNOWN;
4658#endif
4659
4660 (*sc->tulip_boardsw->bd_media_probe)(sc);
4661 ifmedia_init(&sc->tulip_ifmedia, 0,
4662 tulip_ifmedia_change,
4663 tulip_ifmedia_status);
4664 sc->tulip_flags &= ~TULIP_DEVICEPROBE;
4665 tulip_ifmedia_add(sc);
4666
4667 tulip_reset(sc);
4668 TULIP_UNLOCK(sc);
4669
4670 ether_ifattach(sc->tulip_ifp, sc->tulip_enaddr);
4671}
4672
4673#if defined(TULIP_BUS_DMA)
4674#if !defined(TULIP_BUS_DMA_NOTX) || !defined(TULIP_BUS_DMA_NORX)
4675static int
4676tulip_busdma_allocmem(
4677 tulip_softc_t * const sc,
4678 size_t size,
4679 bus_dmamap_t *map_p,
4680 tulip_desc_t **desc_p)
4681{
4682 bus_dma_segment_t segs[1];
4683 int nsegs, error;
4684 error = bus_dmamem_alloc(sc->tulip_dmatag, size, 1, PAGE_SIZE,
4685 segs, sizeof(segs)/sizeof(segs[0]),
4686 &nsegs, BUS_DMA_NOWAIT);
4687 if (error == 0) {
4688 void *desc;
4689 error = bus_dmamem_map(sc->tulip_dmatag, segs, nsegs, size,
4690 (void *) &desc, BUS_DMA_NOWAIT|BUS_DMA_COHERENT);
4691 if (error == 0) {
4692 bus_dmamap_t map;
4693 error = bus_dmamap_create(sc->tulip_dmatag, size, 1, size, 0,
4694 BUS_DMA_NOWAIT, &map);
4695 if (error == 0) {
4696 error = bus_dmamap_load(sc->tulip_dmatag, map, desc,
4697 size, NULL, BUS_DMA_NOWAIT);
4698 if (error)
4699 bus_dmamap_destroy(sc->tulip_dmatag, map);
4700 else
4701 *map_p = map;
4702 }
4703 if (error)
4704 bus_dmamem_unmap(sc->tulip_dmatag, desc, size);
4705 }
4706 if (error)
4707 bus_dmamem_free(sc->tulip_dmatag, segs, nsegs);
4708 else
4709 *desc_p = desc;
4710 }
4711 return error;
4712}
4713#endif
4714
4715static int
4716tulip_busdma_init(
4717 tulip_softc_t * const sc)
4718{
4719 int error = 0;
4720
4721#if !defined(TULIP_BUS_DMA_NOTX)
4722 /*
4723 * Allocate dmamap for setup descriptor
4724 */
4725 error = bus_dmamap_create(sc->tulip_dmatag, sizeof(sc->tulip_setupbuf), 2,
4726 sizeof(sc->tulip_setupbuf), 0, BUS_DMA_NOWAIT,
4727 &sc->tulip_setupmap);
4728 if (error == 0) {
4729 error = bus_dmamap_load(sc->tulip_dmatag, sc->tulip_setupmap,
4730 sc->tulip_setupbuf, sizeof(sc->tulip_setupbuf),
4731 NULL, BUS_DMA_NOWAIT);
4732 if (error)
4733 bus_dmamap_destroy(sc->tulip_dmatag, sc->tulip_setupmap);
4734 }
4735 /*
4736 * Allocate space and dmamap for transmit ring
4737 */
4738 if (error == 0) {
4739 error = tulip_busdma_allocmem(sc, sizeof(tulip_desc_t) * TULIP_TXDESCS,
4740 &sc->tulip_txdescmap,
4741 &sc->tulip_txdescs);
4742 }
4743
4744 /*
4745 * Allocate dmamaps for each transmit descriptors
4746 */
4747 if (error == 0) {
4748 while (error == 0 && sc->tulip_txmaps_free < TULIP_TXDESCS) {
4749 bus_dmamap_t map;
4750 if ((error = TULIP_TXMAP_CREATE(sc, &map)) == 0)
4751 sc->tulip_txmaps[sc->tulip_txmaps_free++] = map;
4752 }
4753 if (error) {
4754 while (sc->tulip_txmaps_free > 0)
4755 bus_dmamap_destroy(sc->tulip_dmatag,
4756 sc->tulip_txmaps[--sc->tulip_txmaps_free]);
4757 }
4758 }
4759#else
4760 if (error == 0) {
4761 sc->tulip_txdescs = (tulip_desc_t *) malloc(TULIP_TXDESCS * sizeof(tulip_desc_t), M_DEVBUF, M_NOWAIT);
4762 if (sc->tulip_txdescs == NULL)
4763 error = ENOMEM;
4764 }
4765#endif
4766#if !defined(TULIP_BUS_DMA_NORX)
4767 /*
4768 * Allocate space and dmamap for receive ring
4769 */
4770 if (error == 0) {
4771 error = tulip_busdma_allocmem(sc, sizeof(tulip_desc_t) * TULIP_RXDESCS,
4772 &sc->tulip_rxdescmap,
4773 &sc->tulip_rxdescs);
4774 }
4775
4776 /*
4777 * Allocate dmamaps for each receive descriptors
4778 */
4779 if (error == 0) {
4780 while (error == 0 && sc->tulip_rxmaps_free < TULIP_RXDESCS) {
4781 bus_dmamap_t map;
4782 if ((error = TULIP_RXMAP_CREATE(sc, &map)) == 0)
4783 sc->tulip_rxmaps[sc->tulip_rxmaps_free++] = map;
4784 }
4785 if (error) {
4786 while (sc->tulip_rxmaps_free > 0)
4787 bus_dmamap_destroy(sc->tulip_dmatag,
4788 sc->tulip_rxmaps[--sc->tulip_rxmaps_free]);
4789 }
4790 }
4791#else
4792 if (error == 0) {
4793 sc->tulip_rxdescs = (tulip_desc_t *) malloc(TULIP_RXDESCS * sizeof(tulip_desc_t), M_DEVBUF, M_NOWAIT);
4794 if (sc->tulip_rxdescs == NULL)
4795 error = ENOMEM;
4796 }
4797#endif
4798 return error;
4799}
4800#endif /* TULIP_BUS_DMA */
4801
4802static void
4803tulip_initcsrs(
4804 tulip_softc_t * const sc,
4805 tulip_csrptr_t csr_base,
4806 size_t csr_size)
4807{
4808 sc->tulip_csrs.csr_busmode = csr_base + 0 * csr_size;
4809 sc->tulip_csrs.csr_txpoll = csr_base + 1 * csr_size;
4810 sc->tulip_csrs.csr_rxpoll = csr_base + 2 * csr_size;
4811 sc->tulip_csrs.csr_rxlist = csr_base + 3 * csr_size;
4812 sc->tulip_csrs.csr_txlist = csr_base + 4 * csr_size;
4813 sc->tulip_csrs.csr_status = csr_base + 5 * csr_size;
4814 sc->tulip_csrs.csr_command = csr_base + 6 * csr_size;
4815 sc->tulip_csrs.csr_intr = csr_base + 7 * csr_size;
4816 sc->tulip_csrs.csr_missed_frames = csr_base + 8 * csr_size;
4817 sc->tulip_csrs.csr_9 = csr_base + 9 * csr_size;
4818 sc->tulip_csrs.csr_10 = csr_base + 10 * csr_size;
4819 sc->tulip_csrs.csr_11 = csr_base + 11 * csr_size;
4820 sc->tulip_csrs.csr_12 = csr_base + 12 * csr_size;
4821 sc->tulip_csrs.csr_13 = csr_base + 13 * csr_size;
4822 sc->tulip_csrs.csr_14 = csr_base + 14 * csr_size;
4823 sc->tulip_csrs.csr_15 = csr_base + 15 * csr_size;
4824}
4825
4826static void
4827tulip_initring(
4828 tulip_softc_t * const sc,
4829 tulip_ringinfo_t * const ri,
4830 tulip_desc_t *descs,
4831 int ndescs)
4832{
4833 ri->ri_max = ndescs;
4834 ri->ri_first = descs;
4835 ri->ri_last = ri->ri_first + ri->ri_max;
4836 bzero((caddr_t) ri->ri_first, sizeof(ri->ri_first[0]) * ri->ri_max);
4837 ri->ri_last[-1].d_flag = TULIP_DFLAG_ENDRING;
4838}
4839
4840/*
4841 * This is the PCI configuration support.
4842 */
4843
4844#define PCI_CBIO PCIR_BAR(0) /* Configuration Base IO Address */
4845#define PCI_CBMA PCIR_BAR(1) /* Configuration Base Memory Address */
4846#define PCI_CFDA 0x40 /* Configuration Driver Area */
4847
4848static int
4849tulip_pci_probe(device_t dev)
4850{
4851 const char *name = NULL;
4852
4853 if (pci_get_vendor(dev) != DEC_VENDORID)
4854 return ENXIO;
4855
4856 /*
4857 * Some LanMedia WAN cards use the Tulip chip, but they have
4858 * their own driver, and we should not recognize them
4859 */
4860 if (pci_get_subvendor(dev) == 0x1376)
4861 return ENXIO;
4862
4863 switch (pci_get_device(dev)) {
4864 case CHIPID_21040:
4865 name = "Digital 21040 Ethernet";
4866 break;
4867 case CHIPID_21041:
4868 name = "Digital 21041 Ethernet";
4869 break;
4870 case CHIPID_21140:
4871 if (pci_get_revid(dev) >= 0x20)
4872 name = "Digital 21140A Fast Ethernet";
4873 else
4874 name = "Digital 21140 Fast Ethernet";
4875 break;
4876 case CHIPID_21142:
4877 if (pci_get_revid(dev) >= 0x20)
4878 name = "Digital 21143 Fast Ethernet";
4879 else
4880 name = "Digital 21142 Fast Ethernet";
4881 break;
4882 }
4883 if (name) {
4884 device_set_desc(dev, name);
4885 return BUS_PROBE_LOW_PRIORITY;
4886 }
4887 return ENXIO;
4888}
4889
4890static int
4891tulip_shutdown(device_t dev)
4892{
4893 tulip_softc_t * const sc = device_get_softc(dev);
4894 TULIP_CSR_WRITE(sc, csr_busmode, TULIP_BUSMODE_SWRESET);
4895 DELAY(10); /* Wait 10 microseconds (actually 50 PCI cycles but at
4896 33MHz that comes to two microseconds but wait a
4897 bit longer anyways) */
4898 return 0;
4899}
4900
4901static int
4902tulip_pci_attach(device_t dev)
4903{
4904 tulip_softc_t *sc;
4905#if defined(__alpha__)
4906 tulip_media_t media = TULIP_MEDIA_UNKNOWN;
4907#endif
4908 int retval, idx;
4909 u_int32_t revinfo, cfdainfo;
4910 unsigned csroffset = TULIP_PCI_CSROFFSET;
4911 unsigned csrsize = TULIP_PCI_CSRSIZE;
4912 tulip_csrptr_t csr_base;
4913 tulip_chipid_t chipid = TULIP_CHIPID_UNKNOWN;
4914 struct resource *res;
4915 int rid, unit;
4916
4917 unit = device_get_unit(dev);
4918
4919 if (unit >= TULIP_MAX_DEVICES) {
4920 device_printf(dev, "not configured; limit of %d reached or exceeded\n",
4921 TULIP_MAX_DEVICES);
4922 return ENXIO;
4923 }
4924
4925 revinfo = pci_get_revid(dev);
4926 cfdainfo = pci_read_config(dev, PCI_CFDA, 4);
4927
4928 /* turn busmaster on in case BIOS doesn't set it */
4929 pci_enable_busmaster(dev);
4930
4931 if (pci_get_vendor(dev) == DEC_VENDORID) {
4932 if (pci_get_device(dev) == CHIPID_21040)
4933 chipid = TULIP_21040;
4934 else if (pci_get_device(dev) == CHIPID_21041)
4935 chipid = TULIP_21041;
4936 else if (pci_get_device(dev) == CHIPID_21140)
4937 chipid = (revinfo >= 0x20) ? TULIP_21140A : TULIP_21140;
4938 else if (pci_get_device(dev) == CHIPID_21142)
4939 chipid = (revinfo >= 0x20) ? TULIP_21143 : TULIP_21142;
4940 }
4941 if (chipid == TULIP_CHIPID_UNKNOWN)
4942 return ENXIO;
4943
4944 if (chipid == TULIP_21040 && revinfo < 0x20) {
4945 device_printf(dev,
4946 "not configured; 21040 pass 2.0 required (%d.%d found)\n",
4947 revinfo >> 4, revinfo & 0x0f);
4948 return ENXIO;
4949 } else if (chipid == TULIP_21140 && revinfo < 0x11) {
4950 device_printf(dev,
4951 "not configured; 21140 pass 1.1 required (%d.%d found)\n",
4952 revinfo >> 4, revinfo & 0x0f);
4953 return ENXIO;
4954 }
4955
4956 sc = device_get_softc(dev);
4957 sc->tulip_pci_busno = pci_get_bus(dev);
4958 sc->tulip_pci_devno = pci_get_slot(dev);
4959 sc->tulip_chipid = chipid;
4960 sc->tulip_flags |= TULIP_DEVICEPROBE;
4961 if (chipid == TULIP_21140 || chipid == TULIP_21140A)
4962 sc->tulip_features |= TULIP_HAVE_GPR|TULIP_HAVE_STOREFWD;
4963 if (chipid == TULIP_21140A && revinfo <= 0x22)
4964 sc->tulip_features |= TULIP_HAVE_RXBADOVRFLW;
4965 if (chipid == TULIP_21140)
4966 sc->tulip_features |= TULIP_HAVE_BROKEN_HASH;
4967 if (chipid != TULIP_21040 && chipid != TULIP_21140)
4968 sc->tulip_features |= TULIP_HAVE_POWERMGMT;
4969 if (chipid == TULIP_21041 || chipid == TULIP_21142 || chipid == TULIP_21143) {
4970 sc->tulip_features |= TULIP_HAVE_DUALSENSE;
4971 if (chipid != TULIP_21041 || revinfo >= 0x20)
4972 sc->tulip_features |= TULIP_HAVE_SIANWAY;
4973 if (chipid != TULIP_21041)
4974 sc->tulip_features |= TULIP_HAVE_SIAGP|TULIP_HAVE_RXBADOVRFLW|TULIP_HAVE_STOREFWD;
4975 if (chipid != TULIP_21041 && revinfo >= 0x20)
4976 sc->tulip_features |= TULIP_HAVE_SIA100;
4977 }
4978
4979 if (sc->tulip_features & TULIP_HAVE_POWERMGMT
4980 && (cfdainfo & (TULIP_CFDA_SLEEP|TULIP_CFDA_SNOOZE))) {
4981 cfdainfo &= ~(TULIP_CFDA_SLEEP|TULIP_CFDA_SNOOZE);
4982 pci_write_config(dev, PCI_CFDA, cfdainfo, 4);
4983 DELAY(11*1000);
4984 }
4985#if defined(__alpha__)
4986 /*
4987 * The Alpha SRM console encodes a console set media in the driver
4988 * part of the CFDA register. Note that the Multia presents a
4989 * problem in that its BNC mode is really EXTSIA. So in that case
4990 * force a probe.
4991 */
4992 switch ((cfdainfo >> 8) & 0xff) {
4993 case 1: media = chipid > TULIP_21040 ? TULIP_MEDIA_AUI : TULIP_MEDIA_AUIBNC; break;
4994 case 2: media = chipid > TULIP_21040 ? TULIP_MEDIA_BNC : TULIP_MEDIA_UNKNOWN; break;
4995 case 3: media = TULIP_MEDIA_10BASET; break;
4996 case 4: media = TULIP_MEDIA_10BASET_FD; break;
4997 case 5: media = TULIP_MEDIA_100BASETX; break;
4998 case 6: media = TULIP_MEDIA_100BASETX_FD; break;
4999 default: media = TULIP_MEDIA_UNKNOWN; break;
5000 }
5001#endif
5002
5003 sc->tulip_unit = unit;
5004 sc->tulip_revinfo = revinfo;
5005#if defined(TULIP_IOMAPPED)
5006 rid = PCI_CBIO;
5007 res = bus_alloc_resource_any(dev, SYS_RES_IOPORT, &rid, RF_ACTIVE);
5008#else
5009 rid = PCI_CBMA;
5010 res = bus_alloc_resource_any(dev, SYS_RES_MEMORY, &rid, RF_ACTIVE);
5011#endif
5012 if (!res)
5013 return ENXIO;
5014 sc->tulip_csrs_bst = rman_get_bustag(res);
5015 sc->tulip_csrs_bsh = rman_get_bushandle(res);
5016 csr_base = 0;
5017
5018 mtx_init(TULIP_MUTEX(sc), MTX_NETWORK_LOCK, device_get_nameunit(dev),
5019 MTX_DEF);
5020 callout_init(&sc->tulip_callout, CALLOUT_MPSAFE);
5021 tulips[unit] = sc;
5022
5023 tulip_initcsrs(sc, csr_base + csroffset, csrsize);
5024
5025#if defined(TULIP_BUS_DMA)
5026 if ((retval = tulip_busdma_init(sc)) != 0) {
5027 printf("error initing bus_dma: %d\n", retval);
5028 mtx_destroy(TULIP_MUTEX(sc));
5029 return ENXIO;
5030 }
5031#else
5032 sc->tulip_rxdescs = (tulip_desc_t *) malloc(sizeof(tulip_desc_t) * TULIP_RXDESCS, M_DEVBUF, M_NOWAIT);
5033 sc->tulip_txdescs = (tulip_desc_t *) malloc(sizeof(tulip_desc_t) * TULIP_TXDESCS, M_DEVBUF, M_NOWAIT);
5034 if (sc->tulip_rxdescs == NULL || sc->tulip_txdescs == NULL) {
5035 device_printf(dev, "malloc failed\n");
5036 if (sc->tulip_rxdescs)
5037 free((caddr_t) sc->tulip_rxdescs, M_DEVBUF);
5038 if (sc->tulip_txdescs)
5039 free((caddr_t) sc->tulip_txdescs, M_DEVBUF);
5040 mtx_destroy(TULIP_MUTEX(sc));
5041 return ENXIO;
5042 }
5043#endif
5044
5045 tulip_initring(sc, &sc->tulip_rxinfo, sc->tulip_rxdescs, TULIP_RXDESCS);
5046 tulip_initring(sc, &sc->tulip_txinfo, sc->tulip_txdescs, TULIP_TXDESCS);
5047
5048 /*
5049 * Make sure there won't be any interrupts or such...
5050 */
5051 TULIP_CSR_WRITE(sc, csr_busmode, TULIP_BUSMODE_SWRESET);
5052 DELAY(100); /* Wait 10 microseconds (actually 50 PCI cycles but at
5053 33MHz that comes to two microseconds but wait a
5054 bit longer anyways) */
5055
5056 TULIP_LOCK(sc);
5057 retval = tulip_read_macaddr(sc);
5058 TULIP_UNLOCK(sc);
5059 if (retval < 0) {
5060 device_printf(dev, "can't read ENET ROM (why=%d) (", retval);
5061 for (idx = 0; idx < 32; idx++)
5062 printf("%02x", sc->tulip_rombuf[idx]);
5063 printf("\n");
5064 device_printf(dev, "%s%s pass %d.%d\n",
5065 sc->tulip_boardid, tulip_chipdescs[sc->tulip_chipid],
5066 (sc->tulip_revinfo & 0xF0) >> 4, sc->tulip_revinfo & 0x0F);
5067 device_printf(dev, "address unknown\n");
5068 } else {
5069 void (*intr_rtn)(void *) = tulip_intr_normal;
5070
5071 if (sc->tulip_features & TULIP_HAVE_SHAREDINTR)
5072 intr_rtn = tulip_intr_shared;
5073
5074#if defined(__alpha__)
5075 sc->tulip_media = media;
5076#endif
5077 tulip_attach(sc);
5078
5079 /* Setup interrupt last. */
5080 if ((sc->tulip_features & TULIP_HAVE_SLAVEDINTR) == 0) {
5081 void *ih;
5082
5083 rid = 0;
5084 res = bus_alloc_resource_any(dev, SYS_RES_IRQ, &rid,
5085 RF_SHAREABLE | RF_ACTIVE);
5086 if (res == 0 || bus_setup_intr(dev, res, INTR_TYPE_NET |
5087 INTR_MPSAFE, intr_rtn, sc, &ih)) {
5088 device_printf(dev, "couldn't map interrupt\n");
5089 free((caddr_t) sc->tulip_rxdescs, M_DEVBUF);
5090 free((caddr_t) sc->tulip_txdescs, M_DEVBUF);
5091 ether_ifdetach(sc->tulip_ifp);
5092 if_free(sc->tulip_ifp);
5093 mtx_destroy(TULIP_MUTEX(sc));
5094 return ENXIO;
5095 }
5096 }
5097
5098#if defined(__alpha__)
5099 TULIP_LOCK(sc);
5100 if (sc->tulip_media != TULIP_MEDIA_UNKNOWN)
5101 tulip_linkup(sc, media);
5102 TULIP_UNLOCK(sc);
5103#endif
5104 }
5105 return 0;
5106}
5107
5108static device_method_t tulip_pci_methods[] = {
5109 /* Device interface */
5110 DEVMETHOD(device_probe, tulip_pci_probe),
5111 DEVMETHOD(device_attach, tulip_pci_attach),
5112 DEVMETHOD(device_shutdown, tulip_shutdown),
5113 { 0, 0 }
5114};
5115static driver_t tulip_pci_driver = {
5116 "de",
5117 tulip_pci_methods,
5118 sizeof(tulip_softc_t),
5119};
5120static devclass_t tulip_devclass;
5121DRIVER_MODULE(de, pci, tulip_pci_driver, tulip_devclass, 0, 0);
|