tulip.c revision 1.17 1 1.17 thorpej /* $NetBSD: tulip.c,v 1.17 1999/09/25 00:27:00 thorpej Exp $ */
2 1.1 thorpej
3 1.1 thorpej /*-
4 1.1 thorpej * Copyright (c) 1998, 1999 The NetBSD Foundation, Inc.
5 1.1 thorpej * All rights reserved.
6 1.1 thorpej *
7 1.1 thorpej * This code is derived from software contributed to The NetBSD Foundation
8 1.1 thorpej * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
9 1.1 thorpej * NASA Ames Research Center.
10 1.1 thorpej *
11 1.1 thorpej * Redistribution and use in source and binary forms, with or without
12 1.1 thorpej * modification, are permitted provided that the following conditions
13 1.1 thorpej * are met:
14 1.1 thorpej * 1. Redistributions of source code must retain the above copyright
15 1.1 thorpej * notice, this list of conditions and the following disclaimer.
16 1.1 thorpej * 2. Redistributions in binary form must reproduce the above copyright
17 1.1 thorpej * notice, this list of conditions and the following disclaimer in the
18 1.1 thorpej * documentation and/or other materials provided with the distribution.
19 1.1 thorpej * 3. All advertising materials mentioning features or use of this software
20 1.1 thorpej * must display the following acknowledgement:
21 1.1 thorpej * This product includes software developed by the NetBSD
22 1.1 thorpej * Foundation, Inc. and its contributors.
23 1.1 thorpej * 4. Neither the name of The NetBSD Foundation nor the names of its
24 1.1 thorpej * contributors may be used to endorse or promote products derived
25 1.1 thorpej * from this software without specific prior written permission.
26 1.1 thorpej *
27 1.1 thorpej * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
28 1.1 thorpej * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
29 1.1 thorpej * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
30 1.1 thorpej * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
31 1.1 thorpej * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
32 1.1 thorpej * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
33 1.1 thorpej * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
34 1.1 thorpej * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
35 1.1 thorpej * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
36 1.1 thorpej * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
37 1.1 thorpej * POSSIBILITY OF SUCH DAMAGE.
38 1.1 thorpej */
39 1.1 thorpej
40 1.1 thorpej /*
41 1.1 thorpej * Device driver for the Digital Semiconductor ``Tulip'' (21x4x)
42 1.1 thorpej * Ethernet controller family, and a variety of clone chips.
43 1.1 thorpej */
44 1.1 thorpej
45 1.1 thorpej #include "opt_inet.h"
46 1.1 thorpej #include "opt_ns.h"
47 1.1 thorpej #include "bpfilter.h"
48 1.1 thorpej
49 1.1 thorpej #include <sys/param.h>
50 1.1 thorpej #include <sys/systm.h>
51 1.1 thorpej #include <sys/mbuf.h>
52 1.1 thorpej #include <sys/malloc.h>
53 1.1 thorpej #include <sys/kernel.h>
54 1.1 thorpej #include <sys/socket.h>
55 1.1 thorpej #include <sys/ioctl.h>
56 1.1 thorpej #include <sys/errno.h>
57 1.1 thorpej #include <sys/device.h>
58 1.1 thorpej
59 1.1 thorpej #include <vm/vm.h> /* for PAGE_SIZE */
60 1.1 thorpej
61 1.1 thorpej #include <net/if.h>
62 1.1 thorpej #include <net/if_dl.h>
63 1.1 thorpej #include <net/if_media.h>
64 1.1 thorpej #include <net/if_ether.h>
65 1.1 thorpej
66 1.1 thorpej #if NBPFILTER > 0
67 1.1 thorpej #include <net/bpf.h>
68 1.1 thorpej #endif
69 1.1 thorpej
70 1.1 thorpej #ifdef INET
71 1.1 thorpej #include <netinet/in.h>
72 1.1 thorpej #include <netinet/if_inarp.h>
73 1.1 thorpej #endif
74 1.1 thorpej
75 1.1 thorpej #ifdef NS
76 1.1 thorpej #include <netns/ns.h>
77 1.1 thorpej #include <netns/ns_if.h>
78 1.1 thorpej #endif
79 1.1 thorpej
80 1.1 thorpej #include <machine/bus.h>
81 1.1 thorpej #include <machine/intr.h>
82 1.1 thorpej
83 1.1 thorpej #include <dev/mii/mii.h>
84 1.1 thorpej #include <dev/mii/miivar.h>
85 1.1 thorpej
86 1.1 thorpej #include <dev/ic/tulipreg.h>
87 1.1 thorpej #include <dev/ic/tulipvar.h>
88 1.1 thorpej
89 1.1 thorpej /*
90 1.1 thorpej * The following tables compute the transmit threshold mode. We start
91 1.1 thorpej * at index 0. When ever we get a transmit underrun, we increment our
92 1.1 thorpej * index, falling back if we encounter the NULL terminator.
93 1.1 thorpej *
94 1.1 thorpej * Note: Store and forward mode is only available on the 100mbps chips
95 1.1 thorpej * (21140 and higher).
96 1.1 thorpej */
97 1.1 thorpej const struct tulip_txthresh_tab tlp_10_txthresh_tab[] = {
98 1.1 thorpej { OPMODE_TR_72, "72 bytes" },
99 1.1 thorpej { OPMODE_TR_96, "96 bytes" },
100 1.1 thorpej { OPMODE_TR_128, "128 bytes" },
101 1.1 thorpej { OPMODE_TR_160, "160 bytes" },
102 1.1 thorpej { 0, NULL },
103 1.1 thorpej };
104 1.1 thorpej
105 1.1 thorpej const struct tulip_txthresh_tab tlp_10_100_txthresh_tab[] = {
106 1.1 thorpej { OPMODE_TR_72, "72/128 bytes" },
107 1.1 thorpej { OPMODE_TR_96, "96/256 bytes" },
108 1.1 thorpej { OPMODE_TR_128, "128/512 bytes" },
109 1.1 thorpej { OPMODE_TR_160, "160/1024 bytes" },
110 1.1 thorpej { OPMODE_SF, "store and forward mode" },
111 1.1 thorpej { 0, NULL },
112 1.1 thorpej };
113 1.1 thorpej
114 1.3 thorpej #define TXTH_72 0
115 1.3 thorpej #define TXTH_96 1
116 1.3 thorpej #define TXTH_128 2
117 1.3 thorpej #define TXTH_160 3
118 1.3 thorpej #define TXTH_SF 4
119 1.3 thorpej
120 1.5 thorpej /*
121 1.5 thorpej * The Winbond 89C840F does transmit threshold control totally
122 1.5 thorpej * differently. It simply has a 7-bit field which indicates
123 1.5 thorpej * the threshold:
124 1.5 thorpej *
125 1.5 thorpej * txth = ((OPMODE & OPMODE_WINB_TTH) >> OPMODE_WINB_TTH_SHIFT) * 16;
126 1.5 thorpej *
127 1.5 thorpej * However, we just do Store-and-Forward mode on these chips, since
128 1.5 thorpej * the DMA engines seem to be flaky.
129 1.5 thorpej */
130 1.5 thorpej const struct tulip_txthresh_tab tlp_winb_txthresh_tab[] = {
131 1.5 thorpej { 0, "store and forward mode" },
132 1.5 thorpej { 0, NULL },
133 1.5 thorpej };
134 1.5 thorpej
135 1.5 thorpej #define TXTH_WINB_SF 0
136 1.5 thorpej
137 1.1 thorpej void tlp_start __P((struct ifnet *));
138 1.1 thorpej void tlp_watchdog __P((struct ifnet *));
139 1.1 thorpej int tlp_ioctl __P((struct ifnet *, u_long, caddr_t));
140 1.1 thorpej
141 1.1 thorpej void tlp_shutdown __P((void *));
142 1.1 thorpej
143 1.1 thorpej void tlp_reset __P((struct tulip_softc *));
144 1.1 thorpej int tlp_init __P((struct tulip_softc *));
145 1.1 thorpej void tlp_rxdrain __P((struct tulip_softc *));
146 1.1 thorpej void tlp_stop __P((struct tulip_softc *, int));
147 1.1 thorpej int tlp_add_rxbuf __P((struct tulip_softc *, int));
148 1.1 thorpej void tlp_idle __P((struct tulip_softc *, u_int32_t));
149 1.1 thorpej void tlp_srom_idle __P((struct tulip_softc *));
150 1.1 thorpej
151 1.1 thorpej void tlp_filter_setup __P((struct tulip_softc *));
152 1.1 thorpej void tlp_winb_filter_setup __P((struct tulip_softc *));
153 1.1 thorpej
154 1.1 thorpej void tlp_rxintr __P((struct tulip_softc *));
155 1.1 thorpej void tlp_txintr __P((struct tulip_softc *));
156 1.1 thorpej
157 1.1 thorpej void tlp_mii_tick __P((void *));
158 1.1 thorpej void tlp_mii_statchg __P((struct device *));
159 1.5 thorpej void tlp_winb_mii_statchg __P((struct device *));
160 1.1 thorpej
161 1.1 thorpej void tlp_mii_getmedia __P((struct tulip_softc *, struct ifmediareq *));
162 1.1 thorpej int tlp_mii_setmedia __P((struct tulip_softc *));
163 1.1 thorpej
164 1.1 thorpej void tlp_sio_mii_sync __P((struct tulip_softc *));
165 1.1 thorpej void tlp_sio_mii_sendbits __P((struct tulip_softc *, u_int32_t, int));
166 1.1 thorpej int tlp_sio_mii_readreg __P((struct device *, int, int));
167 1.1 thorpej void tlp_sio_mii_writereg __P((struct device *, int, int, int));
168 1.1 thorpej
169 1.1 thorpej int tlp_pnic_mii_readreg __P((struct device *, int, int));
170 1.1 thorpej void tlp_pnic_mii_writereg __P((struct device *, int, int, int));
171 1.1 thorpej
172 1.13 thorpej void tlp_2114x_preinit __P((struct tulip_softc *));
173 1.13 thorpej void tlp_pnic_preinit __P((struct tulip_softc *));
174 1.13 thorpej
175 1.17 thorpej void tlp_21140_reset __P((struct tulip_softc *));
176 1.17 thorpej
177 1.1 thorpej u_int32_t tlp_crc32 __P((const u_int8_t *, size_t));
178 1.1 thorpej #define tlp_mchash(addr) (tlp_crc32((addr), ETHER_ADDR_LEN) & \
179 1.1 thorpej (TULIP_MCHASHSIZE - 1))
180 1.1 thorpej
181 1.1 thorpej #ifdef TLP_DEBUG
182 1.5 thorpej #define DPRINTF(sc, x) if ((sc)->sc_ethercom.ec_if.if_flags & IFF_DEBUG) \
183 1.5 thorpej printf x
184 1.1 thorpej #else
185 1.5 thorpej #define DPRINTF(sc, x) /* nothing */
186 1.1 thorpej #endif
187 1.1 thorpej
188 1.1 thorpej /*
189 1.1 thorpej * tlp_attach:
190 1.1 thorpej *
191 1.1 thorpej * Attach a Tulip interface to the system.
192 1.1 thorpej */
193 1.1 thorpej void
194 1.9 thorpej tlp_attach(sc, enaddr)
195 1.1 thorpej struct tulip_softc *sc;
196 1.1 thorpej const u_int8_t *enaddr;
197 1.1 thorpej {
198 1.1 thorpej struct ifnet *ifp = &sc->sc_ethercom.ec_if;
199 1.1 thorpej int i, rseg, error;
200 1.1 thorpej bus_dma_segment_t seg;
201 1.1 thorpej
202 1.1 thorpej /*
203 1.1 thorpej * NOTE: WE EXPECT THE FRONT-END TO INITIALIZE sc_regshift!
204 1.1 thorpej */
205 1.1 thorpej
206 1.1 thorpej /*
207 1.1 thorpej * Setup the transmit threshold table.
208 1.1 thorpej */
209 1.1 thorpej switch (sc->sc_chip) {
210 1.1 thorpej case TULIP_CHIP_DE425:
211 1.1 thorpej case TULIP_CHIP_21040:
212 1.1 thorpej case TULIP_CHIP_21041:
213 1.1 thorpej sc->sc_txth = tlp_10_txthresh_tab;
214 1.1 thorpej break;
215 1.1 thorpej
216 1.1 thorpej default:
217 1.1 thorpej sc->sc_txth = tlp_10_100_txthresh_tab;
218 1.1 thorpej break;
219 1.1 thorpej }
220 1.1 thorpej
221 1.1 thorpej /*
222 1.1 thorpej * Setup the filter setup function.
223 1.1 thorpej */
224 1.1 thorpej switch (sc->sc_chip) {
225 1.1 thorpej case TULIP_CHIP_WB89C840F:
226 1.1 thorpej sc->sc_filter_setup = tlp_winb_filter_setup;
227 1.1 thorpej break;
228 1.1 thorpej
229 1.1 thorpej default:
230 1.1 thorpej sc->sc_filter_setup = tlp_filter_setup;
231 1.1 thorpej break;
232 1.1 thorpej }
233 1.1 thorpej
234 1.2 thorpej /*
235 1.5 thorpej * Set up the media status change function.
236 1.5 thorpej */
237 1.5 thorpej switch (sc->sc_chip) {
238 1.5 thorpej case TULIP_CHIP_WB89C840F:
239 1.5 thorpej sc->sc_statchg = tlp_winb_mii_statchg;
240 1.5 thorpej break;
241 1.5 thorpej
242 1.5 thorpej default:
243 1.7 thorpej /*
244 1.7 thorpej * We may override this if we have special media
245 1.7 thorpej * handling requirements (e.g. flipping GPIO pins).
246 1.7 thorpej *
247 1.7 thorpej * The pure-MII statchg function covers the basics.
248 1.7 thorpej */
249 1.5 thorpej sc->sc_statchg = tlp_mii_statchg;
250 1.5 thorpej break;
251 1.5 thorpej }
252 1.5 thorpej
253 1.5 thorpej /*
254 1.2 thorpej * Set up various chip-specific quirks.
255 1.2 thorpej */
256 1.2 thorpej switch (sc->sc_chip) {
257 1.13 thorpej case TULIP_CHIP_21140:
258 1.13 thorpej case TULIP_CHIP_21140A:
259 1.13 thorpej case TULIP_CHIP_21142:
260 1.13 thorpej case TULIP_CHIP_21143:
261 1.13 thorpej sc->sc_preinit = tlp_2114x_preinit;
262 1.13 thorpej break;
263 1.13 thorpej
264 1.3 thorpej case TULIP_CHIP_82C168:
265 1.3 thorpej case TULIP_CHIP_82C169:
266 1.13 thorpej sc->sc_preinit = tlp_pnic_preinit;
267 1.13 thorpej
268 1.3 thorpej /*
269 1.3 thorpej * These chips seem to have busted DMA engines; just put them
270 1.3 thorpej * in Store-and-Forward mode from the get-go.
271 1.3 thorpej */
272 1.3 thorpej sc->sc_txthresh = TXTH_SF;
273 1.3 thorpej break;
274 1.3 thorpej
275 1.2 thorpej case TULIP_CHIP_WB89C840F:
276 1.2 thorpej sc->sc_flags |= TULIPF_IC_FS;
277 1.2 thorpej break;
278 1.2 thorpej
279 1.2 thorpej default:
280 1.2 thorpej /* Nothing. */
281 1.2 thorpej }
282 1.2 thorpej
283 1.1 thorpej SIMPLEQ_INIT(&sc->sc_txfreeq);
284 1.1 thorpej SIMPLEQ_INIT(&sc->sc_txdirtyq);
285 1.1 thorpej
286 1.1 thorpej /*
287 1.1 thorpej * Allocate the control data structures, and create and load the
288 1.1 thorpej * DMA map for it.
289 1.1 thorpej */
290 1.1 thorpej if ((error = bus_dmamem_alloc(sc->sc_dmat,
291 1.1 thorpej sizeof(struct tulip_control_data), PAGE_SIZE, 0, &seg, 1, &rseg,
292 1.1 thorpej 0)) != 0) {
293 1.1 thorpej printf("%s: unable to allocate control data, error = %d\n",
294 1.1 thorpej sc->sc_dev.dv_xname, error);
295 1.1 thorpej goto fail_0;
296 1.1 thorpej }
297 1.1 thorpej
298 1.1 thorpej if ((error = bus_dmamem_map(sc->sc_dmat, &seg, rseg,
299 1.1 thorpej sizeof(struct tulip_control_data), (caddr_t *)&sc->sc_control_data,
300 1.1 thorpej BUS_DMA_COHERENT)) != 0) {
301 1.1 thorpej printf("%s: unable to map control data, error = %d\n",
302 1.1 thorpej sc->sc_dev.dv_xname, error);
303 1.1 thorpej goto fail_1;
304 1.1 thorpej }
305 1.1 thorpej
306 1.1 thorpej if ((error = bus_dmamap_create(sc->sc_dmat,
307 1.1 thorpej sizeof(struct tulip_control_data), 1,
308 1.1 thorpej sizeof(struct tulip_control_data), 0, 0, &sc->sc_cddmamap)) != 0) {
309 1.1 thorpej printf("%s: unable to create control data DMA map, "
310 1.1 thorpej "error = %d\n", sc->sc_dev.dv_xname, error);
311 1.1 thorpej goto fail_2;
312 1.1 thorpej }
313 1.1 thorpej
314 1.1 thorpej if ((error = bus_dmamap_load(sc->sc_dmat, sc->sc_cddmamap,
315 1.1 thorpej sc->sc_control_data, sizeof(struct tulip_control_data), NULL,
316 1.1 thorpej 0)) != 0) {
317 1.1 thorpej printf("%s: unable to load control data DMA map, error = %d\n",
318 1.1 thorpej sc->sc_dev.dv_xname, error);
319 1.1 thorpej goto fail_3;
320 1.1 thorpej }
321 1.1 thorpej
322 1.1 thorpej /*
323 1.1 thorpej * Create the transmit buffer DMA maps.
324 1.1 thorpej */
325 1.1 thorpej for (i = 0; i < TULIP_TXQUEUELEN; i++) {
326 1.1 thorpej if ((error = bus_dmamap_create(sc->sc_dmat, MCLBYTES,
327 1.1 thorpej TULIP_NTXSEGS, MCLBYTES, 0, 0,
328 1.1 thorpej &sc->sc_txsoft[i].txs_dmamap)) != 0) {
329 1.1 thorpej printf("%s: unable to create tx DMA map %d, "
330 1.1 thorpej "error = %d\n", sc->sc_dev.dv_xname, i, error);
331 1.1 thorpej goto fail_4;
332 1.1 thorpej }
333 1.1 thorpej }
334 1.1 thorpej
335 1.1 thorpej /*
336 1.1 thorpej * Create the recieve buffer DMA maps.
337 1.1 thorpej */
338 1.1 thorpej for (i = 0; i < TULIP_NRXDESC; i++) {
339 1.1 thorpej if ((error = bus_dmamap_create(sc->sc_dmat, MCLBYTES, 1,
340 1.1 thorpej MCLBYTES, 0, 0, &sc->sc_rxsoft[i].rxs_dmamap)) != 0) {
341 1.1 thorpej printf("%s: unable to create rx DMA map %d, "
342 1.1 thorpej "error = %d\n", sc->sc_dev.dv_xname, i, error);
343 1.1 thorpej goto fail_5;
344 1.1 thorpej }
345 1.1 thorpej sc->sc_rxsoft[i].rxs_mbuf = NULL;
346 1.1 thorpej }
347 1.1 thorpej
348 1.1 thorpej /*
349 1.1 thorpej * Reset the chip to a known state.
350 1.1 thorpej */
351 1.1 thorpej tlp_reset(sc);
352 1.1 thorpej
353 1.1 thorpej /* Announce ourselves. */
354 1.1 thorpej printf("%s: %s%sEthernet address %s\n", sc->sc_dev.dv_xname,
355 1.9 thorpej sc->sc_name[0] != '\0' ? sc->sc_name : "",
356 1.9 thorpej sc->sc_name[0] != '\0' ? ", " : "",
357 1.1 thorpej ether_sprintf(enaddr));
358 1.1 thorpej
359 1.1 thorpej /*
360 1.1 thorpej * Initialize our media structures. This may probe the MII, if
361 1.1 thorpej * present.
362 1.1 thorpej */
363 1.1 thorpej (*sc->sc_mediasw->tmsw_init)(sc);
364 1.1 thorpej
365 1.1 thorpej ifp = &sc->sc_ethercom.ec_if;
366 1.1 thorpej strcpy(ifp->if_xname, sc->sc_dev.dv_xname);
367 1.1 thorpej ifp->if_softc = sc;
368 1.1 thorpej ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST;
369 1.1 thorpej ifp->if_ioctl = tlp_ioctl;
370 1.1 thorpej ifp->if_start = tlp_start;
371 1.1 thorpej ifp->if_watchdog = tlp_watchdog;
372 1.1 thorpej
373 1.1 thorpej /*
374 1.1 thorpej * Attach the interface.
375 1.1 thorpej */
376 1.1 thorpej if_attach(ifp);
377 1.1 thorpej ether_ifattach(ifp, enaddr);
378 1.1 thorpej #if NBPFILTER > 0
379 1.1 thorpej bpfattach(&sc->sc_ethercom.ec_if.if_bpf, ifp, DLT_EN10MB,
380 1.1 thorpej sizeof(struct ether_header));
381 1.1 thorpej #endif
382 1.1 thorpej
383 1.1 thorpej /*
384 1.1 thorpej * Make sure the interface is shutdown during reboot.
385 1.1 thorpej */
386 1.1 thorpej sc->sc_sdhook = shutdownhook_establish(tlp_shutdown, sc);
387 1.1 thorpej if (sc->sc_sdhook == NULL)
388 1.1 thorpej printf("%s: WARNING: unable to establish shutdown hook\n",
389 1.1 thorpej sc->sc_dev.dv_xname);
390 1.1 thorpej return;
391 1.1 thorpej
392 1.1 thorpej /*
393 1.1 thorpej * Free any resources we've allocated during the failed attach
394 1.1 thorpej * attempt. Do this in reverse order and fall through.
395 1.1 thorpej */
396 1.1 thorpej fail_5:
397 1.1 thorpej for (i = 0; i < TULIP_NRXDESC; i++) {
398 1.1 thorpej if (sc->sc_rxsoft[i].rxs_dmamap != NULL)
399 1.1 thorpej bus_dmamap_destroy(sc->sc_dmat,
400 1.1 thorpej sc->sc_rxsoft[i].rxs_dmamap);
401 1.1 thorpej }
402 1.1 thorpej fail_4:
403 1.1 thorpej for (i = 0; i < TULIP_TXQUEUELEN; i++) {
404 1.1 thorpej if (sc->sc_txsoft[i].txs_dmamap != NULL)
405 1.1 thorpej bus_dmamap_destroy(sc->sc_dmat,
406 1.1 thorpej sc->sc_txsoft[i].txs_dmamap);
407 1.1 thorpej }
408 1.1 thorpej bus_dmamap_unload(sc->sc_dmat, sc->sc_cddmamap);
409 1.1 thorpej fail_3:
410 1.1 thorpej bus_dmamap_destroy(sc->sc_dmat, sc->sc_cddmamap);
411 1.1 thorpej fail_2:
412 1.1 thorpej bus_dmamem_unmap(sc->sc_dmat, (caddr_t)sc->sc_control_data,
413 1.1 thorpej sizeof(struct tulip_control_data));
414 1.1 thorpej fail_1:
415 1.1 thorpej bus_dmamem_free(sc->sc_dmat, &seg, rseg);
416 1.1 thorpej fail_0:
417 1.1 thorpej return;
418 1.1 thorpej }
419 1.1 thorpej
420 1.1 thorpej /*
421 1.1 thorpej * tlp_shutdown:
422 1.1 thorpej *
423 1.1 thorpej * Make sure the interface is stopped at reboot time.
424 1.1 thorpej */
425 1.1 thorpej void
426 1.1 thorpej tlp_shutdown(arg)
427 1.1 thorpej void *arg;
428 1.1 thorpej {
429 1.1 thorpej struct tulip_softc *sc = arg;
430 1.1 thorpej
431 1.1 thorpej tlp_stop(sc, 1);
432 1.1 thorpej }
433 1.1 thorpej
434 1.1 thorpej /*
435 1.1 thorpej * tlp_start: [ifnet interface function]
436 1.1 thorpej *
437 1.1 thorpej * Start packet transmission on the interface.
438 1.1 thorpej */
439 1.1 thorpej void
440 1.1 thorpej tlp_start(ifp)
441 1.1 thorpej struct ifnet *ifp;
442 1.1 thorpej {
443 1.1 thorpej struct tulip_softc *sc = ifp->if_softc;
444 1.1 thorpej struct mbuf *m0, *m;
445 1.2 thorpej struct tulip_txsoft *txs, *last_txs;
446 1.1 thorpej bus_dmamap_t dmamap;
447 1.1 thorpej int error, firsttx, nexttx, lasttx, ofree, seg;
448 1.1 thorpej
449 1.5 thorpej DPRINTF(sc, ("%s: tlp_start: sc_flags 0x%08x, if_flags 0x%08x\n",
450 1.1 thorpej sc->sc_dev.dv_xname, sc->sc_flags, ifp->if_flags));
451 1.1 thorpej
452 1.1 thorpej /*
453 1.1 thorpej * If we want a filter setup, it means no more descriptors were
454 1.1 thorpej * available for the setup routine. Let it get a chance to wedge
455 1.1 thorpej * itself into the ring.
456 1.1 thorpej */
457 1.1 thorpej if (sc->sc_flags & TULIPF_WANT_SETUP)
458 1.1 thorpej ifp->if_flags |= IFF_OACTIVE;
459 1.1 thorpej
460 1.1 thorpej if ((ifp->if_flags & (IFF_RUNNING|IFF_OACTIVE)) != IFF_RUNNING)
461 1.1 thorpej return;
462 1.1 thorpej
463 1.1 thorpej /*
464 1.1 thorpej * Remember the previous number of free descriptors and
465 1.1 thorpej * the first descriptor we'll use.
466 1.1 thorpej */
467 1.1 thorpej ofree = sc->sc_txfree;
468 1.1 thorpej firsttx = sc->sc_txnext;
469 1.1 thorpej
470 1.5 thorpej DPRINTF(sc, ("%s: tlp_start: txfree %d, txnext %d\n",
471 1.1 thorpej sc->sc_dev.dv_xname, ofree, firsttx));
472 1.1 thorpej
473 1.1 thorpej /*
474 1.1 thorpej * Loop through the send queue, setting up transmit descriptors
475 1.1 thorpej * until we drain the queue, or use up all available transmit
476 1.1 thorpej * descriptors.
477 1.1 thorpej */
478 1.1 thorpej while ((txs = SIMPLEQ_FIRST(&sc->sc_txfreeq)) != NULL &&
479 1.1 thorpej sc->sc_txfree != 0) {
480 1.1 thorpej /*
481 1.1 thorpej * Grab a packet off the queue.
482 1.1 thorpej */
483 1.1 thorpej IF_DEQUEUE(&ifp->if_snd, m0);
484 1.1 thorpej if (m0 == NULL)
485 1.1 thorpej break;
486 1.1 thorpej
487 1.1 thorpej dmamap = txs->txs_dmamap;
488 1.1 thorpej
489 1.1 thorpej /*
490 1.1 thorpej * Load the DMA map. If this fails, the packet either
491 1.1 thorpej * didn't fit in the alloted number of segments, or we were
492 1.1 thorpej * short on resources. In this case, we'll copy and try
493 1.1 thorpej * again.
494 1.1 thorpej */
495 1.1 thorpej if (bus_dmamap_load_mbuf(sc->sc_dmat, dmamap, m0,
496 1.1 thorpej BUS_DMA_NOWAIT) != 0) {
497 1.1 thorpej MGETHDR(m, M_DONTWAIT, MT_DATA);
498 1.1 thorpej if (m == NULL) {
499 1.1 thorpej printf("%s: unable to allocate Tx mbuf\n",
500 1.1 thorpej sc->sc_dev.dv_xname);
501 1.1 thorpej IF_PREPEND(&ifp->if_snd, m0);
502 1.1 thorpej break;
503 1.1 thorpej }
504 1.1 thorpej if (m0->m_pkthdr.len > MHLEN) {
505 1.1 thorpej MCLGET(m, M_DONTWAIT);
506 1.1 thorpej if ((m->m_flags & M_EXT) == 0) {
507 1.1 thorpej printf("%s: unable to allocate Tx "
508 1.1 thorpej "cluster\n", sc->sc_dev.dv_xname);
509 1.1 thorpej m_freem(m);
510 1.1 thorpej IF_PREPEND(&ifp->if_snd, m0);
511 1.1 thorpej break;
512 1.1 thorpej }
513 1.1 thorpej }
514 1.1 thorpej m_copydata(m0, 0, m0->m_pkthdr.len, mtod(m, caddr_t));
515 1.1 thorpej m->m_pkthdr.len = m->m_len = m0->m_pkthdr.len;
516 1.1 thorpej m_freem(m0);
517 1.1 thorpej m0 = m;
518 1.1 thorpej error = bus_dmamap_load_mbuf(sc->sc_dmat, dmamap,
519 1.1 thorpej m0, BUS_DMA_NOWAIT);
520 1.1 thorpej if (error) {
521 1.1 thorpej printf("%s: unable to load Tx buffer, "
522 1.1 thorpej "error = %d\n", sc->sc_dev.dv_xname, error);
523 1.1 thorpej IF_PREPEND(&ifp->if_snd, m0);
524 1.1 thorpej break;
525 1.1 thorpej }
526 1.1 thorpej }
527 1.1 thorpej
528 1.1 thorpej /*
529 1.1 thorpej * Ensure we have enough descriptors free to describe
530 1.1 thorpej * the packet.
531 1.1 thorpej */
532 1.1 thorpej if (dmamap->dm_nsegs > sc->sc_txfree) {
533 1.1 thorpej /*
534 1.1 thorpej * Not enough free descriptors to transmit this
535 1.1 thorpej * packet. We haven't committed to anything yet,
536 1.1 thorpej * so just unload the DMA map, put the packet
537 1.1 thorpej * back on the queue, and punt. Notify the upper
538 1.1 thorpej * layer that there are no more slots left.
539 1.1 thorpej *
540 1.1 thorpej * XXX We could allocate an mbuf and copy, but
541 1.1 thorpej * XXX it is worth it?
542 1.1 thorpej */
543 1.1 thorpej ifp->if_flags |= IFF_OACTIVE;
544 1.1 thorpej bus_dmamap_unload(sc->sc_dmat, dmamap);
545 1.1 thorpej IF_PREPEND(&ifp->if_snd, m0);
546 1.1 thorpej break;
547 1.1 thorpej }
548 1.1 thorpej
549 1.1 thorpej /*
550 1.1 thorpej * WE ARE NOW COMMITTED TO TRANSMITTING THE PACKET.
551 1.1 thorpej */
552 1.1 thorpej
553 1.1 thorpej /* Sync the DMA map. */
554 1.1 thorpej bus_dmamap_sync(sc->sc_dmat, dmamap, 0, dmamap->dm_mapsize,
555 1.1 thorpej BUS_DMASYNC_PREWRITE);
556 1.1 thorpej
557 1.1 thorpej /*
558 1.1 thorpej * Initialize the transmit descriptors.
559 1.1 thorpej */
560 1.1 thorpej for (nexttx = sc->sc_txnext, seg = 0;
561 1.1 thorpej seg < dmamap->dm_nsegs;
562 1.1 thorpej seg++, nexttx = TULIP_NEXTTX(nexttx)) {
563 1.1 thorpej /*
564 1.1 thorpej * If this is the first descriptor we're
565 1.1 thorpej * enqueueing, don't set the OWN bit just
566 1.1 thorpej * yet. That could cause a race condition.
567 1.1 thorpej * We'll do it below.
568 1.1 thorpej */
569 1.1 thorpej sc->sc_txdescs[nexttx].td_status =
570 1.1 thorpej (nexttx == firsttx) ? 0 : TDSTAT_OWN;
571 1.1 thorpej sc->sc_txdescs[nexttx].td_bufaddr1 =
572 1.1 thorpej dmamap->dm_segs[seg].ds_addr;
573 1.1 thorpej sc->sc_txdescs[nexttx].td_ctl =
574 1.1 thorpej (dmamap->dm_segs[seg].ds_len << TDCTL_SIZE1_SHIFT) |
575 1.1 thorpej TDCTL_CH;
576 1.1 thorpej lasttx = nexttx;
577 1.1 thorpej }
578 1.1 thorpej
579 1.1 thorpej /* Set `first segment' and `last segment' appropriately. */
580 1.1 thorpej sc->sc_txdescs[sc->sc_txnext].td_ctl |= TDCTL_Tx_FS;
581 1.1 thorpej sc->sc_txdescs[lasttx].td_ctl |= TDCTL_Tx_LS;
582 1.1 thorpej
583 1.1 thorpej #ifdef TLP_DEBUG
584 1.5 thorpej if (ifp->if_flags & IFF_DEBUG) {
585 1.5 thorpej printf(" txsoft %p trainsmit chain:\n", txs);
586 1.5 thorpej for (seg = sc->sc_txnext;; seg = TULIP_NEXTTX(seg)) {
587 1.5 thorpej printf(" descriptor %d:\n", seg);
588 1.5 thorpej printf(" td_status: 0x%08x\n",
589 1.5 thorpej sc->sc_txdescs[seg].td_status);
590 1.5 thorpej printf(" td_ctl: 0x%08x\n",
591 1.5 thorpej sc->sc_txdescs[seg].td_ctl);
592 1.5 thorpej printf(" td_bufaddr1: 0x%08x\n",
593 1.5 thorpej sc->sc_txdescs[seg].td_bufaddr1);
594 1.5 thorpej printf(" td_bufaddr2: 0x%08x\n",
595 1.5 thorpej sc->sc_txdescs[seg].td_bufaddr2);
596 1.5 thorpej if (seg == lasttx)
597 1.5 thorpej break;
598 1.5 thorpej }
599 1.1 thorpej }
600 1.1 thorpej #endif
601 1.1 thorpej
602 1.1 thorpej /* Sync the descriptors we're using. */
603 1.1 thorpej TULIP_CDTXSYNC(sc, sc->sc_txnext, dmamap->dm_nsegs,
604 1.1 thorpej BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
605 1.1 thorpej
606 1.1 thorpej /*
607 1.1 thorpej * Store a pointer to the packet so we can free it later,
608 1.1 thorpej * and remember what txdirty will be once the packet is
609 1.1 thorpej * done.
610 1.1 thorpej */
611 1.1 thorpej txs->txs_mbuf = m0;
612 1.1 thorpej txs->txs_firstdesc = sc->sc_txnext;
613 1.1 thorpej txs->txs_lastdesc = lasttx;
614 1.1 thorpej
615 1.1 thorpej /* Advance the tx pointer. */
616 1.1 thorpej sc->sc_txfree -= dmamap->dm_nsegs;
617 1.1 thorpej sc->sc_txnext = nexttx;
618 1.1 thorpej
619 1.1 thorpej SIMPLEQ_REMOVE_HEAD(&sc->sc_txfreeq, txs, txs_q);
620 1.1 thorpej SIMPLEQ_INSERT_TAIL(&sc->sc_txdirtyq, txs, txs_q);
621 1.1 thorpej
622 1.2 thorpej last_txs = txs;
623 1.2 thorpej
624 1.1 thorpej #if NBPFILTER > 0
625 1.1 thorpej /*
626 1.1 thorpej * Pass the packet to any BPF listeners.
627 1.1 thorpej */
628 1.1 thorpej if (ifp->if_bpf)
629 1.1 thorpej bpf_mtap(ifp->if_bpf, m0);
630 1.1 thorpej #endif /* NBPFILTER > 0 */
631 1.1 thorpej }
632 1.1 thorpej
633 1.1 thorpej if (txs == NULL || sc->sc_txfree == 0) {
634 1.1 thorpej /* No more slots left; notify upper layer. */
635 1.1 thorpej ifp->if_flags |= IFF_OACTIVE;
636 1.1 thorpej }
637 1.1 thorpej
638 1.1 thorpej if (sc->sc_txfree != ofree) {
639 1.5 thorpej DPRINTF(sc, ("%s: packets enqueued, IC on %d, OWN on %d\n",
640 1.1 thorpej sc->sc_dev.dv_xname, lasttx, firsttx));
641 1.1 thorpej /*
642 1.1 thorpej * Cause a transmit interrupt to happen on the
643 1.1 thorpej * last packet we enqueued.
644 1.1 thorpej */
645 1.1 thorpej sc->sc_txdescs[lasttx].td_ctl |= TDCTL_Tx_IC;
646 1.1 thorpej TULIP_CDTXSYNC(sc, lasttx, 1,
647 1.1 thorpej BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
648 1.2 thorpej
649 1.2 thorpej /*
650 1.2 thorpej * Some clone chips want IC on the *first* segment in
651 1.2 thorpej * the packet. Appease them.
652 1.2 thorpej */
653 1.2 thorpej if ((sc->sc_flags & TULIPF_IC_FS) != 0 &&
654 1.2 thorpej last_txs->txs_firstdesc != lasttx) {
655 1.2 thorpej sc->sc_txdescs[last_txs->txs_firstdesc].td_ctl |=
656 1.2 thorpej TDCTL_Tx_IC;
657 1.2 thorpej TULIP_CDTXSYNC(sc, last_txs->txs_firstdesc, 1,
658 1.2 thorpej BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
659 1.2 thorpej }
660 1.1 thorpej
661 1.1 thorpej /*
662 1.1 thorpej * The entire packet chain is set up. Give the
663 1.1 thorpej * first descriptor to the chip now.
664 1.1 thorpej */
665 1.1 thorpej sc->sc_txdescs[firsttx].td_status |= TDSTAT_OWN;
666 1.1 thorpej TULIP_CDTXSYNC(sc, firsttx, 1,
667 1.1 thorpej BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
668 1.1 thorpej
669 1.1 thorpej /* Wake up the transmitter. */
670 1.1 thorpej /* XXX USE AUTOPOLLING? */
671 1.1 thorpej TULIP_WRITE(sc, CSR_TXPOLL, TXPOLL_TPD);
672 1.1 thorpej
673 1.1 thorpej /* Set a watchdog timer in case the chip flakes out. */
674 1.1 thorpej ifp->if_timer = 5;
675 1.1 thorpej }
676 1.1 thorpej }
677 1.1 thorpej
678 1.1 thorpej /*
679 1.1 thorpej * tlp_watchdog: [ifnet interface function]
680 1.1 thorpej *
681 1.1 thorpej * Watchdog timer handler.
682 1.1 thorpej */
683 1.1 thorpej void
684 1.1 thorpej tlp_watchdog(ifp)
685 1.1 thorpej struct ifnet *ifp;
686 1.1 thorpej {
687 1.1 thorpej struct tulip_softc *sc = ifp->if_softc;
688 1.4 thorpej int doing_setup, doing_transmit;
689 1.4 thorpej
690 1.4 thorpej doing_setup = (sc->sc_flags & TULIPF_DOING_SETUP);
691 1.4 thorpej doing_transmit = (SIMPLEQ_FIRST(&sc->sc_txdirtyq) != NULL);
692 1.4 thorpej
693 1.4 thorpej if (doing_setup && doing_transmit) {
694 1.4 thorpej printf("%s: filter setup and transmit timeout\n",
695 1.4 thorpej sc->sc_dev.dv_xname);
696 1.4 thorpej ifp->if_oerrors++;
697 1.4 thorpej } else if (doing_transmit) {
698 1.4 thorpej printf("%s: transmit timeout\n", sc->sc_dev.dv_xname);
699 1.4 thorpej ifp->if_oerrors++;
700 1.4 thorpej } else if (doing_setup)
701 1.4 thorpej printf("%s: filter setup timeout\n", sc->sc_dev.dv_xname);
702 1.4 thorpej else
703 1.4 thorpej printf("%s: spurious watchdog timeout\n", sc->sc_dev.dv_xname);
704 1.1 thorpej
705 1.1 thorpej (void) tlp_init(sc);
706 1.1 thorpej
707 1.1 thorpej /* Try to get more packets going. */
708 1.1 thorpej tlp_start(ifp);
709 1.1 thorpej }
710 1.1 thorpej
711 1.1 thorpej /*
712 1.1 thorpej * tlp_ioctl: [ifnet interface function]
713 1.1 thorpej *
714 1.1 thorpej * Handle control requests from the operator.
715 1.1 thorpej */
716 1.1 thorpej int
717 1.1 thorpej tlp_ioctl(ifp, cmd, data)
718 1.1 thorpej struct ifnet *ifp;
719 1.1 thorpej u_long cmd;
720 1.1 thorpej caddr_t data;
721 1.1 thorpej {
722 1.1 thorpej struct tulip_softc *sc = ifp->if_softc;
723 1.1 thorpej struct ifreq *ifr = (struct ifreq *)data;
724 1.1 thorpej struct ifaddr *ifa = (struct ifaddr *)data;
725 1.1 thorpej int s, error = 0;
726 1.1 thorpej
727 1.1 thorpej s = splnet();
728 1.1 thorpej
729 1.1 thorpej switch (cmd) {
730 1.1 thorpej case SIOCSIFADDR:
731 1.1 thorpej ifp->if_flags |= IFF_UP;
732 1.1 thorpej
733 1.1 thorpej switch (ifa->ifa_addr->sa_family) {
734 1.1 thorpej #ifdef INET
735 1.1 thorpej case AF_INET:
736 1.1 thorpej if ((error = tlp_init(sc)) != 0)
737 1.1 thorpej break;
738 1.1 thorpej arp_ifinit(ifp, ifa);
739 1.1 thorpej break;
740 1.1 thorpej #endif /* INET */
741 1.1 thorpej #ifdef NS
742 1.1 thorpej case AF_NS:
743 1.1 thorpej {
744 1.1 thorpej struct ns_addr *ina = &IA_SNS(ifa)->sns_addr;
745 1.1 thorpej
746 1.1 thorpej if (ns_nullhost(*ina))
747 1.1 thorpej ina->x_host = *(union ns_host *)
748 1.1 thorpej LLADDR(ifp->if_sadl);
749 1.1 thorpej else
750 1.1 thorpej bcopy(ina->x_host.c_host, LLADDR(ifp->if_sadl),
751 1.1 thorpej ifp->if_addrlen);
752 1.1 thorpej /* Set new address. */
753 1.1 thorpej error = tlp_init(sc);
754 1.1 thorpej break;
755 1.1 thorpej }
756 1.1 thorpej #endif /* NS */
757 1.1 thorpej default:
758 1.1 thorpej error = tlp_init(sc);
759 1.1 thorpej break;
760 1.1 thorpej }
761 1.1 thorpej break;
762 1.1 thorpej
763 1.1 thorpej case SIOCSIFMTU:
764 1.1 thorpej if (ifr->ifr_mtu > ETHERMTU)
765 1.1 thorpej error = EINVAL;
766 1.1 thorpej else
767 1.1 thorpej ifp->if_mtu = ifr->ifr_mtu;
768 1.1 thorpej break;
769 1.1 thorpej
770 1.1 thorpej case SIOCSIFFLAGS:
771 1.1 thorpej if ((ifp->if_flags & IFF_UP) == 0 &&
772 1.1 thorpej (ifp->if_flags & IFF_RUNNING) != 0) {
773 1.1 thorpej /*
774 1.1 thorpej * If interface is marked down and it is running, then
775 1.1 thorpej * stop it.
776 1.1 thorpej */
777 1.1 thorpej tlp_stop(sc, 1);
778 1.1 thorpej } else if ((ifp->if_flags & IFF_UP) != 0 &&
779 1.1 thorpej (ifp->if_flags & IFF_RUNNING) == 0) {
780 1.1 thorpej /*
781 1.1 thorpej * If interfase it marked up and it is stopped, then
782 1.1 thorpej * start it.
783 1.1 thorpej */
784 1.1 thorpej error = tlp_init(sc);
785 1.1 thorpej } else if ((ifp->if_flags & IFF_UP) != 0) {
786 1.1 thorpej /*
787 1.1 thorpej * Reset the interface to pick up changes in any other
788 1.1 thorpej * flags that affect the hardware state.
789 1.1 thorpej */
790 1.1 thorpej error = tlp_init(sc);
791 1.1 thorpej }
792 1.1 thorpej break;
793 1.1 thorpej
794 1.1 thorpej case SIOCADDMULTI:
795 1.1 thorpej case SIOCDELMULTI:
796 1.1 thorpej error = (cmd == SIOCADDMULTI) ?
797 1.1 thorpej ether_addmulti(ifr, &sc->sc_ethercom) :
798 1.1 thorpej ether_delmulti(ifr, &sc->sc_ethercom);
799 1.1 thorpej
800 1.1 thorpej if (error == ENETRESET) {
801 1.1 thorpej /*
802 1.1 thorpej * Multicast list has changed. Set the filter
803 1.1 thorpej * accordingly.
804 1.1 thorpej */
805 1.1 thorpej (*sc->sc_filter_setup)(sc);
806 1.1 thorpej error = 0;
807 1.1 thorpej }
808 1.1 thorpej break;
809 1.1 thorpej
810 1.1 thorpej case SIOCSIFMEDIA:
811 1.1 thorpej case SIOCGIFMEDIA:
812 1.1 thorpej error = ifmedia_ioctl(ifp, ifr, &sc->sc_mii.mii_media, cmd);
813 1.1 thorpej break;
814 1.1 thorpej
815 1.1 thorpej default:
816 1.1 thorpej error = EINVAL;
817 1.1 thorpej break;
818 1.1 thorpej }
819 1.1 thorpej
820 1.1 thorpej /* Try to get more packets going. */
821 1.1 thorpej tlp_start(ifp);
822 1.1 thorpej
823 1.1 thorpej splx(s);
824 1.1 thorpej return (error);
825 1.1 thorpej }
826 1.1 thorpej
827 1.1 thorpej /*
828 1.1 thorpej * tlp_intr:
829 1.1 thorpej *
830 1.1 thorpej * Interrupt service routine.
831 1.1 thorpej */
832 1.1 thorpej int
833 1.1 thorpej tlp_intr(arg)
834 1.1 thorpej void *arg;
835 1.1 thorpej {
836 1.1 thorpej struct tulip_softc *sc = arg;
837 1.1 thorpej struct ifnet *ifp = &sc->sc_ethercom.ec_if;
838 1.5 thorpej u_int32_t status, rxstatus, txstatus;
839 1.1 thorpej int handled = 0, txthresh;
840 1.1 thorpej
841 1.5 thorpej DPRINTF(sc, ("%s: tlp_intr\n", sc->sc_dev.dv_xname));
842 1.11 thorpej
843 1.11 thorpej /*
844 1.11 thorpej * If the interface isn't running, the interrupt couldn't
845 1.11 thorpej * possibly have come from us.
846 1.11 thorpej */
847 1.11 thorpej if ((ifp->if_flags & IFF_RUNNING) == 0)
848 1.11 thorpej return (0);
849 1.1 thorpej
850 1.1 thorpej for (;;) {
851 1.1 thorpej status = TULIP_READ(sc, CSR_STATUS);
852 1.1 thorpej if (status)
853 1.1 thorpej TULIP_WRITE(sc, CSR_STATUS, status);
854 1.1 thorpej
855 1.1 thorpej if ((status & sc->sc_inten) == 0)
856 1.1 thorpej break;
857 1.1 thorpej
858 1.1 thorpej handled = 1;
859 1.1 thorpej
860 1.5 thorpej rxstatus = status & sc->sc_rxint_mask;
861 1.5 thorpej txstatus = status & sc->sc_txint_mask;
862 1.5 thorpej
863 1.5 thorpej if (rxstatus) {
864 1.1 thorpej /* Grab new any new packets. */
865 1.1 thorpej tlp_rxintr(sc);
866 1.1 thorpej
867 1.5 thorpej if (rxstatus & STATUS_RWT)
868 1.1 thorpej printf("%s: receive watchdog timeout\n",
869 1.1 thorpej sc->sc_dev.dv_xname);
870 1.1 thorpej
871 1.5 thorpej if (rxstatus & STATUS_RU) {
872 1.1 thorpej printf("%s: receive ring overrun\n",
873 1.1 thorpej sc->sc_dev.dv_xname);
874 1.1 thorpej /* Get the receive process going again. */
875 1.1 thorpej tlp_idle(sc, OPMODE_SR);
876 1.1 thorpej TULIP_WRITE(sc, CSR_RXLIST,
877 1.1 thorpej TULIP_CDRXADDR(sc, sc->sc_rxptr));
878 1.1 thorpej TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
879 1.1 thorpej TULIP_WRITE(sc, CSR_RXPOLL, RXPOLL_RPD);
880 1.1 thorpej break;
881 1.1 thorpej }
882 1.1 thorpej }
883 1.1 thorpej
884 1.5 thorpej if (txstatus) {
885 1.1 thorpej /* Sweep up transmit descriptors. */
886 1.1 thorpej tlp_txintr(sc);
887 1.1 thorpej
888 1.5 thorpej if (txstatus & STATUS_TJT)
889 1.1 thorpej printf("%s: transmit jabber timeout\n",
890 1.1 thorpej sc->sc_dev.dv_xname);
891 1.1 thorpej
892 1.5 thorpej if (txstatus & STATUS_UNF) {
893 1.1 thorpej /*
894 1.1 thorpej * Increase our transmit threshold if
895 1.1 thorpej * another is available.
896 1.1 thorpej */
897 1.1 thorpej txthresh = sc->sc_txthresh + 1;
898 1.1 thorpej if (sc->sc_txth[txthresh].txth_name != NULL) {
899 1.1 thorpej /* Idle the transmit process. */
900 1.1 thorpej tlp_idle(sc, OPMODE_ST);
901 1.1 thorpej
902 1.1 thorpej sc->sc_txthresh = txthresh;
903 1.1 thorpej sc->sc_opmode &= ~(OPMODE_TR|OPMODE_SF);
904 1.1 thorpej sc->sc_opmode |=
905 1.1 thorpej sc->sc_txth[txthresh].txth_opmode;
906 1.1 thorpej printf("%s: transmit underrun; new "
907 1.1 thorpej "threshold: %s\n",
908 1.1 thorpej sc->sc_dev.dv_xname,
909 1.1 thorpej sc->sc_txth[txthresh].txth_name);
910 1.1 thorpej
911 1.1 thorpej /*
912 1.1 thorpej * Set the new threshold and restart
913 1.1 thorpej * the transmit process.
914 1.1 thorpej */
915 1.1 thorpej TULIP_WRITE(sc, CSR_OPMODE,
916 1.1 thorpej sc->sc_opmode);
917 1.1 thorpej }
918 1.1 thorpej /*
919 1.1 thorpej * XXX Log every Nth underrun from
920 1.1 thorpej * XXX now on?
921 1.1 thorpej */
922 1.1 thorpej }
923 1.1 thorpej }
924 1.1 thorpej
925 1.1 thorpej if (status & (STATUS_TPS|STATUS_RPS)) {
926 1.1 thorpej if (status & STATUS_TPS)
927 1.1 thorpej printf("%s: transmit process stopped\n",
928 1.1 thorpej sc->sc_dev.dv_xname);
929 1.1 thorpej if (status & STATUS_RPS)
930 1.1 thorpej printf("%s: receive process stopped\n",
931 1.1 thorpej sc->sc_dev.dv_xname);
932 1.1 thorpej (void) tlp_init(sc);
933 1.1 thorpej break;
934 1.1 thorpej }
935 1.1 thorpej
936 1.1 thorpej if (status & STATUS_SE) {
937 1.1 thorpej const char *str;
938 1.1 thorpej switch (status & STATUS_EB) {
939 1.1 thorpej case STATUS_EB_PARITY:
940 1.1 thorpej str = "parity error";
941 1.1 thorpej break;
942 1.1 thorpej
943 1.1 thorpej case STATUS_EB_MABT:
944 1.1 thorpej str = "master abort";
945 1.1 thorpej break;
946 1.1 thorpej
947 1.1 thorpej case STATUS_EB_TABT:
948 1.1 thorpej str = "target abort";
949 1.1 thorpej break;
950 1.1 thorpej
951 1.1 thorpej default:
952 1.1 thorpej str = "unknown error";
953 1.1 thorpej break;
954 1.1 thorpej }
955 1.1 thorpej printf("%s: fatal system error: %s\n",
956 1.1 thorpej sc->sc_dev.dv_xname, str);
957 1.1 thorpej (void) tlp_init(sc);
958 1.1 thorpej break;
959 1.1 thorpej }
960 1.1 thorpej
961 1.1 thorpej /*
962 1.1 thorpej * Not handled:
963 1.1 thorpej *
964 1.1 thorpej * Transmit buffer unavailable -- normal
965 1.1 thorpej * condition, nothing to do, really.
966 1.1 thorpej *
967 1.1 thorpej * General purpose timer experied -- we don't
968 1.1 thorpej * use the general purpose timer.
969 1.1 thorpej *
970 1.1 thorpej * Early receive interrupt -- not available on
971 1.1 thorpej * all chips, we just use RI. We also only
972 1.1 thorpej * use single-segment receive DMA, so this
973 1.1 thorpej * is mostly useless.
974 1.1 thorpej */
975 1.1 thorpej }
976 1.1 thorpej
977 1.1 thorpej /* Try to get more packets going. */
978 1.1 thorpej tlp_start(ifp);
979 1.1 thorpej
980 1.1 thorpej return (handled);
981 1.1 thorpej }
982 1.1 thorpej
983 1.1 thorpej /*
984 1.1 thorpej * tlp_rxintr:
985 1.1 thorpej *
986 1.1 thorpej * Helper; handle receive interrupts.
987 1.1 thorpej */
988 1.1 thorpej void
989 1.1 thorpej tlp_rxintr(sc)
990 1.1 thorpej struct tulip_softc *sc;
991 1.1 thorpej {
992 1.1 thorpej struct ifnet *ifp = &sc->sc_ethercom.ec_if;
993 1.1 thorpej struct ether_header *eh;
994 1.1 thorpej struct tulip_rxsoft *rxs;
995 1.1 thorpej struct mbuf *m;
996 1.1 thorpej u_int32_t rxstat;
997 1.1 thorpej int i, len;
998 1.1 thorpej
999 1.1 thorpej for (i = sc->sc_rxptr;; i = TULIP_NEXTRX(i)) {
1000 1.1 thorpej rxs = &sc->sc_rxsoft[i];
1001 1.1 thorpej
1002 1.1 thorpej TULIP_CDRXSYNC(sc, i,
1003 1.1 thorpej BUS_DMASYNC_POSTREAD|BUS_DMASYNC_POSTWRITE);
1004 1.1 thorpej
1005 1.1 thorpej rxstat = sc->sc_rxdescs[i].td_status;
1006 1.1 thorpej
1007 1.1 thorpej if (rxstat & TDSTAT_OWN) {
1008 1.1 thorpej /*
1009 1.1 thorpej * We have processed all of the receive buffers.
1010 1.1 thorpej */
1011 1.1 thorpej break;
1012 1.1 thorpej }
1013 1.1 thorpej
1014 1.1 thorpej /*
1015 1.1 thorpej * Make sure the packet fit in one buffer. This should
1016 1.1 thorpej * always be the case. But the Lite-On PNIC, rev 33
1017 1.1 thorpej * has an awful receive engine bug, which may require
1018 1.1 thorpej * a very icky work-around.
1019 1.1 thorpej */
1020 1.1 thorpej if ((rxstat & (TDSTAT_Rx_FS|TDSTAT_Rx_LS)) !=
1021 1.1 thorpej (TDSTAT_Rx_FS|TDSTAT_Rx_LS)) {
1022 1.1 thorpej printf("%s: incoming packet spilled, resetting\n",
1023 1.1 thorpej sc->sc_dev.dv_xname);
1024 1.1 thorpej (void) tlp_init(sc);
1025 1.1 thorpej return;
1026 1.1 thorpej }
1027 1.1 thorpej
1028 1.1 thorpej /*
1029 1.1 thorpej * If any collisions were seen on the wire, count one.
1030 1.1 thorpej */
1031 1.1 thorpej if (rxstat & TDSTAT_Rx_CS)
1032 1.1 thorpej ifp->if_collisions++;
1033 1.1 thorpej
1034 1.1 thorpej /*
1035 1.1 thorpej * If an error occured, update stats, clear the status
1036 1.1 thorpej * word, and leave the packet buffer in place. It will
1037 1.1 thorpej * simply be reused the next time the ring comes around.
1038 1.1 thorpej */
1039 1.1 thorpej if (rxstat & TDSTAT_ES) {
1040 1.1 thorpej #define PRINTERR(bit, str) \
1041 1.1 thorpej if (rxstat & (bit)) \
1042 1.1 thorpej printf("%s: receive error: %s\n", \
1043 1.1 thorpej sc->sc_dev.dv_xname, str)
1044 1.1 thorpej ifp->if_ierrors++;
1045 1.1 thorpej PRINTERR(TDSTAT_Rx_DE, "descriptor error");
1046 1.1 thorpej PRINTERR(TDSTAT_Rx_RF, "runt frame");
1047 1.1 thorpej PRINTERR(TDSTAT_Rx_TL, "frame too long");
1048 1.1 thorpej PRINTERR(TDSTAT_Rx_RE, "MII error");
1049 1.1 thorpej PRINTERR(TDSTAT_Rx_DB, "dribbling bit");
1050 1.1 thorpej PRINTERR(TDSTAT_Rx_CE, "CRC error");
1051 1.1 thorpej #undef PRINTERR
1052 1.1 thorpej TULIP_INIT_RXDESC(sc, i);
1053 1.1 thorpej continue;
1054 1.1 thorpej }
1055 1.1 thorpej
1056 1.1 thorpej bus_dmamap_sync(sc->sc_dmat, rxs->rxs_dmamap, 0,
1057 1.1 thorpej rxs->rxs_dmamap->dm_mapsize, BUS_DMASYNC_POSTREAD);
1058 1.1 thorpej
1059 1.1 thorpej /*
1060 1.1 thorpej * No errors; receive the packet. Note the Tulip
1061 1.1 thorpej * includes the CRC with every packet; trim it.
1062 1.1 thorpej */
1063 1.1 thorpej len = TDSTAT_Rx_LENGTH(rxstat) - ETHER_CRC_LEN;
1064 1.1 thorpej
1065 1.1 thorpej #ifdef __NO_STRICT_ALIGNMENT
1066 1.1 thorpej /*
1067 1.1 thorpej * Allocate a new mbuf cluster. If that fails, we are
1068 1.1 thorpej * out of memory, and must drop the packet and recycle
1069 1.1 thorpej * the buffer that's already attached to this descriptor.
1070 1.1 thorpej */
1071 1.1 thorpej m = rxs->rxs_mbuf;
1072 1.1 thorpej if (tlp_add_rxbuf(sc, i) != 0) {
1073 1.1 thorpej ifp->if_ierrors++;
1074 1.1 thorpej TULIP_INIT_RXDESC(sc, i);
1075 1.1 thorpej bus_dmamap_sync(sc->sc_dmat, rxs->rxs_dmamap, 0,
1076 1.1 thorpej rxs->rxs_dmamap->dm_mapsize, BUS_DMASYNC_PREREAD);
1077 1.1 thorpej continue;
1078 1.1 thorpej }
1079 1.1 thorpej #else
1080 1.1 thorpej /*
1081 1.1 thorpej * The Tulip's receive buffers must be 4-byte aligned.
1082 1.1 thorpej * But this means that the data after the Ethernet header
1083 1.1 thorpej * is misaligned. We must allocate a new buffer and
1084 1.1 thorpej * copy the data, shifted forward 2 bytes.
1085 1.1 thorpej */
1086 1.1 thorpej MGETHDR(m, M_DONTWAIT, MT_DATA);
1087 1.1 thorpej if (m == NULL) {
1088 1.1 thorpej dropit:
1089 1.1 thorpej ifp->if_ierrors++;
1090 1.1 thorpej TULIP_INIT_RXDESC(sc, i);
1091 1.1 thorpej bus_dmamap_sync(sc->sc_dmat, rxs->rxs_dmamap, 0,
1092 1.1 thorpej rxs->rxs_dmamap->dm_mapsize, BUS_DMASYNC_PREREAD);
1093 1.1 thorpej continue;
1094 1.1 thorpej }
1095 1.1 thorpej if (len > (MHLEN - 2)) {
1096 1.1 thorpej MCLGET(m, M_DONTWAIT);
1097 1.1 thorpej if ((m->m_flags & M_EXT) == 0) {
1098 1.1 thorpej m_freem(m);
1099 1.1 thorpej goto dropit;
1100 1.1 thorpej }
1101 1.1 thorpej }
1102 1.1 thorpej m->m_data += 2;
1103 1.1 thorpej
1104 1.1 thorpej /*
1105 1.1 thorpej * Note that we use clusters for incoming frames, so the
1106 1.1 thorpej * buffer is virtually contiguous.
1107 1.1 thorpej */
1108 1.1 thorpej memcpy(mtod(m, caddr_t), mtod(rxs->rxs_mbuf, caddr_t), len);
1109 1.1 thorpej
1110 1.1 thorpej /* Allow the receive descriptor to continue using its mbuf. */
1111 1.1 thorpej TULIP_INIT_RXDESC(sc, i);
1112 1.1 thorpej bus_dmamap_sync(sc->sc_dmat, rxs->rxs_dmamap, 0,
1113 1.1 thorpej rxs->rxs_dmamap->dm_mapsize, BUS_DMASYNC_PREREAD);
1114 1.1 thorpej #endif /* __NO_STRICT_ALIGNMENT */
1115 1.1 thorpej
1116 1.1 thorpej ifp->if_ipackets++;
1117 1.1 thorpej eh = mtod(m, struct ether_header *);
1118 1.1 thorpej m->m_pkthdr.rcvif = ifp;
1119 1.1 thorpej m->m_pkthdr.len = m->m_len = len;
1120 1.1 thorpej
1121 1.1 thorpej #if NBPFILTER > 0
1122 1.1 thorpej /*
1123 1.1 thorpej * Pass this up to any BPF listeners, but only
1124 1.1 thorpej * pass it up the stack if its for us.
1125 1.1 thorpej */
1126 1.1 thorpej if (ifp->if_bpf)
1127 1.1 thorpej bpf_mtap(ifp->if_bpf, m);
1128 1.1 thorpej #endif /* NPBFILTER > 0 */
1129 1.1 thorpej
1130 1.1 thorpej /*
1131 1.1 thorpej * This test is outside the NBPFILTER block because
1132 1.1 thorpej * on the 21140 we have to use Hash-Only mode due to
1133 1.1 thorpej * a bug in the filter logic.
1134 1.1 thorpej */
1135 1.1 thorpej if ((ifp->if_flags & IFF_PROMISC) != 0 ||
1136 1.1 thorpej sc->sc_filtmode == TDCTL_Tx_FT_HASHONLY) {
1137 1.1 thorpej if (memcmp(LLADDR(ifp->if_sadl), eh->ether_dhost,
1138 1.1 thorpej ETHER_ADDR_LEN) != 0 &&
1139 1.1 thorpej ETHER_IS_MULTICAST(eh->ether_dhost) == 0) {
1140 1.1 thorpej m_freem(m);
1141 1.1 thorpej continue;
1142 1.1 thorpej }
1143 1.1 thorpej }
1144 1.1 thorpej
1145 1.1 thorpej /* Pass it on. */
1146 1.1 thorpej (*ifp->if_input)(ifp, m);
1147 1.1 thorpej }
1148 1.1 thorpej
1149 1.1 thorpej /* Update the recieve pointer. */
1150 1.1 thorpej sc->sc_rxptr = i;
1151 1.1 thorpej }
1152 1.1 thorpej
1153 1.1 thorpej /*
1154 1.1 thorpej * tlp_txintr:
1155 1.1 thorpej *
1156 1.1 thorpej * Helper; handle transmit interrupts.
1157 1.1 thorpej */
1158 1.1 thorpej void
1159 1.1 thorpej tlp_txintr(sc)
1160 1.1 thorpej struct tulip_softc *sc;
1161 1.1 thorpej {
1162 1.1 thorpej struct ifnet *ifp = &sc->sc_ethercom.ec_if;
1163 1.1 thorpej struct tulip_txsoft *txs;
1164 1.1 thorpej u_int32_t txstat;
1165 1.1 thorpej
1166 1.5 thorpej DPRINTF(sc, ("%s: tlp_txintr: sc_flags 0x%08x\n",
1167 1.1 thorpej sc->sc_dev.dv_xname, sc->sc_flags));
1168 1.1 thorpej
1169 1.1 thorpej ifp->if_flags &= ~IFF_OACTIVE;
1170 1.1 thorpej
1171 1.1 thorpej /*
1172 1.4 thorpej * If we were doing a filter setup, check to see if it completed.
1173 1.4 thorpej */
1174 1.4 thorpej if (sc->sc_flags & TULIPF_DOING_SETUP) {
1175 1.4 thorpej TULIP_CDSDSYNC(sc, BUS_DMASYNC_POSTREAD|BUS_DMASYNC_POSTWRITE);
1176 1.4 thorpej if ((sc->sc_setup_desc.td_status & TDSTAT_OWN) == 0)
1177 1.4 thorpej sc->sc_flags &= ~TULIPF_DOING_SETUP;
1178 1.4 thorpej }
1179 1.4 thorpej
1180 1.4 thorpej /*
1181 1.1 thorpej * Go through our Tx list and free mbufs for those
1182 1.1 thorpej * frames that have been transmitted.
1183 1.1 thorpej */
1184 1.1 thorpej while ((txs = SIMPLEQ_FIRST(&sc->sc_txdirtyq)) != NULL) {
1185 1.1 thorpej TULIP_CDTXSYNC(sc, txs->txs_firstdesc,
1186 1.1 thorpej txs->txs_dmamap->dm_nsegs,
1187 1.1 thorpej BUS_DMASYNC_POSTREAD|BUS_DMASYNC_POSTWRITE);
1188 1.1 thorpej
1189 1.1 thorpej #ifdef TLP_DEBUG
1190 1.5 thorpej if (ifp->if_flags & IFF_DEBUG) {
1191 1.5 thorpej int i;
1192 1.5 thorpej printf(" txsoft %p trainsmit chain:\n", txs);
1193 1.5 thorpej for (i = txs->txs_firstdesc;; i = TULIP_NEXTTX(i)) {
1194 1.5 thorpej printf(" descriptor %d:\n", i);
1195 1.5 thorpej printf(" td_status: 0x%08x\n",
1196 1.5 thorpej sc->sc_txdescs[i].td_status);
1197 1.5 thorpej printf(" td_ctl: 0x%08x\n",
1198 1.5 thorpej sc->sc_txdescs[i].td_ctl);
1199 1.5 thorpej printf(" td_bufaddr1: 0x%08x\n",
1200 1.5 thorpej sc->sc_txdescs[i].td_bufaddr1);
1201 1.5 thorpej printf(" td_bufaddr2: 0x%08x\n",
1202 1.5 thorpej sc->sc_txdescs[i].td_bufaddr2);
1203 1.5 thorpej if (i == txs->txs_lastdesc)
1204 1.5 thorpej break;
1205 1.5 thorpej }
1206 1.5 thorpej }
1207 1.1 thorpej #endif
1208 1.1 thorpej
1209 1.1 thorpej txstat = sc->sc_txdescs[txs->txs_firstdesc].td_status;
1210 1.1 thorpej if (txstat & TDSTAT_OWN)
1211 1.1 thorpej break;
1212 1.1 thorpej
1213 1.1 thorpej SIMPLEQ_REMOVE_HEAD(&sc->sc_txdirtyq, txs, txs_q);
1214 1.1 thorpej
1215 1.1 thorpej sc->sc_txfree += txs->txs_dmamap->dm_nsegs;
1216 1.1 thorpej
1217 1.1 thorpej bus_dmamap_sync(sc->sc_dmat, txs->txs_dmamap,
1218 1.1 thorpej 0, txs->txs_dmamap->dm_mapsize,
1219 1.1 thorpej BUS_DMASYNC_POSTWRITE);
1220 1.1 thorpej bus_dmamap_unload(sc->sc_dmat, txs->txs_dmamap);
1221 1.1 thorpej m_freem(txs->txs_mbuf);
1222 1.1 thorpej txs->txs_mbuf = NULL;
1223 1.1 thorpej
1224 1.1 thorpej SIMPLEQ_INSERT_TAIL(&sc->sc_txfreeq, txs, txs_q);
1225 1.1 thorpej
1226 1.1 thorpej /*
1227 1.1 thorpej * Check for errors and collisions.
1228 1.1 thorpej */
1229 1.10 thorpej if (txstat &
1230 1.10 thorpej (TDSTAT_Tx_UF|TDSTAT_Tx_NC|TDSTAT_Tx_LO|TDSTAT_Tx_TO)) {
1231 1.1 thorpej ifp->if_oerrors++;
1232 1.10 thorpej #if 0
1233 1.10 thorpej /*
1234 1.10 thorpej * XXX Can't check for late or excessive collisions;
1235 1.10 thorpej * XXX Some 21040s seem to register those even on
1236 1.10 thorpej * XXX successful transmissions!
1237 1.10 thorpej */
1238 1.1 thorpej if (txstat & TDSTAT_Tx_EC)
1239 1.1 thorpej ifp->if_collisions += 16;
1240 1.1 thorpej if (txstat & TDSTAT_Tx_LC)
1241 1.1 thorpej ifp->if_collisions++;
1242 1.10 thorpej #endif
1243 1.1 thorpej } else {
1244 1.1 thorpej /* Packet was transmitted successfully. */
1245 1.1 thorpej ifp->if_opackets++;
1246 1.1 thorpej ifp->if_collisions += TDSTAT_Tx_COLLISIONS(txstat);
1247 1.1 thorpej }
1248 1.1 thorpej }
1249 1.1 thorpej
1250 1.1 thorpej /*
1251 1.1 thorpej * If there are no more pending transmissions, cancel the watchdog
1252 1.1 thorpej * timer.
1253 1.1 thorpej */
1254 1.4 thorpej if (txs == NULL && (sc->sc_flags & TULIPF_DOING_SETUP) == 0)
1255 1.1 thorpej ifp->if_timer = 0;
1256 1.1 thorpej
1257 1.1 thorpej /*
1258 1.1 thorpej * If we have a receive filter setup pending, do it now.
1259 1.1 thorpej */
1260 1.1 thorpej if (sc->sc_flags & TULIPF_WANT_SETUP)
1261 1.1 thorpej (*sc->sc_filter_setup)(sc);
1262 1.1 thorpej }
1263 1.1 thorpej
1264 1.1 thorpej /*
1265 1.1 thorpej * tlp_reset:
1266 1.1 thorpej *
1267 1.1 thorpej * Perform a soft reset on the Tulip.
1268 1.1 thorpej */
1269 1.1 thorpej void
1270 1.1 thorpej tlp_reset(sc)
1271 1.1 thorpej struct tulip_softc *sc;
1272 1.1 thorpej {
1273 1.1 thorpej int i;
1274 1.1 thorpej
1275 1.1 thorpej TULIP_WRITE(sc, CSR_BUSMODE, BUSMODE_SWR);
1276 1.1 thorpej
1277 1.1 thorpej for (i = 0; i < 1000; i++) {
1278 1.12 thorpej /*
1279 1.12 thorpej * Wait at least 50 PCI cycles for the reset to
1280 1.12 thorpej * complete before peeking at the Tulip again.
1281 1.12 thorpej * 10 uSec is a bit longer than 50 PCI cycles
1282 1.12 thorpej * (at 33MHz), but it doesn't hurt have the extra
1283 1.12 thorpej * wait.
1284 1.12 thorpej */
1285 1.12 thorpej delay(10);
1286 1.1 thorpej if (TULIP_ISSET(sc, CSR_BUSMODE, BUSMODE_SWR) == 0)
1287 1.1 thorpej break;
1288 1.1 thorpej }
1289 1.1 thorpej
1290 1.1 thorpej if (TULIP_ISSET(sc, CSR_BUSMODE, BUSMODE_SWR))
1291 1.1 thorpej printf("%s: reset failed to complete\n", sc->sc_dev.dv_xname);
1292 1.1 thorpej
1293 1.1 thorpej delay(1000);
1294 1.17 thorpej
1295 1.17 thorpej /*
1296 1.17 thorpej * If the board has any GPIO reset sequences to issue, do them now.
1297 1.17 thorpej */
1298 1.17 thorpej if (sc->sc_reset != NULL)
1299 1.17 thorpej (*sc->sc_reset)(sc);
1300 1.1 thorpej }
1301 1.1 thorpej
1302 1.1 thorpej /*
1303 1.1 thorpej * tlp_init:
1304 1.1 thorpej *
1305 1.1 thorpej * Initialize the interface. Must be called at splnet().
1306 1.1 thorpej */
1307 1.1 thorpej int
1308 1.1 thorpej tlp_init(sc)
1309 1.1 thorpej struct tulip_softc *sc;
1310 1.1 thorpej {
1311 1.1 thorpej struct ifnet *ifp = &sc->sc_ethercom.ec_if;
1312 1.1 thorpej struct tulip_txsoft *txs;
1313 1.1 thorpej struct tulip_rxsoft *rxs;
1314 1.1 thorpej int i, error = 0;
1315 1.1 thorpej
1316 1.1 thorpej /*
1317 1.1 thorpej * Cancel any pending I/O.
1318 1.1 thorpej */
1319 1.1 thorpej tlp_stop(sc, 0);
1320 1.1 thorpej
1321 1.1 thorpej /*
1322 1.13 thorpej * Initialize `opmode' to 0, and call the pre-init routine, if
1323 1.13 thorpej * any. This is required because the 2114x and some of the
1324 1.13 thorpej * clones require that the media-related bits in `opmode' be
1325 1.13 thorpej * set before performing a soft-reset in order to get internal
1326 1.13 thorpej * chip pathways are correct. Yay!
1327 1.13 thorpej */
1328 1.13 thorpej sc->sc_opmode = 0;
1329 1.13 thorpej if (sc->sc_preinit != NULL)
1330 1.13 thorpej (*sc->sc_preinit)(sc);
1331 1.13 thorpej
1332 1.13 thorpej /*
1333 1.1 thorpej * Reset the Tulip to a known state.
1334 1.1 thorpej */
1335 1.1 thorpej tlp_reset(sc);
1336 1.1 thorpej
1337 1.1 thorpej /*
1338 1.1 thorpej * Initialize the BUSMODE register.
1339 1.1 thorpej *
1340 1.1 thorpej * XXX What about read-multiple/read-line/write-line on
1341 1.1 thorpej * XXX the 21140 and up?
1342 1.1 thorpej */
1343 1.16 thorpej sc->sc_busmode = BUSMODE_BAR;
1344 1.1 thorpej switch (sc->sc_cacheline) {
1345 1.1 thorpej default:
1346 1.1 thorpej /*
1347 1.1 thorpej * Note: We must *always* set these bits; a cache
1348 1.1 thorpej * alignment of 0 is RESERVED.
1349 1.1 thorpej */
1350 1.1 thorpej case 8:
1351 1.1 thorpej sc->sc_busmode |= BUSMODE_CAL_8LW;
1352 1.1 thorpej break;
1353 1.1 thorpej case 16:
1354 1.1 thorpej sc->sc_busmode |= BUSMODE_CAL_16LW;
1355 1.1 thorpej break;
1356 1.1 thorpej case 32:
1357 1.1 thorpej sc->sc_busmode |= BUSMODE_CAL_32LW;
1358 1.1 thorpej break;
1359 1.1 thorpej }
1360 1.1 thorpej switch (sc->sc_chip) {
1361 1.1 thorpej case TULIP_CHIP_82C168:
1362 1.1 thorpej case TULIP_CHIP_82C169:
1363 1.16 thorpej sc->sc_busmode |= BUSMODE_PBL_16LW | BUSMODE_PNIC_MBO;
1364 1.1 thorpej break;
1365 1.1 thorpej default:
1366 1.16 thorpej sc->sc_busmode |= BUSMODE_PBL_DEFAULT;
1367 1.1 thorpej break;
1368 1.1 thorpej }
1369 1.1 thorpej #if BYTE_ORDER == BIG_ENDIAN
1370 1.1 thorpej /*
1371 1.1 thorpej * XXX There are reports that this doesn't work properly
1372 1.1 thorpej * in the old Tulip driver, but BUSMODE_DBO does. However,
1373 1.1 thorpej * BUSMODE_DBO is not available on the 21040, and requires
1374 1.1 thorpej * us to byte-swap the setup packet. What to do?
1375 1.1 thorpej */
1376 1.1 thorpej sc->sc_busmode |= BUSMODE_BLE;
1377 1.1 thorpej #endif
1378 1.1 thorpej TULIP_WRITE(sc, CSR_BUSMODE, sc->sc_busmode);
1379 1.1 thorpej
1380 1.1 thorpej /*
1381 1.1 thorpej * Initialize the OPMODE register. We don't write it until
1382 1.1 thorpej * we're ready to begin the transmit and receive processes.
1383 1.1 thorpej *
1384 1.1 thorpej * Media-related OPMODE bits are set in the media callbacks
1385 1.1 thorpej * for each specific chip/board.
1386 1.1 thorpej */
1387 1.13 thorpej sc->sc_opmode |= OPMODE_SR | OPMODE_ST |
1388 1.1 thorpej sc->sc_txth[sc->sc_txthresh].txth_opmode;
1389 1.1 thorpej
1390 1.1 thorpej /*
1391 1.1 thorpej * Magical mystery initialization on the Macronix chips.
1392 1.1 thorpej * The MX98713 uses its own magic value, the rest share
1393 1.1 thorpej * a common one.
1394 1.1 thorpej */
1395 1.1 thorpej switch (sc->sc_chip) {
1396 1.1 thorpej case TULIP_CHIP_MX98713:
1397 1.1 thorpej TULIP_WRITE(sc, CSR_PMAC_TOR, PMAC_TOR_98713);
1398 1.1 thorpej break;
1399 1.1 thorpej
1400 1.1 thorpej case TULIP_CHIP_MX98713A:
1401 1.1 thorpej case TULIP_CHIP_MX98715:
1402 1.1 thorpej case TULIP_CHIP_MX98725:
1403 1.1 thorpej TULIP_WRITE(sc, CSR_PMAC_TOR, PMAC_TOR_98715);
1404 1.1 thorpej break;
1405 1.1 thorpej
1406 1.1 thorpej default:
1407 1.1 thorpej /* Nothing. */
1408 1.1 thorpej }
1409 1.1 thorpej
1410 1.1 thorpej /*
1411 1.1 thorpej * Initialize the transmit descriptor ring.
1412 1.1 thorpej */
1413 1.1 thorpej memset(sc->sc_txdescs, 0, sizeof(sc->sc_txdescs));
1414 1.1 thorpej for (i = 0; i < TULIP_NTXDESC; i++) {
1415 1.1 thorpej sc->sc_txdescs[i].td_ctl = TDCTL_CH;
1416 1.1 thorpej sc->sc_txdescs[i].td_bufaddr2 =
1417 1.1 thorpej TULIP_CDTXADDR(sc, TULIP_NEXTTX(i));
1418 1.1 thorpej }
1419 1.1 thorpej TULIP_CDTXSYNC(sc, 0, TULIP_NTXDESC,
1420 1.1 thorpej BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
1421 1.1 thorpej sc->sc_txfree = TULIP_NTXDESC;
1422 1.1 thorpej sc->sc_txnext = 0;
1423 1.1 thorpej
1424 1.1 thorpej /*
1425 1.1 thorpej * Initialize the transmit job descriptors.
1426 1.1 thorpej */
1427 1.1 thorpej SIMPLEQ_INIT(&sc->sc_txfreeq);
1428 1.1 thorpej SIMPLEQ_INIT(&sc->sc_txdirtyq);
1429 1.1 thorpej for (i = 0; i < TULIP_TXQUEUELEN; i++) {
1430 1.1 thorpej txs = &sc->sc_txsoft[i];
1431 1.1 thorpej txs->txs_mbuf = NULL;
1432 1.1 thorpej SIMPLEQ_INSERT_TAIL(&sc->sc_txfreeq, txs, txs_q);
1433 1.1 thorpej }
1434 1.1 thorpej
1435 1.1 thorpej /*
1436 1.1 thorpej * Initialize the receive descriptor and receive job
1437 1.1 thorpej * descriptor rings.
1438 1.1 thorpej */
1439 1.1 thorpej for (i = 0; i < TULIP_NRXDESC; i++) {
1440 1.1 thorpej rxs = &sc->sc_rxsoft[i];
1441 1.1 thorpej if (rxs->rxs_mbuf == NULL) {
1442 1.1 thorpej if ((error = tlp_add_rxbuf(sc, i)) != 0) {
1443 1.1 thorpej printf("%s: unable to allocate or map rx "
1444 1.1 thorpej "buffer %d, error = %d\n",
1445 1.1 thorpej sc->sc_dev.dv_xname, i, error);
1446 1.1 thorpej /*
1447 1.1 thorpej * XXX Should attempt to run with fewer receive
1448 1.1 thorpej * XXX buffers instead of just failing.
1449 1.1 thorpej */
1450 1.1 thorpej tlp_rxdrain(sc);
1451 1.1 thorpej goto out;
1452 1.1 thorpej }
1453 1.1 thorpej }
1454 1.1 thorpej }
1455 1.1 thorpej sc->sc_rxptr = 0;
1456 1.1 thorpej
1457 1.1 thorpej /*
1458 1.1 thorpej * Initialize the interrupt mask and enable interrupts.
1459 1.1 thorpej */
1460 1.1 thorpej /* normal interrupts */
1461 1.1 thorpej sc->sc_inten = STATUS_TI | STATUS_TU | STATUS_RI | STATUS_NIS;
1462 1.5 thorpej
1463 1.1 thorpej /* abnormal interrupts */
1464 1.1 thorpej sc->sc_inten |= STATUS_TPS | STATUS_TJT | STATUS_UNF |
1465 1.1 thorpej STATUS_RU | STATUS_RPS | STATUS_RWT | STATUS_SE | STATUS_AIS;
1466 1.1 thorpej
1467 1.5 thorpej sc->sc_rxint_mask = STATUS_RI|STATUS_RU|STATUS_RWT;
1468 1.5 thorpej sc->sc_txint_mask = STATUS_TI|STATUS_UNF|STATUS_TJT;
1469 1.5 thorpej
1470 1.5 thorpej switch (sc->sc_chip) {
1471 1.5 thorpej case TULIP_CHIP_WB89C840F:
1472 1.5 thorpej /*
1473 1.5 thorpej * Clear bits that we don't want that happen to
1474 1.5 thorpej * overlap or don't exist.
1475 1.5 thorpej */
1476 1.5 thorpej sc->sc_inten &= ~(STATUS_WINB_REI|STATUS_RWT);
1477 1.5 thorpej break;
1478 1.5 thorpej
1479 1.5 thorpej default:
1480 1.5 thorpej /* Nothing. */
1481 1.5 thorpej }
1482 1.5 thorpej
1483 1.5 thorpej sc->sc_rxint_mask &= sc->sc_inten;
1484 1.5 thorpej sc->sc_txint_mask &= sc->sc_inten;
1485 1.5 thorpej
1486 1.1 thorpej TULIP_WRITE(sc, CSR_INTEN, sc->sc_inten);
1487 1.1 thorpej TULIP_WRITE(sc, CSR_STATUS, 0xffffffff);
1488 1.1 thorpej
1489 1.1 thorpej /*
1490 1.1 thorpej * Give the transmit and receive rings to the Tulip.
1491 1.1 thorpej */
1492 1.1 thorpej TULIP_WRITE(sc, CSR_TXLIST, TULIP_CDTXADDR(sc, sc->sc_txnext));
1493 1.1 thorpej TULIP_WRITE(sc, CSR_RXLIST, TULIP_CDRXADDR(sc, sc->sc_rxptr));
1494 1.1 thorpej
1495 1.1 thorpej /*
1496 1.1 thorpej * On chips that do this differently, set the station address.
1497 1.1 thorpej */
1498 1.1 thorpej switch (sc->sc_chip) {
1499 1.1 thorpej case TULIP_CHIP_WB89C840F:
1500 1.8 thorpej {
1501 1.1 thorpej /* XXX Do this with stream writes? */
1502 1.8 thorpej bus_addr_t cpa = TULIP_CSR_OFFSET(sc, CSR_WINB_CPA0);
1503 1.8 thorpej
1504 1.1 thorpej for (i = 0; i < ETHER_ADDR_LEN; i++) {
1505 1.1 thorpej bus_space_write_1(sc->sc_st, sc->sc_sh,
1506 1.8 thorpej cpa + i, LLADDR(ifp->if_sadl)[i]);
1507 1.1 thorpej }
1508 1.1 thorpej break;
1509 1.8 thorpej }
1510 1.1 thorpej
1511 1.1 thorpej default:
1512 1.1 thorpej /* Nothing. */
1513 1.1 thorpej }
1514 1.1 thorpej
1515 1.1 thorpej /*
1516 1.1 thorpej * Set the receive filter. This will start the transmit and
1517 1.1 thorpej * receive processes.
1518 1.1 thorpej */
1519 1.1 thorpej (*sc->sc_filter_setup)(sc);
1520 1.1 thorpej
1521 1.1 thorpej /*
1522 1.16 thorpej * Set the current media.
1523 1.16 thorpej */
1524 1.16 thorpej (void) (*sc->sc_mediasw->tmsw_set)(sc);
1525 1.16 thorpej
1526 1.16 thorpej /*
1527 1.1 thorpej * Start the receive process.
1528 1.1 thorpej */
1529 1.1 thorpej TULIP_WRITE(sc, CSR_RXPOLL, RXPOLL_RPD);
1530 1.1 thorpej
1531 1.6 thorpej if (sc->sc_tick != NULL) {
1532 1.1 thorpej /* Start the one second clock. */
1533 1.6 thorpej timeout(sc->sc_tick, sc, hz);
1534 1.1 thorpej }
1535 1.1 thorpej
1536 1.1 thorpej /*
1537 1.1 thorpej * Note that the interface is now running.
1538 1.1 thorpej */
1539 1.1 thorpej ifp->if_flags |= IFF_RUNNING;
1540 1.1 thorpej ifp->if_flags &= ~IFF_OACTIVE;
1541 1.1 thorpej
1542 1.1 thorpej out:
1543 1.1 thorpej if (error)
1544 1.1 thorpej printf("%s: interface not running\n", sc->sc_dev.dv_xname);
1545 1.1 thorpej return (error);
1546 1.1 thorpej }
1547 1.1 thorpej
1548 1.1 thorpej /*
1549 1.1 thorpej * tlp_rxdrain:
1550 1.1 thorpej *
1551 1.1 thorpej * Drain the receive queue.
1552 1.1 thorpej */
1553 1.1 thorpej void
1554 1.1 thorpej tlp_rxdrain(sc)
1555 1.1 thorpej struct tulip_softc *sc;
1556 1.1 thorpej {
1557 1.1 thorpej struct tulip_rxsoft *rxs;
1558 1.1 thorpej int i;
1559 1.1 thorpej
1560 1.1 thorpej for (i = 0; i < TULIP_NRXDESC; i++) {
1561 1.1 thorpej rxs = &sc->sc_rxsoft[i];
1562 1.1 thorpej if (rxs->rxs_mbuf != NULL) {
1563 1.1 thorpej bus_dmamap_unload(sc->sc_dmat, rxs->rxs_dmamap);
1564 1.1 thorpej m_freem(rxs->rxs_mbuf);
1565 1.1 thorpej rxs->rxs_mbuf = NULL;
1566 1.1 thorpej }
1567 1.1 thorpej }
1568 1.1 thorpej }
1569 1.1 thorpej
1570 1.1 thorpej /*
1571 1.1 thorpej * tlp_stop:
1572 1.1 thorpej *
1573 1.1 thorpej * Stop transmission on the interface.
1574 1.1 thorpej */
1575 1.1 thorpej void
1576 1.1 thorpej tlp_stop(sc, drain)
1577 1.1 thorpej struct tulip_softc *sc;
1578 1.1 thorpej int drain;
1579 1.1 thorpej {
1580 1.1 thorpej struct ifnet *ifp = &sc->sc_ethercom.ec_if;
1581 1.1 thorpej struct tulip_txsoft *txs;
1582 1.1 thorpej
1583 1.6 thorpej if (sc->sc_tick != NULL) {
1584 1.1 thorpej /* Stop the one second clock. */
1585 1.6 thorpej untimeout(sc->sc_tick, sc);
1586 1.1 thorpej }
1587 1.1 thorpej
1588 1.1 thorpej /* Disable interrupts. */
1589 1.1 thorpej TULIP_WRITE(sc, CSR_INTEN, 0);
1590 1.1 thorpej
1591 1.1 thorpej /* Stop the transmit and receive processes. */
1592 1.1 thorpej TULIP_WRITE(sc, CSR_OPMODE, 0);
1593 1.1 thorpej TULIP_WRITE(sc, CSR_RXLIST, 0);
1594 1.1 thorpej TULIP_WRITE(sc, CSR_TXLIST, 0);
1595 1.1 thorpej
1596 1.1 thorpej /*
1597 1.1 thorpej * Release any queued transmit buffers.
1598 1.1 thorpej */
1599 1.1 thorpej while ((txs = SIMPLEQ_FIRST(&sc->sc_txdirtyq)) != NULL) {
1600 1.1 thorpej SIMPLEQ_REMOVE_HEAD(&sc->sc_txdirtyq, txs, txs_q);
1601 1.1 thorpej if (txs->txs_mbuf != NULL) {
1602 1.1 thorpej bus_dmamap_unload(sc->sc_dmat, txs->txs_dmamap);
1603 1.1 thorpej m_freem(txs->txs_mbuf);
1604 1.1 thorpej txs->txs_mbuf = NULL;
1605 1.1 thorpej }
1606 1.1 thorpej SIMPLEQ_INSERT_TAIL(&sc->sc_txfreeq, txs, txs_q);
1607 1.1 thorpej }
1608 1.1 thorpej
1609 1.1 thorpej if (drain) {
1610 1.1 thorpej /*
1611 1.1 thorpej * Release the receive buffers.
1612 1.1 thorpej */
1613 1.1 thorpej tlp_rxdrain(sc);
1614 1.1 thorpej }
1615 1.1 thorpej
1616 1.4 thorpej sc->sc_flags &= ~(TULIPF_WANT_SETUP|TULIPF_DOING_SETUP);
1617 1.1 thorpej
1618 1.1 thorpej /*
1619 1.1 thorpej * Mark the interface down and cancel the watchdog timer.
1620 1.1 thorpej */
1621 1.1 thorpej ifp->if_flags &= ~(IFF_RUNNING | IFF_OACTIVE);
1622 1.1 thorpej ifp->if_timer = 0;
1623 1.1 thorpej }
1624 1.1 thorpej
1625 1.1 thorpej #define SROM_EMIT(sc, x) \
1626 1.1 thorpej do { \
1627 1.1 thorpej TULIP_WRITE((sc), CSR_MIIROM, (x)); \
1628 1.1 thorpej delay(1); \
1629 1.1 thorpej } while (0)
1630 1.1 thorpej
1631 1.1 thorpej /*
1632 1.1 thorpej * tlp_srom_idle:
1633 1.1 thorpej *
1634 1.1 thorpej * Put the SROM in idle state.
1635 1.1 thorpej */
1636 1.1 thorpej void
1637 1.1 thorpej tlp_srom_idle(sc)
1638 1.1 thorpej struct tulip_softc *sc;
1639 1.1 thorpej {
1640 1.1 thorpej u_int32_t miirom;
1641 1.1 thorpej int i;
1642 1.1 thorpej
1643 1.1 thorpej miirom = MIIROM_SR;
1644 1.1 thorpej SROM_EMIT(sc, miirom);
1645 1.1 thorpej
1646 1.1 thorpej miirom |= MIIROM_RD;
1647 1.1 thorpej SROM_EMIT(sc, miirom);
1648 1.1 thorpej
1649 1.1 thorpej miirom |= MIIROM_SROMCS;
1650 1.1 thorpej SROM_EMIT(sc, miirom);
1651 1.1 thorpej
1652 1.1 thorpej SROM_EMIT(sc, miirom|MIIROM_SROMSK);
1653 1.1 thorpej
1654 1.1 thorpej /* Strobe the clock 25 times. */
1655 1.1 thorpej for (i = 0; i < 25; i++) {
1656 1.1 thorpej SROM_EMIT(sc, miirom);
1657 1.1 thorpej SROM_EMIT(sc, miirom|MIIROM_SROMSK);
1658 1.1 thorpej }
1659 1.1 thorpej
1660 1.1 thorpej SROM_EMIT(sc, miirom);
1661 1.1 thorpej
1662 1.1 thorpej miirom &= ~MIIROM_SROMCS;
1663 1.1 thorpej SROM_EMIT(sc, miirom);
1664 1.1 thorpej
1665 1.1 thorpej SROM_EMIT(sc, 0);
1666 1.1 thorpej }
1667 1.1 thorpej
1668 1.1 thorpej /*
1669 1.1 thorpej * tlp_read_srom:
1670 1.1 thorpej *
1671 1.1 thorpej * Read the Tulip SROM.
1672 1.1 thorpej */
1673 1.1 thorpej void
1674 1.1 thorpej tlp_read_srom(sc, word, wordcnt, data)
1675 1.1 thorpej struct tulip_softc *sc;
1676 1.1 thorpej int word, wordcnt;
1677 1.1 thorpej u_int16_t *data;
1678 1.1 thorpej {
1679 1.1 thorpej u_int32_t miirom;
1680 1.1 thorpej int i, x;
1681 1.1 thorpej
1682 1.1 thorpej tlp_srom_idle(sc);
1683 1.1 thorpej
1684 1.1 thorpej /* Select the SROM. */
1685 1.1 thorpej miirom = MIIROM_SR;
1686 1.1 thorpej SROM_EMIT(sc, miirom);
1687 1.1 thorpej
1688 1.1 thorpej miirom |= MIIROM_RD;
1689 1.1 thorpej SROM_EMIT(sc, miirom);
1690 1.1 thorpej
1691 1.1 thorpej for (i = 0; i < wordcnt; i++) {
1692 1.1 thorpej /* Send CHIP SELECT for one clock tick. */
1693 1.1 thorpej miirom |= MIIROM_SROMCS;
1694 1.1 thorpej SROM_EMIT(sc, miirom);
1695 1.1 thorpej
1696 1.1 thorpej /* Shift in the READ opcode. */
1697 1.1 thorpej for (x = 3; x > 0; x--) {
1698 1.1 thorpej if (TULIP_SROM_OPC_READ & (1 << (x - 1)))
1699 1.1 thorpej miirom |= MIIROM_SROMDI;
1700 1.1 thorpej else
1701 1.1 thorpej miirom &= ~MIIROM_SROMDI;
1702 1.1 thorpej SROM_EMIT(sc, miirom);
1703 1.1 thorpej SROM_EMIT(sc, miirom|MIIROM_SROMSK);
1704 1.1 thorpej SROM_EMIT(sc, miirom);
1705 1.1 thorpej }
1706 1.1 thorpej
1707 1.1 thorpej /* Shift in address. */
1708 1.1 thorpej for (x = 6; x > 0; x--) {
1709 1.1 thorpej if ((word + i) & (1 << (x - 1)))
1710 1.1 thorpej miirom |= MIIROM_SROMDI;
1711 1.1 thorpej else
1712 1.1 thorpej miirom &= ~MIIROM_SROMDI;
1713 1.1 thorpej SROM_EMIT(sc, miirom);
1714 1.1 thorpej SROM_EMIT(sc, miirom|MIIROM_SROMSK);
1715 1.1 thorpej SROM_EMIT(sc, miirom);
1716 1.1 thorpej }
1717 1.1 thorpej
1718 1.1 thorpej /* Shift out data. */
1719 1.1 thorpej miirom &= ~MIIROM_SROMDI;
1720 1.1 thorpej data[i] = 0;
1721 1.1 thorpej for (x = 16; x > 0; x--) {
1722 1.1 thorpej SROM_EMIT(sc, miirom|MIIROM_SROMSK);
1723 1.1 thorpej if (TULIP_ISSET(sc, CSR_MIIROM, MIIROM_SROMDO))
1724 1.1 thorpej data[i] |= (1 << (x - 1));
1725 1.1 thorpej SROM_EMIT(sc, miirom);
1726 1.1 thorpej }
1727 1.1 thorpej
1728 1.1 thorpej /* Clear CHIP SELECT. */
1729 1.1 thorpej miirom &= ~MIIROM_SROMCS;
1730 1.1 thorpej SROM_EMIT(sc, miirom);
1731 1.1 thorpej }
1732 1.1 thorpej
1733 1.1 thorpej /* Deselect the SROM. */
1734 1.1 thorpej SROM_EMIT(sc, 0);
1735 1.1 thorpej
1736 1.1 thorpej /* ...and idle it. */
1737 1.1 thorpej tlp_srom_idle(sc);
1738 1.1 thorpej }
1739 1.1 thorpej
1740 1.1 thorpej #undef SROM_EMIT
1741 1.1 thorpej
1742 1.1 thorpej /*
1743 1.1 thorpej * tlp_add_rxbuf:
1744 1.1 thorpej *
1745 1.1 thorpej * Add a receive buffer to the indicated descriptor.
1746 1.1 thorpej */
1747 1.1 thorpej int
1748 1.1 thorpej tlp_add_rxbuf(sc, idx)
1749 1.1 thorpej struct tulip_softc *sc;
1750 1.1 thorpej int idx;
1751 1.1 thorpej {
1752 1.1 thorpej struct tulip_rxsoft *rxs = &sc->sc_rxsoft[idx];
1753 1.1 thorpej struct mbuf *m;
1754 1.1 thorpej int error;
1755 1.1 thorpej
1756 1.1 thorpej MGETHDR(m, M_DONTWAIT, MT_DATA);
1757 1.1 thorpej if (m == NULL)
1758 1.1 thorpej return (ENOBUFS);
1759 1.1 thorpej
1760 1.1 thorpej MCLGET(m, M_DONTWAIT);
1761 1.1 thorpej if ((m->m_flags & M_EXT) == 0) {
1762 1.1 thorpej m_freem(m);
1763 1.1 thorpej return (ENOBUFS);
1764 1.1 thorpej }
1765 1.1 thorpej
1766 1.1 thorpej if (rxs->rxs_mbuf != NULL)
1767 1.1 thorpej bus_dmamap_unload(sc->sc_dmat, rxs->rxs_dmamap);
1768 1.1 thorpej
1769 1.1 thorpej rxs->rxs_mbuf = m;
1770 1.1 thorpej
1771 1.1 thorpej error = bus_dmamap_load(sc->sc_dmat, rxs->rxs_dmamap,
1772 1.1 thorpej m->m_ext.ext_buf, m->m_ext.ext_size, NULL, BUS_DMA_NOWAIT);
1773 1.1 thorpej if (error) {
1774 1.1 thorpej printf("%s: can't load rx DMA map %d, error = %d\n",
1775 1.1 thorpej sc->sc_dev.dv_xname, idx, error);
1776 1.1 thorpej panic("tlp_add_rxbuf"); /* XXX */
1777 1.1 thorpej }
1778 1.1 thorpej
1779 1.1 thorpej bus_dmamap_sync(sc->sc_dmat, rxs->rxs_dmamap, 0,
1780 1.1 thorpej rxs->rxs_dmamap->dm_mapsize, BUS_DMASYNC_PREREAD);
1781 1.1 thorpej
1782 1.1 thorpej TULIP_INIT_RXDESC(sc, idx);
1783 1.1 thorpej
1784 1.1 thorpej return (0);
1785 1.1 thorpej }
1786 1.1 thorpej
1787 1.1 thorpej /*
1788 1.1 thorpej * tlp_crc32:
1789 1.1 thorpej *
1790 1.1 thorpej * Compute the 32-bit CRC of the provided buffer.
1791 1.1 thorpej */
1792 1.1 thorpej u_int32_t
1793 1.1 thorpej tlp_crc32(buf, len)
1794 1.1 thorpej const u_int8_t *buf;
1795 1.1 thorpej size_t len;
1796 1.1 thorpej {
1797 1.1 thorpej static const u_int32_t crctab[] = {
1798 1.1 thorpej 0x00000000, 0x1db71064, 0x3b6e20c8, 0x26d930ac,
1799 1.1 thorpej 0x76dc4190, 0x6b6b51f4, 0x4db26158, 0x5005713c,
1800 1.1 thorpej 0xedb88320, 0xf00f9344, 0xd6d6a3e8, 0xcb61b38c,
1801 1.1 thorpej 0x9b64c2b0, 0x86d3d2d4, 0xa00ae278, 0xbdbdf21c
1802 1.1 thorpej };
1803 1.1 thorpej u_int32_t crc;
1804 1.1 thorpej int i;
1805 1.1 thorpej
1806 1.1 thorpej crc = 0xffffffff;
1807 1.1 thorpej for (i = 0; i < len; i++) {
1808 1.1 thorpej crc ^= buf[i];
1809 1.1 thorpej crc = (crc >> 4) ^ crctab[crc & 0xf];
1810 1.1 thorpej crc = (crc >> 4) ^ crctab[crc & 0xf];
1811 1.1 thorpej }
1812 1.1 thorpej return (crc);
1813 1.1 thorpej }
1814 1.1 thorpej
1815 1.1 thorpej /*
1816 1.1 thorpej * tlp_srom_crcok:
1817 1.1 thorpej *
1818 1.1 thorpej * Check the CRC of the Tulip SROM.
1819 1.1 thorpej */
1820 1.1 thorpej int
1821 1.1 thorpej tlp_srom_crcok(romdata)
1822 1.13 thorpej const u_int8_t *romdata;
1823 1.1 thorpej {
1824 1.1 thorpej u_int32_t crc;
1825 1.1 thorpej
1826 1.7 thorpej crc = tlp_crc32(romdata, TULIP_ROM_CRC32_CHECKSUM);
1827 1.7 thorpej crc = (crc & 0xffff) ^ 0xffff;
1828 1.7 thorpej if (crc == TULIP_ROM_GETW(romdata, TULIP_ROM_CRC32_CHECKSUM))
1829 1.1 thorpej return (1);
1830 1.1 thorpej return (0);
1831 1.1 thorpej }
1832 1.1 thorpej
1833 1.1 thorpej /*
1834 1.13 thorpej * tlp_isv_srom:
1835 1.13 thorpej *
1836 1.13 thorpej * Check to see if the SROM is in the new standardized format.
1837 1.13 thorpej */
1838 1.13 thorpej int
1839 1.13 thorpej tlp_isv_srom(romdata)
1840 1.13 thorpej const u_int8_t *romdata;
1841 1.13 thorpej {
1842 1.13 thorpej int i;
1843 1.13 thorpej u_int16_t cksum;
1844 1.13 thorpej
1845 1.13 thorpej if (tlp_srom_crcok(romdata)) {
1846 1.13 thorpej /*
1847 1.13 thorpej * SROM CRC checks out; must be in the new format.
1848 1.13 thorpej */
1849 1.13 thorpej return (1);
1850 1.13 thorpej }
1851 1.13 thorpej
1852 1.13 thorpej cksum = TULIP_ROM_GETW(romdata, TULIP_ROM_CRC32_CHECKSUM);
1853 1.13 thorpej if (cksum == 0xffff || cksum == 0) {
1854 1.13 thorpej /*
1855 1.13 thorpej * No checksum present. Check the SROM ID; 18 bytes of 0
1856 1.13 thorpej * followed by 1 (version) followed by the number of
1857 1.13 thorpej * adapters which use this SROM (should be non-zero).
1858 1.13 thorpej */
1859 1.13 thorpej for (i = 0; i < TULIP_ROM_SROM_FORMAT_VERION; i++) {
1860 1.13 thorpej if (romdata[i] != 0)
1861 1.13 thorpej return (0);
1862 1.13 thorpej }
1863 1.13 thorpej if (romdata[TULIP_ROM_SROM_FORMAT_VERION] != 1)
1864 1.13 thorpej return (0);
1865 1.13 thorpej if (romdata[TULIP_ROM_CHIP_COUNT] == 0)
1866 1.13 thorpej return (0);
1867 1.13 thorpej return (1);
1868 1.13 thorpej }
1869 1.13 thorpej
1870 1.13 thorpej return (0);
1871 1.13 thorpej }
1872 1.13 thorpej
1873 1.13 thorpej /*
1874 1.13 thorpej * tlp_isv_srom_enaddr:
1875 1.13 thorpej *
1876 1.13 thorpej * Get the Ethernet address from an ISV SROM.
1877 1.13 thorpej */
1878 1.13 thorpej int
1879 1.13 thorpej tlp_isv_srom_enaddr(sc, enaddr)
1880 1.13 thorpej struct tulip_softc *sc;
1881 1.13 thorpej u_int8_t *enaddr;
1882 1.13 thorpej {
1883 1.13 thorpej int i, devcnt;
1884 1.13 thorpej
1885 1.13 thorpej if (tlp_isv_srom(sc->sc_srom) == 0)
1886 1.13 thorpej return (0);
1887 1.13 thorpej
1888 1.13 thorpej devcnt = sc->sc_srom[TULIP_ROM_CHIP_COUNT];
1889 1.13 thorpej for (i = 0; i < devcnt; i++) {
1890 1.13 thorpej if (sc->sc_srom[TULIP_ROM_CHIP_COUNT] == 1)
1891 1.13 thorpej break;
1892 1.13 thorpej if (sc->sc_srom[TULIP_ROM_CHIPn_DEVICE_NUMBER(i)] ==
1893 1.13 thorpej sc->sc_devno)
1894 1.13 thorpej break;
1895 1.13 thorpej }
1896 1.13 thorpej
1897 1.13 thorpej if (i == devcnt)
1898 1.13 thorpej return (0);
1899 1.13 thorpej
1900 1.13 thorpej memcpy(enaddr, &sc->sc_srom[TULIP_ROM_IEEE_NETWORK_ADDRESS],
1901 1.13 thorpej ETHER_ADDR_LEN);
1902 1.13 thorpej enaddr[5] += i;
1903 1.13 thorpej
1904 1.13 thorpej return (1);
1905 1.13 thorpej }
1906 1.13 thorpej
1907 1.13 thorpej /*
1908 1.7 thorpej * tlp_parse_old_srom:
1909 1.7 thorpej *
1910 1.7 thorpej * Parse old-format SROMs.
1911 1.7 thorpej *
1912 1.7 thorpej * This routine is largely lifted from Matt Thomas's `de' driver.
1913 1.7 thorpej */
1914 1.7 thorpej int
1915 1.7 thorpej tlp_parse_old_srom(sc, enaddr)
1916 1.7 thorpej struct tulip_softc *sc;
1917 1.7 thorpej u_int8_t *enaddr;
1918 1.7 thorpej {
1919 1.7 thorpej static const u_int8_t testpat[] =
1920 1.7 thorpej { 0xff, 0, 0x55, 0xaa, 0xff, 0, 0x55, 0xaa };
1921 1.7 thorpej int i;
1922 1.7 thorpej u_int32_t cksum;
1923 1.7 thorpej
1924 1.7 thorpej if (memcmp(&sc->sc_srom[0], &sc->sc_srom[16], 8) != 0) {
1925 1.7 thorpej /*
1926 1.7 thorpej * Some vendors (e.g. ZNYX) don't use the standard
1927 1.7 thorpej * DEC Address ROM format, but rather just have an
1928 1.7 thorpej * Ethernet address in the first 6 bytes, maybe a
1929 1.7 thorpej * 2 byte checksum, and then all 0xff's.
1930 1.7 thorpej */
1931 1.7 thorpej for (i = 8; i < 32; i++) {
1932 1.7 thorpej if (sc->sc_srom[i] != 0xff)
1933 1.7 thorpej return (0);
1934 1.7 thorpej }
1935 1.7 thorpej
1936 1.7 thorpej /*
1937 1.7 thorpej * Sanity check the Ethernet address:
1938 1.7 thorpej *
1939 1.7 thorpej * - Make sure it's not multicast or locally
1940 1.7 thorpej * assigned
1941 1.7 thorpej * - Make sure it has a non-0 OUI
1942 1.7 thorpej */
1943 1.7 thorpej if (sc->sc_srom[0] & 3)
1944 1.7 thorpej return (0);
1945 1.7 thorpej if (sc->sc_srom[0] == 0 && sc->sc_srom[1] == 0 &&
1946 1.7 thorpej sc->sc_srom[2] == 0)
1947 1.7 thorpej return (0);
1948 1.7 thorpej
1949 1.7 thorpej memcpy(enaddr, sc->sc_srom, ETHER_ADDR_LEN);
1950 1.7 thorpej return (1);
1951 1.7 thorpej }
1952 1.7 thorpej
1953 1.7 thorpej /*
1954 1.7 thorpej * Standard DEC Address ROM test.
1955 1.7 thorpej */
1956 1.7 thorpej
1957 1.7 thorpej if (memcmp(&sc->sc_srom[24], testpat, 8) != 0)
1958 1.7 thorpej return (0);
1959 1.7 thorpej
1960 1.7 thorpej for (i = 0; i < 8; i++) {
1961 1.7 thorpej if (sc->sc_srom[i] != sc->sc_srom[15 - i])
1962 1.7 thorpej return (0);
1963 1.7 thorpej }
1964 1.7 thorpej
1965 1.7 thorpej memcpy(enaddr, sc->sc_srom, ETHER_ADDR_LEN);
1966 1.7 thorpej
1967 1.7 thorpej cksum = *(u_int16_t *) &enaddr[0];
1968 1.7 thorpej
1969 1.7 thorpej cksum <<= 1;
1970 1.7 thorpej if (cksum > 0xffff)
1971 1.7 thorpej cksum -= 0xffff;
1972 1.7 thorpej
1973 1.7 thorpej cksum += *(u_int16_t *) &enaddr[2];
1974 1.7 thorpej if (cksum > 0xffff)
1975 1.7 thorpej cksum -= 0xffff;
1976 1.7 thorpej
1977 1.7 thorpej cksum <<= 1;
1978 1.7 thorpej if (cksum > 0xffff)
1979 1.7 thorpej cksum -= 0xffff;
1980 1.7 thorpej
1981 1.7 thorpej cksum += *(u_int16_t *) &enaddr[4];
1982 1.7 thorpej if (cksum >= 0xffff)
1983 1.7 thorpej cksum -= 0xffff;
1984 1.7 thorpej
1985 1.7 thorpej if (cksum != *(u_int16_t *) &sc->sc_srom[6])
1986 1.7 thorpej return (0);
1987 1.7 thorpej
1988 1.7 thorpej return (1);
1989 1.7 thorpej }
1990 1.7 thorpej
1991 1.7 thorpej /*
1992 1.1 thorpej * tlp_filter_setup:
1993 1.1 thorpej *
1994 1.1 thorpej * Set the Tulip's receive filter.
1995 1.1 thorpej */
1996 1.1 thorpej void
1997 1.1 thorpej tlp_filter_setup(sc)
1998 1.1 thorpej struct tulip_softc *sc;
1999 1.1 thorpej {
2000 1.1 thorpej struct ethercom *ec = &sc->sc_ethercom;
2001 1.1 thorpej struct ifnet *ifp = &sc->sc_ethercom.ec_if;
2002 1.1 thorpej struct ether_multi *enm;
2003 1.1 thorpej struct ether_multistep step;
2004 1.1 thorpej __volatile u_int32_t *sp;
2005 1.1 thorpej u_int8_t enaddr[ETHER_ADDR_LEN];
2006 1.1 thorpej u_int32_t hash;
2007 1.1 thorpej int cnt;
2008 1.1 thorpej
2009 1.5 thorpej DPRINTF(sc, ("%s: tlp_filter_setup: sc_flags 0x%08x\n",
2010 1.1 thorpej sc->sc_dev.dv_xname, sc->sc_flags));
2011 1.1 thorpej
2012 1.1 thorpej memcpy(enaddr, LLADDR(ifp->if_sadl), ETHER_ADDR_LEN);
2013 1.1 thorpej
2014 1.1 thorpej /*
2015 1.1 thorpej * If there are transmissions pending, wait until they have
2016 1.1 thorpej * completed.
2017 1.1 thorpej */
2018 1.4 thorpej if (SIMPLEQ_FIRST(&sc->sc_txdirtyq) != NULL ||
2019 1.4 thorpej (sc->sc_flags & TULIPF_DOING_SETUP) != 0) {
2020 1.1 thorpej sc->sc_flags |= TULIPF_WANT_SETUP;
2021 1.5 thorpej DPRINTF(sc, ("%s: tlp_filter_setup: deferring\n",
2022 1.1 thorpej sc->sc_dev.dv_xname));
2023 1.1 thorpej return;
2024 1.1 thorpej }
2025 1.1 thorpej sc->sc_flags &= ~TULIPF_WANT_SETUP;
2026 1.1 thorpej
2027 1.1 thorpej /*
2028 1.1 thorpej * If we're running, idle the transmit and receive engines. If
2029 1.1 thorpej * we're NOT running, we're being called from tlp_init(), and our
2030 1.1 thorpej * writing OPMODE will start the transmit and receive processes
2031 1.1 thorpej * in motion.
2032 1.1 thorpej */
2033 1.16 thorpej if (ifp->if_flags & IFF_RUNNING) {
2034 1.16 thorpej /*
2035 1.16 thorpej * Actually, some chips seem to need a really hard
2036 1.16 thorpej * kick in the head for this to work. The genuine
2037 1.16 thorpej * DEC chips can just be idled, but some of the
2038 1.16 thorpej * clones seem to REALLY want a reset here. Doing
2039 1.16 thorpej * the reset will end up here again, but with
2040 1.16 thorpej * IFF_RUNNING cleared.
2041 1.16 thorpej */
2042 1.16 thorpej switch (sc->sc_chip) {
2043 1.16 thorpej case TULIP_CHIP_82C168:
2044 1.16 thorpej case TULIP_CHIP_82C169:
2045 1.16 thorpej tlp_init(sc);
2046 1.16 thorpej return;
2047 1.16 thorpej
2048 1.16 thorpej default:
2049 1.16 thorpej tlp_idle(sc, OPMODE_ST|OPMODE_SR);
2050 1.16 thorpej }
2051 1.16 thorpej }
2052 1.1 thorpej
2053 1.1 thorpej sc->sc_opmode &= ~(OPMODE_PR|OPMODE_PM);
2054 1.1 thorpej
2055 1.1 thorpej if (ifp->if_flags & IFF_PROMISC) {
2056 1.1 thorpej sc->sc_opmode |= OPMODE_PR;
2057 1.1 thorpej goto allmulti;
2058 1.1 thorpej }
2059 1.1 thorpej
2060 1.1 thorpej /*
2061 1.1 thorpej * Try Perfect filtering first.
2062 1.1 thorpej */
2063 1.1 thorpej
2064 1.1 thorpej sc->sc_filtmode = TDCTL_Tx_FT_PERFECT;
2065 1.1 thorpej sp = TULIP_CDSP(sc);
2066 1.1 thorpej memset(TULIP_CDSP(sc), 0, TULIP_SETUP_PACKET_LEN);
2067 1.1 thorpej cnt = 0;
2068 1.1 thorpej ETHER_FIRST_MULTI(step, ec, enm);
2069 1.1 thorpej while (enm != NULL) {
2070 1.1 thorpej if (bcmp(enm->enm_addrlo, enm->enm_addrhi, ETHER_ADDR_LEN)) {
2071 1.1 thorpej /*
2072 1.1 thorpej * We must listen to a range of multicast addresses.
2073 1.1 thorpej * For now, just accept all multicasts, rather than
2074 1.1 thorpej * trying to set only those filter bits needed to match
2075 1.1 thorpej * the range. (At this time, the only use of address
2076 1.1 thorpej * ranges is for IP multicast routing, for which the
2077 1.1 thorpej * range is big enough to require all bits set.)
2078 1.1 thorpej */
2079 1.1 thorpej goto allmulti;
2080 1.1 thorpej }
2081 1.1 thorpej if (cnt == (TULIP_MAXADDRS - 2)) {
2082 1.1 thorpej /*
2083 1.1 thorpej * We already have our multicast limit (still need
2084 1.1 thorpej * our station address and broadcast). Go to
2085 1.1 thorpej * Hash-Perfect mode.
2086 1.1 thorpej */
2087 1.1 thorpej goto hashperfect;
2088 1.1 thorpej }
2089 1.1 thorpej *sp++ = ((u_int16_t *) enm->enm_addrlo)[0];
2090 1.1 thorpej *sp++ = ((u_int16_t *) enm->enm_addrlo)[1];
2091 1.1 thorpej *sp++ = ((u_int16_t *) enm->enm_addrlo)[2];
2092 1.1 thorpej ETHER_NEXT_MULTI(step, enm);
2093 1.1 thorpej }
2094 1.1 thorpej
2095 1.1 thorpej if (ifp->if_flags & IFF_BROADCAST) {
2096 1.1 thorpej /* ...and the broadcast address. */
2097 1.1 thorpej cnt++;
2098 1.1 thorpej *sp++ = 0xffff;
2099 1.1 thorpej *sp++ = 0xffff;
2100 1.1 thorpej *sp++ = 0xffff;
2101 1.1 thorpej }
2102 1.1 thorpej
2103 1.1 thorpej /* Pad the rest with our station address. */
2104 1.1 thorpej for (; cnt < TULIP_MAXADDRS; cnt++) {
2105 1.1 thorpej *sp++ = ((u_int16_t *) enaddr)[0];
2106 1.1 thorpej *sp++ = ((u_int16_t *) enaddr)[1];
2107 1.1 thorpej *sp++ = ((u_int16_t *) enaddr)[2];
2108 1.1 thorpej }
2109 1.1 thorpej ifp->if_flags &= ~IFF_ALLMULTI;
2110 1.1 thorpej goto setit;
2111 1.1 thorpej
2112 1.1 thorpej hashperfect:
2113 1.1 thorpej /*
2114 1.1 thorpej * Try Hash-Perfect mode.
2115 1.1 thorpej */
2116 1.1 thorpej
2117 1.1 thorpej /*
2118 1.1 thorpej * Some 21140 chips have broken Hash-Perfect modes. On these
2119 1.1 thorpej * chips, we simply use Hash-Only mode, and put our station
2120 1.1 thorpej * address into the filter.
2121 1.1 thorpej */
2122 1.1 thorpej if (sc->sc_chip == TULIP_CHIP_21140)
2123 1.1 thorpej sc->sc_filtmode = TDCTL_Tx_FT_HASHONLY;
2124 1.1 thorpej else
2125 1.1 thorpej sc->sc_filtmode = TDCTL_Tx_FT_HASH;
2126 1.1 thorpej sp = TULIP_CDSP(sc);
2127 1.1 thorpej memset(TULIP_CDSP(sc), 0, TULIP_SETUP_PACKET_LEN);
2128 1.1 thorpej ETHER_FIRST_MULTI(step, ec, enm);
2129 1.1 thorpej while (enm != NULL) {
2130 1.1 thorpej if (bcmp(enm->enm_addrlo, enm->enm_addrhi, ETHER_ADDR_LEN)) {
2131 1.1 thorpej /*
2132 1.1 thorpej * We must listen to a range of multicast addresses.
2133 1.1 thorpej * For now, just accept all multicasts, rather than
2134 1.1 thorpej * trying to set only those filter bits needed to match
2135 1.1 thorpej * the range. (At this time, the only use of address
2136 1.1 thorpej * ranges is for IP multicast routing, for which the
2137 1.1 thorpej * range is big enough to require all bits set.)
2138 1.1 thorpej */
2139 1.1 thorpej goto allmulti;
2140 1.1 thorpej }
2141 1.1 thorpej hash = tlp_mchash(enm->enm_addrlo);
2142 1.1 thorpej sp[hash >> 4] |= 1 << (hash & 0xf);
2143 1.1 thorpej ETHER_NEXT_MULTI(step, enm);
2144 1.1 thorpej }
2145 1.1 thorpej
2146 1.1 thorpej if (ifp->if_flags & IFF_BROADCAST) {
2147 1.1 thorpej /* ...and the broadcast address. */
2148 1.1 thorpej hash = tlp_mchash(etherbroadcastaddr);
2149 1.1 thorpej sp[hash >> 4] |= 1 << (hash & 0xf);
2150 1.1 thorpej }
2151 1.1 thorpej
2152 1.1 thorpej if (sc->sc_filtmode == TDCTL_Tx_FT_HASHONLY) {
2153 1.1 thorpej /* ...and our station address. */
2154 1.1 thorpej hash = tlp_mchash(enaddr);
2155 1.1 thorpej sp[hash >> 4] |= 1 << (hash & 0xf);
2156 1.1 thorpej } else {
2157 1.1 thorpej /*
2158 1.1 thorpej * Hash-Perfect mode; put our station address after
2159 1.1 thorpej * the hash table.
2160 1.1 thorpej */
2161 1.1 thorpej sp[39] = ((u_int16_t *) enaddr)[0];
2162 1.1 thorpej sp[40] = ((u_int16_t *) enaddr)[1];
2163 1.1 thorpej sp[41] = ((u_int16_t *) enaddr)[2];
2164 1.1 thorpej }
2165 1.1 thorpej ifp->if_flags &= ~IFF_ALLMULTI;
2166 1.1 thorpej goto setit;
2167 1.1 thorpej
2168 1.1 thorpej allmulti:
2169 1.1 thorpej /*
2170 1.1 thorpej * Use Perfect filter mode. First address is the broadcast address,
2171 1.1 thorpej * and pad the rest with our station address. We'll set Pass-all-
2172 1.1 thorpej * multicast in OPMODE below.
2173 1.1 thorpej */
2174 1.1 thorpej sc->sc_filtmode = TDCTL_Tx_FT_PERFECT;
2175 1.1 thorpej sp = TULIP_CDSP(sc);
2176 1.1 thorpej memset(TULIP_CDSP(sc), 0, TULIP_SETUP_PACKET_LEN);
2177 1.1 thorpej cnt = 0;
2178 1.1 thorpej if (ifp->if_flags & IFF_BROADCAST) {
2179 1.1 thorpej cnt++;
2180 1.1 thorpej *sp++ = 0xffff;
2181 1.1 thorpej *sp++ = 0xffff;
2182 1.1 thorpej *sp++ = 0xffff;
2183 1.1 thorpej }
2184 1.1 thorpej for (; cnt < TULIP_MAXADDRS; cnt++) {
2185 1.1 thorpej *sp++ = ((u_int16_t *) enaddr)[0];
2186 1.1 thorpej *sp++ = ((u_int16_t *) enaddr)[1];
2187 1.1 thorpej *sp++ = ((u_int16_t *) enaddr)[2];
2188 1.1 thorpej }
2189 1.1 thorpej ifp->if_flags |= IFF_ALLMULTI;
2190 1.1 thorpej
2191 1.1 thorpej setit:
2192 1.1 thorpej if (ifp->if_flags & IFF_ALLMULTI)
2193 1.1 thorpej sc->sc_opmode |= OPMODE_PM;
2194 1.1 thorpej
2195 1.1 thorpej /* Sync the setup packet buffer. */
2196 1.1 thorpej TULIP_CDSPSYNC(sc, BUS_DMASYNC_PREWRITE);
2197 1.1 thorpej
2198 1.1 thorpej /*
2199 1.1 thorpej * Fill in the setup packet descriptor.
2200 1.1 thorpej */
2201 1.1 thorpej sc->sc_setup_desc.td_bufaddr1 = TULIP_CDSPADDR(sc);
2202 1.1 thorpej sc->sc_setup_desc.td_bufaddr2 = TULIP_CDTXADDR(sc, sc->sc_txnext);
2203 1.1 thorpej sc->sc_setup_desc.td_ctl =
2204 1.1 thorpej (TULIP_SETUP_PACKET_LEN << TDCTL_SIZE1_SHIFT) |
2205 1.1 thorpej sc->sc_filtmode | TDCTL_Tx_SET | TDCTL_Tx_FS | TDCTL_Tx_LS |
2206 1.4 thorpej TDCTL_Tx_IC | TDCTL_CH;
2207 1.1 thorpej sc->sc_setup_desc.td_status = TDSTAT_OWN;
2208 1.1 thorpej TULIP_CDSDSYNC(sc, BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
2209 1.1 thorpej
2210 1.1 thorpej /*
2211 1.1 thorpej * Write the address of the setup descriptor. This also has
2212 1.1 thorpej * the side effect of giving the transmit ring to the chip,
2213 1.1 thorpej * since the setup descriptor points to the next available
2214 1.1 thorpej * descriptor in the ring.
2215 1.1 thorpej */
2216 1.1 thorpej TULIP_WRITE(sc, CSR_TXLIST, TULIP_CDSDADDR(sc));
2217 1.1 thorpej
2218 1.1 thorpej /*
2219 1.1 thorpej * Set the OPMODE register. This will also resume the
2220 1.1 thorpej * transmit transmit process we idled above.
2221 1.1 thorpej */
2222 1.1 thorpej TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
2223 1.1 thorpej
2224 1.4 thorpej sc->sc_flags |= TULIPF_DOING_SETUP;
2225 1.4 thorpej
2226 1.1 thorpej /*
2227 1.1 thorpej * Kick the transmitter; this will cause the Tulip to
2228 1.1 thorpej * read the setup descriptor.
2229 1.1 thorpej */
2230 1.1 thorpej /* XXX USE AUTOPOLLING? */
2231 1.1 thorpej TULIP_WRITE(sc, CSR_TXPOLL, TXPOLL_TPD);
2232 1.1 thorpej
2233 1.4 thorpej /* Set up a watchdog timer in case the chip flakes out. */
2234 1.4 thorpej ifp->if_timer = 5;
2235 1.4 thorpej
2236 1.5 thorpej DPRINTF(sc, ("%s: tlp_filter_setup: returning\n", sc->sc_dev.dv_xname));
2237 1.1 thorpej }
2238 1.1 thorpej
2239 1.1 thorpej /*
2240 1.1 thorpej * tlp_winb_filter_setup:
2241 1.1 thorpej *
2242 1.1 thorpej * Set the Winbond 89C840F's receive filter.
2243 1.1 thorpej */
2244 1.1 thorpej void
2245 1.1 thorpej tlp_winb_filter_setup(sc)
2246 1.1 thorpej struct tulip_softc *sc;
2247 1.1 thorpej {
2248 1.1 thorpej struct ethercom *ec = &sc->sc_ethercom;
2249 1.1 thorpej struct ifnet *ifp = &sc->sc_ethercom.ec_if;
2250 1.1 thorpej struct ether_multi *enm;
2251 1.1 thorpej struct ether_multistep step;
2252 1.1 thorpej u_int32_t hash, mchash[2];
2253 1.1 thorpej
2254 1.5 thorpej DPRINTF(sc, ("%s: tlp_winb_filter_setup: sc_flags 0x%08x\n",
2255 1.1 thorpej sc->sc_dev.dv_xname, sc->sc_flags));
2256 1.1 thorpej
2257 1.5 thorpej sc->sc_opmode &= ~(OPMODE_WINB_APP|OPMODE_WINB_AMP|OPMODE_WINB_ABP);
2258 1.5 thorpej
2259 1.5 thorpej if (ifp->if_flags & IFF_MULTICAST)
2260 1.5 thorpej sc->sc_opmode |= OPMODE_WINB_AMP;
2261 1.5 thorpej
2262 1.5 thorpej if (ifp->if_flags & IFF_BROADCAST)
2263 1.5 thorpej sc->sc_opmode |= OPMODE_WINB_ABP;
2264 1.1 thorpej
2265 1.1 thorpej if (ifp->if_flags & IFF_PROMISC) {
2266 1.5 thorpej sc->sc_opmode |= OPMODE_WINB_APP;
2267 1.1 thorpej goto allmulti;
2268 1.1 thorpej }
2269 1.1 thorpej
2270 1.1 thorpej mchash[0] = mchash[1] = 0;
2271 1.1 thorpej
2272 1.1 thorpej ETHER_FIRST_MULTI(step, ec, enm);
2273 1.1 thorpej while (enm != NULL) {
2274 1.1 thorpej if (bcmp(enm->enm_addrlo, enm->enm_addrhi, ETHER_ADDR_LEN)) {
2275 1.1 thorpej /*
2276 1.1 thorpej * We must listen to a range of multicast addresses.
2277 1.1 thorpej * For now, just accept all multicasts, rather than
2278 1.1 thorpej * trying to set only those filter bits needed to match
2279 1.1 thorpej * the range. (At this time, the only use of address
2280 1.1 thorpej * ranges is for IP multicast routing, for which the
2281 1.1 thorpej * range is big enough to require all bits set.)
2282 1.1 thorpej */
2283 1.1 thorpej goto allmulti;
2284 1.1 thorpej }
2285 1.1 thorpej
2286 1.1 thorpej /*
2287 1.1 thorpej * According to the FreeBSD `wb' driver, yes, you
2288 1.1 thorpej * really do invert the hash.
2289 1.1 thorpej */
2290 1.1 thorpej hash = (~(tlp_crc32(enm->enm_addrlo, ETHER_ADDR_LEN) >> 26))
2291 1.1 thorpej & 0x3f;
2292 1.1 thorpej mchash[hash >> 5] |= 1 << (hash & 0x1f);
2293 1.1 thorpej ETHER_NEXT_MULTI(step, enm);
2294 1.1 thorpej }
2295 1.1 thorpej ifp->if_flags &= ~IFF_ALLMULTI;
2296 1.1 thorpej goto setit;
2297 1.1 thorpej
2298 1.1 thorpej allmulti:
2299 1.1 thorpej ifp->if_flags |= IFF_ALLMULTI;
2300 1.1 thorpej mchash[0] = mchash[1] = 0xffffffff;
2301 1.1 thorpej
2302 1.1 thorpej setit:
2303 1.5 thorpej TULIP_WRITE(sc, CSR_WINB_CMA0, mchash[0]);
2304 1.5 thorpej TULIP_WRITE(sc, CSR_WINB_CMA1, mchash[1]);
2305 1.1 thorpej TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
2306 1.5 thorpej DPRINTF(sc, ("%s: tlp_winb_filter_setup: returning\n",
2307 1.1 thorpej sc->sc_dev.dv_xname));
2308 1.1 thorpej }
2309 1.1 thorpej
2310 1.1 thorpej /*
2311 1.1 thorpej * tlp_idle:
2312 1.1 thorpej *
2313 1.1 thorpej * Cause the transmit and/or receive processes to go idle.
2314 1.1 thorpej */
2315 1.1 thorpej void
2316 1.1 thorpej tlp_idle(sc, bits)
2317 1.1 thorpej struct tulip_softc *sc;
2318 1.1 thorpej u_int32_t bits;
2319 1.1 thorpej {
2320 1.1 thorpej static const char *tx_state_names[] = {
2321 1.1 thorpej "STOPPED",
2322 1.1 thorpej "RUNNING - FETCH",
2323 1.1 thorpej "RUNNING - WAIT",
2324 1.1 thorpej "RUNNING - READING",
2325 1.1 thorpej "-- RESERVED --",
2326 1.1 thorpej "RUNNING - SETUP",
2327 1.1 thorpej "SUSPENDED",
2328 1.1 thorpej "RUNNING - CLOSE",
2329 1.1 thorpej };
2330 1.1 thorpej static const char *rx_state_names[] = {
2331 1.1 thorpej "STOPPED",
2332 1.1 thorpej "RUNNING - FETCH",
2333 1.1 thorpej "RUNNING - CHECK",
2334 1.1 thorpej "RUNNING - WAIT",
2335 1.1 thorpej "SUSPENDED",
2336 1.1 thorpej "RUNNING - CLOSE",
2337 1.1 thorpej "RUNNING - FLUSH",
2338 1.1 thorpej "RUNNING - QUEUE",
2339 1.1 thorpej };
2340 1.1 thorpej u_int32_t csr, ackmask = 0;
2341 1.1 thorpej int i;
2342 1.1 thorpej
2343 1.1 thorpej if (bits & OPMODE_ST)
2344 1.1 thorpej ackmask |= STATUS_TPS;
2345 1.1 thorpej
2346 1.1 thorpej if (bits & OPMODE_SR)
2347 1.1 thorpej ackmask |= STATUS_RPS;
2348 1.1 thorpej
2349 1.1 thorpej TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode & ~bits);
2350 1.1 thorpej
2351 1.1 thorpej for (i = 0; i < 1000; i++) {
2352 1.1 thorpej if (TULIP_ISSET(sc, CSR_STATUS, ackmask) == ackmask)
2353 1.1 thorpej break;
2354 1.1 thorpej delay(10);
2355 1.1 thorpej }
2356 1.1 thorpej
2357 1.1 thorpej csr = TULIP_READ(sc, CSR_STATUS);
2358 1.1 thorpej if ((csr & ackmask) != ackmask) {
2359 1.1 thorpej if ((bits & OPMODE_ST) != 0 && (csr & STATUS_TPS) == 0 &&
2360 1.1 thorpej (csr & STATUS_TS) != STATUS_TS_STOPPED)
2361 1.1 thorpej printf("%s: transmit process failed to idle: "
2362 1.1 thorpej "state %s\n", sc->sc_dev.dv_xname,
2363 1.1 thorpej tx_state_names[(csr & STATUS_TS) >> 20]);
2364 1.1 thorpej if ((bits & OPMODE_SR) != 0 && (csr & STATUS_RPS) == 0 &&
2365 1.1 thorpej (csr & STATUS_RS) != STATUS_RS_STOPPED)
2366 1.1 thorpej printf("%s: receive process failed to idle: "
2367 1.1 thorpej "state %s\n", sc->sc_dev.dv_xname,
2368 1.1 thorpej rx_state_names[(csr & STATUS_RS) >> 17]);
2369 1.1 thorpej }
2370 1.1 thorpej TULIP_WRITE(sc, CSR_STATUS, ackmask);
2371 1.1 thorpej }
2372 1.1 thorpej
2373 1.1 thorpej /*****************************************************************************
2374 1.1 thorpej * Generic media support functions.
2375 1.1 thorpej *****************************************************************************/
2376 1.1 thorpej
2377 1.1 thorpej /*
2378 1.1 thorpej * tlp_mediastatus: [ifmedia interface function]
2379 1.1 thorpej *
2380 1.1 thorpej * Query the current media.
2381 1.1 thorpej */
2382 1.1 thorpej void
2383 1.1 thorpej tlp_mediastatus(ifp, ifmr)
2384 1.1 thorpej struct ifnet *ifp;
2385 1.1 thorpej struct ifmediareq *ifmr;
2386 1.1 thorpej {
2387 1.1 thorpej struct tulip_softc *sc = ifp->if_softc;
2388 1.1 thorpej
2389 1.1 thorpej (*sc->sc_mediasw->tmsw_get)(sc, ifmr);
2390 1.1 thorpej }
2391 1.1 thorpej
2392 1.1 thorpej /*
2393 1.1 thorpej * tlp_mediachange: [ifmedia interface function]
2394 1.1 thorpej *
2395 1.1 thorpej * Update the current media.
2396 1.1 thorpej */
2397 1.1 thorpej int
2398 1.1 thorpej tlp_mediachange(ifp)
2399 1.1 thorpej struct ifnet *ifp;
2400 1.1 thorpej {
2401 1.1 thorpej struct tulip_softc *sc = ifp->if_softc;
2402 1.1 thorpej
2403 1.1 thorpej return ((*sc->sc_mediasw->tmsw_set)(sc));
2404 1.1 thorpej }
2405 1.1 thorpej
2406 1.1 thorpej /*****************************************************************************
2407 1.1 thorpej * Support functions for MII-attached media.
2408 1.1 thorpej *****************************************************************************/
2409 1.1 thorpej
2410 1.1 thorpej /*
2411 1.1 thorpej * tlp_mii_tick:
2412 1.1 thorpej *
2413 1.1 thorpej * One second timer, used to tick the MII.
2414 1.1 thorpej */
2415 1.1 thorpej void
2416 1.1 thorpej tlp_mii_tick(arg)
2417 1.1 thorpej void *arg;
2418 1.1 thorpej {
2419 1.1 thorpej struct tulip_softc *sc = arg;
2420 1.1 thorpej int s;
2421 1.1 thorpej
2422 1.1 thorpej s = splnet();
2423 1.1 thorpej mii_tick(&sc->sc_mii);
2424 1.1 thorpej splx(s);
2425 1.1 thorpej
2426 1.6 thorpej timeout(sc->sc_tick, sc, hz);
2427 1.1 thorpej }
2428 1.1 thorpej
2429 1.1 thorpej /*
2430 1.1 thorpej * tlp_mii_statchg: [mii interface function]
2431 1.1 thorpej *
2432 1.1 thorpej * Callback from PHY when media changes.
2433 1.1 thorpej */
2434 1.1 thorpej void
2435 1.1 thorpej tlp_mii_statchg(self)
2436 1.1 thorpej struct device *self;
2437 1.1 thorpej {
2438 1.1 thorpej struct tulip_softc *sc = (struct tulip_softc *)self;
2439 1.1 thorpej
2440 1.1 thorpej /* Idle the transmit and receive processes. */
2441 1.1 thorpej tlp_idle(sc, OPMODE_ST|OPMODE_SR);
2442 1.1 thorpej
2443 1.1 thorpej /*
2444 1.1 thorpej * XXX What about Heartbeat Disable? Is it magically frobbed
2445 1.1 thorpej * XXX by the PHY? I hope so...
2446 1.1 thorpej */
2447 1.1 thorpej
2448 1.7 thorpej sc->sc_opmode &= ~(OPMODE_TTM|OPMODE_FD);
2449 1.7 thorpej
2450 1.1 thorpej if (IFM_SUBTYPE(sc->sc_mii.mii_media_active) == IFM_10_T)
2451 1.1 thorpej sc->sc_opmode |= OPMODE_TTM;
2452 1.1 thorpej
2453 1.1 thorpej if (sc->sc_mii.mii_media_active & IFM_FDX)
2454 1.1 thorpej sc->sc_opmode |= OPMODE_FD;
2455 1.1 thorpej
2456 1.1 thorpej /*
2457 1.1 thorpej * Write new OPMODE bits. This also restarts the transmit
2458 1.1 thorpej * and receive processes.
2459 1.1 thorpej */
2460 1.1 thorpej TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
2461 1.1 thorpej
2462 1.1 thorpej /* XXX Update ifp->if_baudrate */
2463 1.1 thorpej }
2464 1.1 thorpej
2465 1.1 thorpej /*
2466 1.5 thorpej * tlp_winb_mii_statchg: [mii interface function]
2467 1.5 thorpej *
2468 1.5 thorpej * Callback from PHY when media changes. This version is
2469 1.5 thorpej * for the Winbond 89C840F, which has different OPMODE bits.
2470 1.5 thorpej */
2471 1.5 thorpej void
2472 1.5 thorpej tlp_winb_mii_statchg(self)
2473 1.5 thorpej struct device *self;
2474 1.5 thorpej {
2475 1.5 thorpej struct tulip_softc *sc = (struct tulip_softc *)self;
2476 1.5 thorpej
2477 1.5 thorpej /* Idle the transmit and receive processes. */
2478 1.5 thorpej tlp_idle(sc, OPMODE_ST|OPMODE_SR);
2479 1.5 thorpej
2480 1.5 thorpej /*
2481 1.5 thorpej * XXX What about Heartbeat Disable? Is it magically frobbed
2482 1.5 thorpej * XXX by the PHY? I hope so...
2483 1.5 thorpej */
2484 1.5 thorpej
2485 1.7 thorpej sc->sc_opmode &= ~(OPMODE_WINB_FES|OPMODE_FD);
2486 1.7 thorpej
2487 1.5 thorpej if (IFM_SUBTYPE(sc->sc_mii.mii_media_active) == IFM_100_TX)
2488 1.5 thorpej sc->sc_opmode |= OPMODE_WINB_FES;
2489 1.5 thorpej
2490 1.5 thorpej if (sc->sc_mii.mii_media_active & IFM_FDX)
2491 1.5 thorpej sc->sc_opmode |= OPMODE_FD;
2492 1.5 thorpej
2493 1.5 thorpej /*
2494 1.5 thorpej * Write new OPMODE bits. This also restarts the transmit
2495 1.5 thorpej * and receive processes.
2496 1.5 thorpej */
2497 1.5 thorpej TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
2498 1.5 thorpej
2499 1.5 thorpej /* XXX Update ifp->if_baudrate */
2500 1.5 thorpej }
2501 1.5 thorpej
2502 1.5 thorpej /*
2503 1.1 thorpej * tlp_mii_getmedia:
2504 1.1 thorpej *
2505 1.1 thorpej * Callback from ifmedia to request current media status.
2506 1.1 thorpej */
2507 1.1 thorpej void
2508 1.1 thorpej tlp_mii_getmedia(sc, ifmr)
2509 1.1 thorpej struct tulip_softc *sc;
2510 1.1 thorpej struct ifmediareq *ifmr;
2511 1.1 thorpej {
2512 1.1 thorpej
2513 1.1 thorpej mii_pollstat(&sc->sc_mii);
2514 1.1 thorpej ifmr->ifm_status = sc->sc_mii.mii_media_status;
2515 1.1 thorpej ifmr->ifm_active = sc->sc_mii.mii_media_active;
2516 1.1 thorpej }
2517 1.1 thorpej
2518 1.1 thorpej /*
2519 1.1 thorpej * tlp_mii_setmedia:
2520 1.1 thorpej *
2521 1.1 thorpej * Callback from ifmedia to request new media setting.
2522 1.1 thorpej */
2523 1.1 thorpej int
2524 1.1 thorpej tlp_mii_setmedia(sc)
2525 1.1 thorpej struct tulip_softc *sc;
2526 1.1 thorpej {
2527 1.1 thorpej struct ifnet *ifp = &sc->sc_ethercom.ec_if;
2528 1.1 thorpej
2529 1.1 thorpej if (ifp->if_flags & IFF_UP)
2530 1.1 thorpej mii_mediachg(&sc->sc_mii);
2531 1.1 thorpej return (0);
2532 1.1 thorpej }
2533 1.1 thorpej
2534 1.1 thorpej #define MII_EMIT(sc, x) \
2535 1.1 thorpej do { \
2536 1.1 thorpej TULIP_WRITE((sc), CSR_MIIROM, (x)); \
2537 1.1 thorpej delay(1); \
2538 1.1 thorpej } while (0)
2539 1.1 thorpej
2540 1.1 thorpej /*
2541 1.1 thorpej * tlp_sio_mii_sync:
2542 1.1 thorpej *
2543 1.1 thorpej * Synchronize the SIO-attached MII.
2544 1.1 thorpej */
2545 1.1 thorpej void
2546 1.1 thorpej tlp_sio_mii_sync(sc)
2547 1.1 thorpej struct tulip_softc *sc;
2548 1.1 thorpej {
2549 1.1 thorpej u_int32_t miirom;
2550 1.1 thorpej int i;
2551 1.1 thorpej
2552 1.17 thorpej miirom = MIIROM_MDO;
2553 1.1 thorpej
2554 1.1 thorpej MII_EMIT(sc, miirom);
2555 1.1 thorpej for (i = 0; i < 32; i++) {
2556 1.1 thorpej MII_EMIT(sc, miirom | MIIROM_MDC);
2557 1.1 thorpej MII_EMIT(sc, miirom);
2558 1.1 thorpej }
2559 1.1 thorpej }
2560 1.1 thorpej
2561 1.1 thorpej /*
2562 1.1 thorpej * tlp_sio_mii_sendbits:
2563 1.1 thorpej *
2564 1.1 thorpej * Send a series of bits out the SIO to the MII.
2565 1.1 thorpej */
2566 1.1 thorpej void
2567 1.1 thorpej tlp_sio_mii_sendbits(sc, data, nbits)
2568 1.1 thorpej struct tulip_softc *sc;
2569 1.1 thorpej u_int32_t data;
2570 1.1 thorpej int nbits;
2571 1.1 thorpej {
2572 1.1 thorpej u_int32_t miirom, i;
2573 1.1 thorpej
2574 1.17 thorpej miirom = 0;
2575 1.1 thorpej MII_EMIT(sc, miirom);
2576 1.1 thorpej
2577 1.1 thorpej for (i = 1 << (nbits - 1); i != 0; i >>= 1) {
2578 1.1 thorpej if (data & i)
2579 1.1 thorpej miirom |= MIIROM_MDO;
2580 1.1 thorpej else
2581 1.1 thorpej miirom &= ~MIIROM_MDO;
2582 1.1 thorpej MII_EMIT(sc, miirom);
2583 1.1 thorpej MII_EMIT(sc, miirom|MIIROM_MDC);
2584 1.1 thorpej MII_EMIT(sc, miirom);
2585 1.1 thorpej }
2586 1.1 thorpej }
2587 1.1 thorpej
2588 1.1 thorpej /*
2589 1.1 thorpej * tlp_sio_mii_readreg:
2590 1.1 thorpej *
2591 1.1 thorpej * Read a PHY register via SIO-attached MII.
2592 1.1 thorpej */
2593 1.1 thorpej int
2594 1.1 thorpej tlp_sio_mii_readreg(self, phy, reg)
2595 1.1 thorpej struct device *self;
2596 1.1 thorpej int phy, reg;
2597 1.1 thorpej {
2598 1.1 thorpej struct tulip_softc *sc = (void *) self;
2599 1.1 thorpej int val = 0, err = 0, i;
2600 1.1 thorpej
2601 1.1 thorpej tlp_sio_mii_sync(sc);
2602 1.1 thorpej
2603 1.1 thorpej tlp_sio_mii_sendbits(sc, MII_COMMAND_START, 2);
2604 1.1 thorpej tlp_sio_mii_sendbits(sc, MII_COMMAND_READ, 2);
2605 1.1 thorpej tlp_sio_mii_sendbits(sc, phy, 5);
2606 1.1 thorpej tlp_sio_mii_sendbits(sc, reg, 5);
2607 1.1 thorpej
2608 1.17 thorpej /* Switch direction to PHY->host, without a clock transition. */
2609 1.1 thorpej MII_EMIT(sc, MIIROM_MIIDIR);
2610 1.17 thorpej
2611 1.1 thorpej MII_EMIT(sc, MIIROM_MIIDIR|MIIROM_MDC);
2612 1.17 thorpej MII_EMIT(sc, MIIROM_MIIDIR);
2613 1.1 thorpej
2614 1.1 thorpej err = TULIP_ISSET(sc, CSR_MIIROM, MIIROM_MDI);
2615 1.1 thorpej
2616 1.17 thorpej MII_EMIT(sc, MIIROM_MIIDIR|MIIROM_MDC);
2617 1.17 thorpej MII_EMIT(sc, MIIROM_MIIDIR);
2618 1.1 thorpej
2619 1.1 thorpej for (i = 0; i < 16; i++) {
2620 1.1 thorpej val <<= 1;
2621 1.17 thorpej /* Read data prior to clock low-high transition. */
2622 1.1 thorpej if (err == 0 && TULIP_ISSET(sc, CSR_MIIROM, MIIROM_MDI))
2623 1.1 thorpej val |= 1;
2624 1.17 thorpej
2625 1.17 thorpej MII_EMIT(sc, MIIROM_MIIDIR|MIIROM_MDC);
2626 1.17 thorpej MII_EMIT(sc, MIIROM_MIIDIR);
2627 1.1 thorpej }
2628 1.1 thorpej
2629 1.17 thorpej /* Set direction to host->PHY, without a clock transition. */
2630 1.1 thorpej MII_EMIT(sc, 0);
2631 1.1 thorpej
2632 1.1 thorpej return (err ? 0 : val);
2633 1.1 thorpej }
2634 1.1 thorpej
2635 1.1 thorpej /*
2636 1.1 thorpej * tlp_sio_mii_writereg:
2637 1.1 thorpej *
2638 1.1 thorpej * Write a PHY register via SIO-attached MII.
2639 1.1 thorpej */
2640 1.1 thorpej void
2641 1.1 thorpej tlp_sio_mii_writereg(self, phy, reg, val)
2642 1.1 thorpej struct device *self;
2643 1.1 thorpej int phy, reg, val;
2644 1.1 thorpej {
2645 1.1 thorpej struct tulip_softc *sc = (void *) self;
2646 1.1 thorpej
2647 1.1 thorpej tlp_sio_mii_sync(sc);
2648 1.1 thorpej
2649 1.1 thorpej tlp_sio_mii_sendbits(sc, MII_COMMAND_START, 2);
2650 1.1 thorpej tlp_sio_mii_sendbits(sc, MII_COMMAND_WRITE, 2);
2651 1.1 thorpej tlp_sio_mii_sendbits(sc, phy, 5);
2652 1.1 thorpej tlp_sio_mii_sendbits(sc, reg, 5);
2653 1.1 thorpej tlp_sio_mii_sendbits(sc, MII_COMMAND_ACK, 2);
2654 1.1 thorpej tlp_sio_mii_sendbits(sc, val, 16);
2655 1.1 thorpej
2656 1.1 thorpej MII_EMIT(sc, 0);
2657 1.1 thorpej }
2658 1.1 thorpej
2659 1.1 thorpej #undef MII_EMIT
2660 1.1 thorpej
2661 1.1 thorpej /*
2662 1.1 thorpej * tlp_pnic_mii_readreg:
2663 1.1 thorpej *
2664 1.1 thorpej * Read a PHY register on the Lite-On PNIC.
2665 1.1 thorpej */
2666 1.1 thorpej int
2667 1.1 thorpej tlp_pnic_mii_readreg(self, phy, reg)
2668 1.1 thorpej struct device *self;
2669 1.1 thorpej int phy, reg;
2670 1.1 thorpej {
2671 1.1 thorpej struct tulip_softc *sc = (void *) self;
2672 1.1 thorpej u_int32_t val;
2673 1.1 thorpej int i;
2674 1.1 thorpej
2675 1.1 thorpej TULIP_WRITE(sc, CSR_PNIC_MII,
2676 1.6 thorpej PNIC_MII_MBO | PNIC_MII_RESERVED |
2677 1.1 thorpej PNIC_MII_READ | (phy << PNIC_MII_PHYSHIFT) |
2678 1.1 thorpej (reg << PNIC_MII_REGSHIFT));
2679 1.1 thorpej
2680 1.1 thorpej for (i = 0; i < 1000; i++) {
2681 1.1 thorpej delay(10);
2682 1.1 thorpej val = TULIP_READ(sc, CSR_PNIC_MII);
2683 1.1 thorpej if ((val & PNIC_MII_BUSY) == 0) {
2684 1.1 thorpej if ((val & PNIC_MII_DATA) == PNIC_MII_DATA)
2685 1.1 thorpej return (0);
2686 1.1 thorpej else
2687 1.1 thorpej return (val & PNIC_MII_DATA);
2688 1.1 thorpej }
2689 1.1 thorpej }
2690 1.1 thorpej printf("%s: MII read timed out\n", sc->sc_dev.dv_xname);
2691 1.1 thorpej return (0);
2692 1.1 thorpej }
2693 1.1 thorpej
2694 1.1 thorpej /*
2695 1.1 thorpej * tlp_pnic_mii_writereg:
2696 1.1 thorpej *
2697 1.1 thorpej * Write a PHY register on the Lite-On PNIC.
2698 1.1 thorpej */
2699 1.1 thorpej void
2700 1.1 thorpej tlp_pnic_mii_writereg(self, phy, reg, val)
2701 1.1 thorpej struct device *self;
2702 1.1 thorpej int phy, reg, val;
2703 1.1 thorpej {
2704 1.1 thorpej struct tulip_softc *sc = (void *) self;
2705 1.1 thorpej int i;
2706 1.1 thorpej
2707 1.1 thorpej TULIP_WRITE(sc, CSR_PNIC_MII,
2708 1.6 thorpej PNIC_MII_MBO | PNIC_MII_RESERVED |
2709 1.1 thorpej PNIC_MII_WRITE | (phy << PNIC_MII_PHYSHIFT) |
2710 1.1 thorpej (reg << PNIC_MII_REGSHIFT) | val);
2711 1.1 thorpej
2712 1.1 thorpej for (i = 0; i < 1000; i++) {
2713 1.1 thorpej delay(10);
2714 1.1 thorpej if (TULIP_ISSET(sc, CSR_PNIC_MII, PNIC_MII_BUSY) == 0)
2715 1.1 thorpej return;
2716 1.1 thorpej }
2717 1.1 thorpej printf("%s: MII write timed out\n", sc->sc_dev.dv_xname);
2718 1.1 thorpej }
2719 1.1 thorpej
2720 1.1 thorpej /*****************************************************************************
2721 1.13 thorpej * Chip-specific pre-init and reset functions.
2722 1.13 thorpej *****************************************************************************/
2723 1.13 thorpej
2724 1.13 thorpej /*
2725 1.13 thorpej * tlp_2114x_preinit:
2726 1.13 thorpej *
2727 1.13 thorpej * Pre-init function shared by DECchip 21140, 21140A, 21142, and 21143.
2728 1.13 thorpej */
2729 1.13 thorpej void
2730 1.13 thorpej tlp_2114x_preinit(sc)
2731 1.13 thorpej struct tulip_softc *sc;
2732 1.13 thorpej {
2733 1.17 thorpej struct ifmedia_entry *ife = sc->sc_mii.mii_media.ifm_cur;
2734 1.17 thorpej struct tulip_2114x_media *tm = ife->ifm_aux;
2735 1.13 thorpej
2736 1.13 thorpej /*
2737 1.13 thorpej * Always set the Must-Be-One bit.
2738 1.13 thorpej */
2739 1.13 thorpej sc->sc_opmode |= OPMODE_MBO;
2740 1.13 thorpej
2741 1.17 thorpej if (tm != NULL &&
2742 1.17 thorpej (tm->tm_type == TULIP_ROM_MB_21140_MII ||
2743 1.17 thorpej tm->tm_type == TULIP_ROM_MB_21142_MII)) {
2744 1.13 thorpej /*
2745 1.13 thorpej * MII case: just set the port-select bit; we will never
2746 1.13 thorpej * be called during a media change.
2747 1.13 thorpej */
2748 1.13 thorpej sc->sc_opmode |= OPMODE_PS;
2749 1.17 thorpej goto set_opmode;
2750 1.13 thorpej }
2751 1.13 thorpej
2752 1.17 thorpej /*
2753 1.17 thorpej * ENDEC/PCS mode; set according to selected media type.
2754 1.17 thorpej * XXX Auto-sense not supported yet.
2755 1.17 thorpej */
2756 1.17 thorpej sc->sc_opmode |= tm->tm_opmode;
2757 1.17 thorpej
2758 1.17 thorpej set_opmode:
2759 1.13 thorpej TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
2760 1.13 thorpej }
2761 1.13 thorpej
2762 1.13 thorpej /*
2763 1.13 thorpej * tlp_pnic_preinit:
2764 1.13 thorpej *
2765 1.13 thorpej * Pre-init function for the Lite-On 82c168 and 82c169.
2766 1.13 thorpej */
2767 1.13 thorpej void
2768 1.13 thorpej tlp_pnic_preinit(sc)
2769 1.13 thorpej struct tulip_softc *sc;
2770 1.13 thorpej {
2771 1.13 thorpej
2772 1.13 thorpej if (sc->sc_flags & TULIPF_HAS_MII) {
2773 1.13 thorpej /*
2774 1.13 thorpej * MII case: just set the port-select bit; we will never
2775 1.13 thorpej * be called during a media change.
2776 1.13 thorpej */
2777 1.13 thorpej sc->sc_opmode |= OPMODE_PS;
2778 1.13 thorpej } else {
2779 1.13 thorpej /*
2780 1.16 thorpej * ENDEC/PCS/Nway mode; enable the Tx backoff counter.
2781 1.13 thorpej */
2782 1.16 thorpej sc->sc_opmode |= OPMODE_PNIC_TBEN;
2783 1.13 thorpej }
2784 1.13 thorpej }
2785 1.13 thorpej
2786 1.17 thorpej /*
2787 1.17 thorpej * tlp_21140_reset:
2788 1.17 thorpej *
2789 1.17 thorpej * Issue a reset sequence on the 21140 via the GPIO facility.
2790 1.17 thorpej */
2791 1.17 thorpej void
2792 1.17 thorpej tlp_21140_reset(sc)
2793 1.17 thorpej struct tulip_softc *sc;
2794 1.17 thorpej {
2795 1.17 thorpej struct ifmedia_entry *ife = sc->sc_mii.mii_media.ifm_cur;
2796 1.17 thorpej struct tulip_2114x_media *tm = ife->ifm_aux;
2797 1.17 thorpej int i;
2798 1.17 thorpej
2799 1.17 thorpej /* First, set the direction on the GPIO pins. */
2800 1.17 thorpej TULIP_WRITE(sc, CSR_GPP, GPP_GPC|sc->sc_gp_dir);
2801 1.17 thorpej
2802 1.17 thorpej /* Now, issue the reset sequence. */
2803 1.17 thorpej for (i = 0; i < tm->tm_reset_length; i++) {
2804 1.17 thorpej delay(10);
2805 1.17 thorpej TULIP_WRITE(sc, CSR_GPP, sc->sc_srom[tm->tm_reset_offset + i]);
2806 1.17 thorpej }
2807 1.17 thorpej
2808 1.17 thorpej /* Now, issue the selection sequence. */
2809 1.17 thorpej for (i = 0; i < tm->tm_gp_length; i++) {
2810 1.17 thorpej delay(10);
2811 1.17 thorpej TULIP_WRITE(sc, CSR_GPP, sc->sc_srom[tm->tm_gp_offset + i]);
2812 1.17 thorpej }
2813 1.17 thorpej
2814 1.17 thorpej /* If there were no sequences, just lower the pins. */
2815 1.17 thorpej if (tm->tm_reset_length == 0 && tm->tm_gp_length == 0)
2816 1.17 thorpej TULIP_WRITE(sc, CSR_GPP, 0);
2817 1.17 thorpej }
2818 1.17 thorpej
2819 1.13 thorpej /*****************************************************************************
2820 1.1 thorpej * Chip/board-specific media switches. The ones here are ones that
2821 1.1 thorpej * are potentially common to multiple front-ends.
2822 1.1 thorpej *****************************************************************************/
2823 1.1 thorpej
2824 1.1 thorpej /*
2825 1.7 thorpej * 21040 and 21041 media switches.
2826 1.7 thorpej */
2827 1.7 thorpej void tlp_21040_tmsw_init __P((struct tulip_softc *));
2828 1.7 thorpej void tlp_21040_tp_tmsw_init __P((struct tulip_softc *));
2829 1.7 thorpej void tlp_21040_auibnc_tmsw_init __P((struct tulip_softc *));
2830 1.13 thorpej void tlp_21041_tmsw_init __P((struct tulip_softc *));
2831 1.7 thorpej void tlp_21040_21041_tmsw_get __P((struct tulip_softc *,
2832 1.7 thorpej struct ifmediareq *));
2833 1.7 thorpej int tlp_21040_21041_tmsw_set __P((struct tulip_softc *));
2834 1.7 thorpej
2835 1.7 thorpej const struct tulip_mediasw tlp_21040_mediasw = {
2836 1.7 thorpej tlp_21040_tmsw_init, tlp_21040_21041_tmsw_get, tlp_21040_21041_tmsw_set
2837 1.7 thorpej };
2838 1.7 thorpej
2839 1.7 thorpej const struct tulip_mediasw tlp_21040_tp_mediasw = {
2840 1.7 thorpej tlp_21040_tp_tmsw_init, tlp_21040_21041_tmsw_get,
2841 1.7 thorpej tlp_21040_21041_tmsw_set
2842 1.7 thorpej };
2843 1.7 thorpej
2844 1.7 thorpej const struct tulip_mediasw tlp_21040_auibnc_mediasw = {
2845 1.7 thorpej tlp_21040_auibnc_tmsw_init, tlp_21040_21041_tmsw_get,
2846 1.7 thorpej tlp_21040_21041_tmsw_set
2847 1.7 thorpej };
2848 1.7 thorpej
2849 1.13 thorpej const struct tulip_mediasw tlp_21041_mediasw = {
2850 1.13 thorpej tlp_21041_tmsw_init, tlp_21040_21041_tmsw_get, tlp_21040_21041_tmsw_set
2851 1.13 thorpej };
2852 1.13 thorpej
2853 1.7 thorpej #define ADD(m, t) ifmedia_add(&sc->sc_mii.mii_media, (m), 0, (t))
2854 1.7 thorpej #define PRINT(s) printf("%s%s", sep, s); sep = ", "
2855 1.7 thorpej
2856 1.7 thorpej void
2857 1.7 thorpej tlp_21040_tmsw_init(sc)
2858 1.7 thorpej struct tulip_softc *sc;
2859 1.7 thorpej {
2860 1.7 thorpej struct tulip_21040_21041_sia_media *tsm;
2861 1.7 thorpej const char *sep = "";
2862 1.7 thorpej
2863 1.7 thorpej ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
2864 1.7 thorpej tlp_mediastatus);
2865 1.7 thorpej
2866 1.7 thorpej printf("%s: ", sc->sc_dev.dv_xname);
2867 1.7 thorpej
2868 1.7 thorpej tsm = malloc(sizeof(struct tulip_21040_21041_sia_media), M_DEVBUF,
2869 1.7 thorpej M_WAITOK);
2870 1.7 thorpej tsm->tsm_siaconn = SIACONN_21040_10BASET;
2871 1.7 thorpej tsm->tsm_siatxrx = SIATXRX_21040_10BASET;
2872 1.7 thorpej tsm->tsm_siagen = SIAGEN_21040_10BASET;
2873 1.7 thorpej ADD(IFM_ETHER|IFM_10_T, tsm);
2874 1.7 thorpej PRINT("10baseT");
2875 1.7 thorpej
2876 1.7 thorpej tsm = malloc(sizeof(struct tulip_21040_21041_sia_media), M_DEVBUF,
2877 1.7 thorpej M_WAITOK);
2878 1.7 thorpej tsm->tsm_siaconn = SIACONN_21040_10BASET_FDX;
2879 1.7 thorpej tsm->tsm_siatxrx = SIATXRX_21040_10BASET_FDX;
2880 1.7 thorpej tsm->tsm_siagen = SIAGEN_21040_10BASET_FDX;
2881 1.7 thorpej ADD(IFM_ETHER|IFM_10_T|IFM_FDX, tsm);
2882 1.7 thorpej PRINT("10baseT-FDX");
2883 1.7 thorpej
2884 1.7 thorpej tsm = malloc(sizeof(struct tulip_21040_21041_sia_media), M_DEVBUF,
2885 1.7 thorpej M_WAITOK);
2886 1.7 thorpej tsm->tsm_siaconn = SIACONN_21040_AUI;
2887 1.7 thorpej tsm->tsm_siatxrx = SIATXRX_21040_AUI;
2888 1.7 thorpej tsm->tsm_siagen = SIAGEN_21040_AUI;
2889 1.7 thorpej ADD(IFM_ETHER|IFM_10_5, tsm);
2890 1.7 thorpej PRINT("10base5");
2891 1.7 thorpej
2892 1.7 thorpej tsm = malloc(sizeof(struct tulip_21040_21041_sia_media), M_DEVBUF,
2893 1.7 thorpej M_WAITOK);
2894 1.7 thorpej tsm->tsm_siaconn = SIACONN_21040_EXTSIA;
2895 1.7 thorpej tsm->tsm_siatxrx = SIATXRX_21040_EXTSIA;
2896 1.7 thorpej tsm->tsm_siagen = SIAGEN_21040_EXTSIA;
2897 1.7 thorpej ADD(IFM_ETHER|IFM_MANUAL, tsm);
2898 1.7 thorpej PRINT("manual");
2899 1.7 thorpej
2900 1.7 thorpej /*
2901 1.7 thorpej * XXX Autosense not yet supported.
2902 1.7 thorpej */
2903 1.7 thorpej
2904 1.7 thorpej /* XXX This should be auto-sense. */
2905 1.7 thorpej ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_10_T);
2906 1.7 thorpej printf(", default 10baseT");
2907 1.7 thorpej
2908 1.7 thorpej printf("\n");
2909 1.7 thorpej }
2910 1.7 thorpej
2911 1.7 thorpej void
2912 1.7 thorpej tlp_21040_tp_tmsw_init(sc)
2913 1.7 thorpej struct tulip_softc *sc;
2914 1.7 thorpej {
2915 1.7 thorpej struct tulip_21040_21041_sia_media *tsm;
2916 1.7 thorpej const char *sep = "";
2917 1.7 thorpej
2918 1.7 thorpej ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
2919 1.7 thorpej tlp_mediastatus);
2920 1.7 thorpej
2921 1.7 thorpej printf("%s: ", sc->sc_dev.dv_xname);
2922 1.7 thorpej
2923 1.7 thorpej tsm = malloc(sizeof(struct tulip_21040_21041_sia_media), M_DEVBUF,
2924 1.7 thorpej M_WAITOK);
2925 1.7 thorpej tsm->tsm_siaconn = SIACONN_21040_10BASET;
2926 1.7 thorpej tsm->tsm_siatxrx = SIATXRX_21040_10BASET;
2927 1.7 thorpej tsm->tsm_siagen = SIAGEN_21040_10BASET;
2928 1.7 thorpej ADD(IFM_ETHER|IFM_10_T, tsm);
2929 1.7 thorpej PRINT("10baseT");
2930 1.7 thorpej
2931 1.7 thorpej tsm = malloc(sizeof(struct tulip_21040_21041_sia_media), M_DEVBUF,
2932 1.7 thorpej M_WAITOK);
2933 1.7 thorpej tsm->tsm_siaconn = SIACONN_21040_10BASET_FDX;
2934 1.7 thorpej tsm->tsm_siatxrx = SIATXRX_21040_10BASET_FDX;
2935 1.7 thorpej tsm->tsm_siagen = SIAGEN_21040_10BASET_FDX;
2936 1.7 thorpej ADD(IFM_ETHER|IFM_10_T|IFM_FDX, tsm);
2937 1.7 thorpej PRINT("10baseT-FDX");
2938 1.7 thorpej
2939 1.7 thorpej ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_10_T);
2940 1.7 thorpej printf(", default 10baseT");
2941 1.7 thorpej
2942 1.7 thorpej printf("\n");
2943 1.7 thorpej }
2944 1.7 thorpej
2945 1.7 thorpej void
2946 1.7 thorpej tlp_21040_auibnc_tmsw_init(sc)
2947 1.7 thorpej struct tulip_softc *sc;
2948 1.7 thorpej {
2949 1.7 thorpej struct tulip_21040_21041_sia_media *tsm;
2950 1.7 thorpej const char *sep = "";
2951 1.7 thorpej
2952 1.7 thorpej ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
2953 1.7 thorpej tlp_mediastatus);
2954 1.7 thorpej
2955 1.7 thorpej printf("%s: ", sc->sc_dev.dv_xname);
2956 1.7 thorpej
2957 1.7 thorpej tsm = malloc(sizeof(struct tulip_21040_21041_sia_media), M_DEVBUF,
2958 1.7 thorpej M_WAITOK);
2959 1.7 thorpej tsm->tsm_siaconn = SIACONN_21040_AUI;
2960 1.7 thorpej tsm->tsm_siatxrx = SIATXRX_21040_AUI;
2961 1.7 thorpej tsm->tsm_siagen = SIAGEN_21040_AUI;
2962 1.7 thorpej ADD(IFM_ETHER|IFM_10_5, tsm);
2963 1.7 thorpej PRINT("10base5");
2964 1.7 thorpej
2965 1.7 thorpej ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_10_5);
2966 1.13 thorpej
2967 1.13 thorpej printf("\n");
2968 1.13 thorpej }
2969 1.13 thorpej
2970 1.13 thorpej void
2971 1.13 thorpej tlp_21041_tmsw_init(sc)
2972 1.13 thorpej struct tulip_softc *sc;
2973 1.13 thorpej {
2974 1.13 thorpej int i, defmedia, devcnt, leaf_offset, mb_offset, m_cnt;
2975 1.13 thorpej struct tulip_21040_21041_sia_media *tsm;
2976 1.13 thorpej const char *sep = "", *defstr;
2977 1.13 thorpej u_int16_t romdef;
2978 1.13 thorpej u_int8_t mb;
2979 1.13 thorpej
2980 1.13 thorpej ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
2981 1.13 thorpej tlp_mediastatus);
2982 1.13 thorpej
2983 1.13 thorpej printf("%s: ", sc->sc_dev.dv_xname);
2984 1.13 thorpej
2985 1.13 thorpej if (tlp_isv_srom(sc->sc_srom) == 0)
2986 1.13 thorpej goto not_isv_srom;
2987 1.13 thorpej
2988 1.13 thorpej devcnt = sc->sc_srom[TULIP_ROM_CHIP_COUNT];
2989 1.13 thorpej for (i = 0; i < devcnt; i++) {
2990 1.13 thorpej if (sc->sc_srom[TULIP_ROM_CHIP_COUNT] == 1)
2991 1.13 thorpej break;
2992 1.13 thorpej if (sc->sc_srom[TULIP_ROM_CHIPn_DEVICE_NUMBER(i)] ==
2993 1.13 thorpej sc->sc_devno)
2994 1.13 thorpej break;
2995 1.13 thorpej }
2996 1.13 thorpej
2997 1.13 thorpej if (i == devcnt)
2998 1.13 thorpej goto not_isv_srom;
2999 1.13 thorpej
3000 1.17 thorpej leaf_offset = TULIP_ROM_GETW(sc->sc_srom,
3001 1.17 thorpej TULIP_ROM_CHIPn_INFO_LEAF_OFFSET(i));
3002 1.13 thorpej mb_offset = leaf_offset + TULIP_ROM_IL_MEDIAn_BLOCK_BASE;
3003 1.13 thorpej m_cnt = sc->sc_srom[leaf_offset + TULIP_ROM_IL_MEDIA_COUNT];
3004 1.13 thorpej
3005 1.13 thorpej for (; m_cnt != 0;
3006 1.13 thorpej m_cnt--, mb_offset += TULIP_ROM_MB_SIZE(mb)) {
3007 1.13 thorpej mb = sc->sc_srom[mb_offset];
3008 1.13 thorpej tsm = malloc(sizeof(struct tulip_21040_21041_sia_media),
3009 1.13 thorpej M_DEVBUF, M_WAITOK);
3010 1.13 thorpej switch (mb & TULIP_ROM_MB_MEDIA_CODE) {
3011 1.13 thorpej case TULIP_ROM_MB_MEDIA_TP:
3012 1.13 thorpej tsm->tsm_siaconn = (mb & TULIP_ROM_MB_EXT) ?
3013 1.13 thorpej TULIP_ROM_GETW(sc->sc_srom,
3014 1.13 thorpej mb_offset + TULIP_ROM_MB_CSR13) :
3015 1.13 thorpej SIACONN_21041_10BASET;
3016 1.13 thorpej tsm->tsm_siatxrx = (mb & TULIP_ROM_MB_EXT) ?
3017 1.13 thorpej TULIP_ROM_GETW(sc->sc_srom,
3018 1.13 thorpej mb_offset + TULIP_ROM_MB_CSR14) :
3019 1.13 thorpej SIATXRX_21041_10BASET;
3020 1.13 thorpej tsm->tsm_siagen = (mb & TULIP_ROM_MB_EXT) ?
3021 1.13 thorpej TULIP_ROM_GETW(sc->sc_srom,
3022 1.13 thorpej mb_offset + TULIP_ROM_MB_CSR15) :
3023 1.13 thorpej SIAGEN_21041_10BASET;
3024 1.13 thorpej ADD(IFM_ETHER|IFM_10_T, tsm);
3025 1.13 thorpej PRINT("10baseT");
3026 1.13 thorpej break;
3027 1.13 thorpej
3028 1.13 thorpej case TULIP_ROM_MB_MEDIA_BNC:
3029 1.13 thorpej tsm->tsm_siaconn = (mb & TULIP_ROM_MB_EXT) ?
3030 1.13 thorpej TULIP_ROM_GETW(sc->sc_srom,
3031 1.13 thorpej mb_offset + TULIP_ROM_MB_CSR13) :
3032 1.13 thorpej SIACONN_21041_BNC;
3033 1.13 thorpej tsm->tsm_siatxrx = (mb & TULIP_ROM_MB_EXT) ?
3034 1.13 thorpej TULIP_ROM_GETW(sc->sc_srom,
3035 1.13 thorpej mb_offset + TULIP_ROM_MB_CSR14) :
3036 1.13 thorpej SIATXRX_21041_BNC;
3037 1.13 thorpej tsm->tsm_siagen = (mb & TULIP_ROM_MB_EXT) ?
3038 1.13 thorpej TULIP_ROM_GETW(sc->sc_srom,
3039 1.13 thorpej mb_offset + TULIP_ROM_MB_CSR15) :
3040 1.13 thorpej SIAGEN_21041_BNC;
3041 1.13 thorpej ADD(IFM_ETHER|IFM_10_2, tsm);
3042 1.13 thorpej PRINT("10base2");
3043 1.13 thorpej break;
3044 1.13 thorpej
3045 1.13 thorpej case TULIP_ROM_MB_MEDIA_AUI:
3046 1.13 thorpej tsm->tsm_siaconn = (mb & TULIP_ROM_MB_EXT) ?
3047 1.13 thorpej TULIP_ROM_GETW(sc->sc_srom,
3048 1.13 thorpej mb_offset + TULIP_ROM_MB_CSR13) :
3049 1.13 thorpej SIACONN_21041_AUI;
3050 1.13 thorpej tsm->tsm_siatxrx = (mb & TULIP_ROM_MB_EXT) ?
3051 1.13 thorpej TULIP_ROM_GETW(sc->sc_srom,
3052 1.13 thorpej mb_offset + TULIP_ROM_MB_CSR14) :
3053 1.13 thorpej SIATXRX_21041_AUI;
3054 1.13 thorpej tsm->tsm_siagen = (mb & TULIP_ROM_MB_EXT) ?
3055 1.13 thorpej TULIP_ROM_GETW(sc->sc_srom,
3056 1.13 thorpej mb_offset + TULIP_ROM_MB_CSR15) :
3057 1.13 thorpej SIAGEN_21041_AUI;
3058 1.13 thorpej ADD(IFM_ETHER|IFM_10_5, tsm);
3059 1.13 thorpej PRINT("10base5");
3060 1.13 thorpej break;
3061 1.13 thorpej
3062 1.13 thorpej case TULIP_ROM_MB_MEDIA_TP_FDX:
3063 1.13 thorpej tsm->tsm_siaconn = (mb & TULIP_ROM_MB_EXT) ?
3064 1.13 thorpej TULIP_ROM_GETW(sc->sc_srom,
3065 1.13 thorpej mb_offset + TULIP_ROM_MB_CSR13) :
3066 1.13 thorpej SIACONN_21041_10BASET_FDX;
3067 1.13 thorpej tsm->tsm_siatxrx = (mb & TULIP_ROM_MB_EXT) ?
3068 1.13 thorpej TULIP_ROM_GETW(sc->sc_srom,
3069 1.13 thorpej mb_offset + TULIP_ROM_MB_CSR14) :
3070 1.13 thorpej SIATXRX_21041_10BASET_FDX;
3071 1.13 thorpej tsm->tsm_siagen = (mb & TULIP_ROM_MB_EXT) ?
3072 1.13 thorpej TULIP_ROM_GETW(sc->sc_srom,
3073 1.13 thorpej mb_offset + TULIP_ROM_MB_CSR15) :
3074 1.13 thorpej SIAGEN_21041_10BASET_FDX;
3075 1.13 thorpej ADD(IFM_ETHER|IFM_10_T|IFM_FDX, tsm);
3076 1.13 thorpej PRINT("10baseT-FDX");
3077 1.13 thorpej break;
3078 1.13 thorpej
3079 1.13 thorpej default:
3080 1.13 thorpej printf("%s<unknown 0x%02x>", sep,
3081 1.13 thorpej (mb & TULIP_ROM_MB_MEDIA_CODE));
3082 1.13 thorpej sep = ", ";
3083 1.13 thorpej free(tsm, M_DEVBUF);
3084 1.13 thorpej }
3085 1.13 thorpej }
3086 1.13 thorpej
3087 1.13 thorpej /*
3088 1.13 thorpej * XXX Autosense not yet supported.
3089 1.13 thorpej */
3090 1.13 thorpej
3091 1.13 thorpej romdef = TULIP_ROM_GETW(sc->sc_srom, leaf_offset +
3092 1.13 thorpej TULIP_ROM_IL_SELECT_CONN_TYPE);
3093 1.13 thorpej switch (romdef) {
3094 1.13 thorpej case SELECT_CONN_TYPE_TP:
3095 1.13 thorpej case SELECT_CONN_TYPE_TP_AUTONEG:
3096 1.13 thorpej case SELECT_CONN_TYPE_TP_NOLINKPASS:
3097 1.13 thorpej defmedia = IFM_ETHER|IFM_10_T;
3098 1.13 thorpej defstr = "10baseT";
3099 1.13 thorpej break;
3100 1.13 thorpej
3101 1.13 thorpej case SELECT_CONN_TYPE_TP_FDX:
3102 1.13 thorpej defmedia = IFM_ETHER|IFM_10_T|IFM_FDX;
3103 1.13 thorpej defstr = "10baseT-FDX";
3104 1.13 thorpej break;
3105 1.13 thorpej
3106 1.13 thorpej case SELECT_CONN_TYPE_BNC:
3107 1.13 thorpej defmedia = IFM_ETHER|IFM_10_2;
3108 1.13 thorpej defstr = "10base2";
3109 1.13 thorpej break;
3110 1.13 thorpej
3111 1.13 thorpej case SELECT_CONN_TYPE_AUI:
3112 1.13 thorpej defmedia = IFM_ETHER|IFM_10_5;
3113 1.13 thorpej defstr = "10base5";
3114 1.13 thorpej break;
3115 1.13 thorpej #if 0 /* XXX */
3116 1.13 thorpej case SELECT_CONN_TYPE_ASENSE:
3117 1.13 thorpej case SELECT_CONN_TYPE_ASENSE_AUTONEG:
3118 1.13 thorpej defmedia = IFM_ETHER|IFM_AUTO;
3119 1.13 thorpej defstr = "auto";
3120 1.13 thorpej break;
3121 1.13 thorpej #endif
3122 1.13 thorpej default:
3123 1.13 thorpej defmedia = 0;
3124 1.13 thorpej defstr = NULL;
3125 1.13 thorpej }
3126 1.13 thorpej
3127 1.13 thorpej if (defmedia != 0)
3128 1.13 thorpej printf(", default %s\n", defstr);
3129 1.13 thorpej else {
3130 1.13 thorpej /*
3131 1.13 thorpej * XXX We should default to auto-sense.
3132 1.13 thorpej */
3133 1.13 thorpej defmedia = IFM_ETHER|IFM_10_T;
3134 1.13 thorpej defstr = "10baseT";
3135 1.13 thorpej
3136 1.13 thorpej printf("\n%s: unknown default media in SROM (0x%04x), "
3137 1.13 thorpej "using %s\n", sc->sc_dev.dv_xname, romdef, defstr);
3138 1.13 thorpej }
3139 1.13 thorpej
3140 1.13 thorpej ifmedia_set(&sc->sc_mii.mii_media, defmedia);
3141 1.13 thorpej return;
3142 1.13 thorpej
3143 1.13 thorpej not_isv_srom:
3144 1.13 thorpej /*
3145 1.13 thorpej * If we have a board without the standard 21041 SROM format,
3146 1.13 thorpej * we just assume all media are present and try and pick a
3147 1.13 thorpej * reasonable default.
3148 1.13 thorpej */
3149 1.13 thorpej tsm = malloc(sizeof(struct tulip_21040_21041_sia_media), M_DEVBUF,
3150 1.13 thorpej M_WAITOK);
3151 1.13 thorpej tsm->tsm_siaconn = SIACONN_21041_10BASET;
3152 1.13 thorpej tsm->tsm_siatxrx = SIATXRX_21041_10BASET;
3153 1.13 thorpej tsm->tsm_siagen = SIAGEN_21041_10BASET;
3154 1.13 thorpej ADD(IFM_ETHER|IFM_10_T, tsm);
3155 1.13 thorpej PRINT("10baseT");
3156 1.13 thorpej
3157 1.13 thorpej tsm = malloc(sizeof(struct tulip_21040_21041_sia_media), M_DEVBUF,
3158 1.13 thorpej M_WAITOK);
3159 1.13 thorpej tsm->tsm_siaconn = SIACONN_21041_10BASET_FDX;
3160 1.13 thorpej tsm->tsm_siatxrx = SIATXRX_21041_10BASET_FDX;
3161 1.13 thorpej tsm->tsm_siagen = SIAGEN_21041_10BASET_FDX;
3162 1.13 thorpej ADD(IFM_ETHER|IFM_10_T|IFM_FDX, tsm);
3163 1.13 thorpej PRINT("10baseT-FDX");
3164 1.13 thorpej
3165 1.13 thorpej tsm = malloc(sizeof(struct tulip_21040_21041_sia_media), M_DEVBUF,
3166 1.13 thorpej M_WAITOK);
3167 1.13 thorpej tsm->tsm_siaconn = SIACONN_21041_BNC;
3168 1.13 thorpej tsm->tsm_siatxrx = SIATXRX_21041_BNC;
3169 1.13 thorpej tsm->tsm_siagen = SIAGEN_21041_BNC;
3170 1.13 thorpej ADD(IFM_ETHER|IFM_10_2|IFM_FDX, tsm);
3171 1.13 thorpej PRINT("10base2");
3172 1.13 thorpej
3173 1.13 thorpej tsm = malloc(sizeof(struct tulip_21040_21041_sia_media), M_DEVBUF,
3174 1.13 thorpej M_WAITOK);
3175 1.13 thorpej tsm->tsm_siaconn = SIACONN_21041_AUI;
3176 1.13 thorpej tsm->tsm_siatxrx = SIATXRX_21041_AUI;
3177 1.13 thorpej tsm->tsm_siagen = SIAGEN_21041_AUI;
3178 1.13 thorpej ADD(IFM_ETHER|IFM_10_5|IFM_FDX, tsm);
3179 1.13 thorpej PRINT("10base5");
3180 1.13 thorpej
3181 1.13 thorpej /*
3182 1.13 thorpej * XXX Autosense not yet supported.
3183 1.13 thorpej */
3184 1.13 thorpej
3185 1.13 thorpej /* XXX This should be auto-sense. */
3186 1.13 thorpej ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_10_T);
3187 1.13 thorpej printf(", default 10baseT");
3188 1.7 thorpej
3189 1.7 thorpej printf("\n");
3190 1.7 thorpej }
3191 1.7 thorpej
3192 1.7 thorpej #undef ADD
3193 1.7 thorpej #undef PRINT
3194 1.7 thorpej
3195 1.7 thorpej void
3196 1.7 thorpej tlp_21040_21041_tmsw_get(sc, ifmr)
3197 1.7 thorpej struct tulip_softc *sc;
3198 1.7 thorpej struct ifmediareq *ifmr;
3199 1.7 thorpej {
3200 1.7 thorpej struct ifmedia_entry *ife = sc->sc_mii.mii_media.ifm_cur;
3201 1.7 thorpej
3202 1.7 thorpej ifmr->ifm_status = 0;
3203 1.7 thorpej
3204 1.7 thorpej switch (IFM_SUBTYPE(ife->ifm_media)) {
3205 1.7 thorpej case IFM_AUTO:
3206 1.7 thorpej /*
3207 1.7 thorpej * XXX Implement autosensing case.
3208 1.7 thorpej */
3209 1.7 thorpej break;
3210 1.7 thorpej
3211 1.7 thorpej case IFM_10_T:
3212 1.7 thorpej /*
3213 1.7 thorpej * We're able to detect link directly on twisted pair.
3214 1.7 thorpej */
3215 1.7 thorpej ifmr->ifm_status = IFM_AVALID;
3216 1.7 thorpej if (TULIP_ISSET(sc, CSR_SIASTAT, SIASTAT_LKF) == 0)
3217 1.7 thorpej ifmr->ifm_status |= IFM_ACTIVE;
3218 1.7 thorpej /* FALLTHROUGH */
3219 1.7 thorpej default:
3220 1.7 thorpej /*
3221 1.7 thorpej * If not autosensing, active media is the currently
3222 1.7 thorpej * selected media.
3223 1.7 thorpej */
3224 1.7 thorpej ifmr->ifm_active = ife->ifm_media;
3225 1.7 thorpej }
3226 1.7 thorpej }
3227 1.7 thorpej
3228 1.7 thorpej int
3229 1.7 thorpej tlp_21040_21041_tmsw_set(sc)
3230 1.7 thorpej struct tulip_softc *sc;
3231 1.7 thorpej {
3232 1.7 thorpej struct ifmedia_entry *ife = sc->sc_mii.mii_media.ifm_cur;
3233 1.7 thorpej struct tulip_21040_21041_sia_media *tsm;
3234 1.7 thorpej
3235 1.7 thorpej if (IFM_SUBTYPE(ife->ifm_media) != IFM_AUTO) {
3236 1.7 thorpej /*
3237 1.7 thorpej * If not autosensing, just pull the SIA settings out
3238 1.7 thorpej * of the media entry.
3239 1.7 thorpej */
3240 1.7 thorpej tsm = ife->ifm_aux;
3241 1.7 thorpej TULIP_WRITE(sc, CSR_SIACONN, SIACONN_SRL);
3242 1.7 thorpej TULIP_WRITE(sc, CSR_SIATXRX, tsm->tsm_siatxrx);
3243 1.7 thorpej TULIP_WRITE(sc, CSR_SIAGEN, tsm->tsm_siagen);
3244 1.7 thorpej TULIP_WRITE(sc, CSR_SIACONN, tsm->tsm_siaconn);
3245 1.7 thorpej
3246 1.7 thorpej tlp_idle(sc, OPMODE_ST|OPMODE_SR);
3247 1.7 thorpej sc->sc_opmode &= ~OPMODE_FD;
3248 1.7 thorpej if (ife->ifm_media & IFM_FDX)
3249 1.7 thorpej sc->sc_opmode |= OPMODE_FD;
3250 1.7 thorpej TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
3251 1.7 thorpej } else {
3252 1.7 thorpej /*
3253 1.7 thorpej * XXX Implement autosensing case.
3254 1.7 thorpej */
3255 1.7 thorpej }
3256 1.7 thorpej
3257 1.7 thorpej return (0);
3258 1.17 thorpej }
3259 1.17 thorpej
3260 1.17 thorpej /*
3261 1.17 thorpej * DECchip 2114x ISV media switch.
3262 1.17 thorpej * XXX Currently only handles 21140[A] MII.
3263 1.17 thorpej */
3264 1.17 thorpej void tlp_2114x_isv_tmsw_init __P((struct tulip_softc *));
3265 1.17 thorpej void tlp_2114x_isv_tmsw_get __P((struct tulip_softc *, struct ifmediareq *));
3266 1.17 thorpej int tlp_2114x_isv_tmsw_set __P((struct tulip_softc *));
3267 1.17 thorpej
3268 1.17 thorpej const struct tulip_mediasw tlp_2114x_isv_mediasw = {
3269 1.17 thorpej tlp_2114x_isv_tmsw_init, tlp_2114x_isv_tmsw_get, tlp_2114x_isv_tmsw_set
3270 1.17 thorpej };
3271 1.17 thorpej
3272 1.17 thorpej void
3273 1.17 thorpej tlp_2114x_isv_tmsw_init(sc)
3274 1.17 thorpej struct tulip_softc *sc;
3275 1.17 thorpej {
3276 1.17 thorpej struct ifnet *ifp = &sc->sc_ethercom.ec_if;
3277 1.17 thorpej struct ifmedia_entry *ife;
3278 1.17 thorpej struct mii_softc *phy;
3279 1.17 thorpej struct tulip_2114x_media *tm;
3280 1.17 thorpej int i, devcnt, leaf_offset, m_cnt, type, length, seen, defmedia;
3281 1.17 thorpej u_int8_t *cp, *ncp;
3282 1.17 thorpej
3283 1.17 thorpej seen = defmedia = 0;
3284 1.17 thorpej
3285 1.17 thorpej sc->sc_mii.mii_ifp = ifp;
3286 1.17 thorpej sc->sc_mii.mii_readreg = tlp_sio_mii_readreg;
3287 1.17 thorpej sc->sc_mii.mii_writereg = tlp_sio_mii_writereg;
3288 1.17 thorpej sc->sc_mii.mii_statchg = sc->sc_statchg;
3289 1.17 thorpej ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
3290 1.17 thorpej tlp_mediastatus);
3291 1.17 thorpej
3292 1.17 thorpej devcnt = sc->sc_srom[TULIP_ROM_CHIP_COUNT];
3293 1.17 thorpej for (i = 0; i < devcnt; i++) {
3294 1.17 thorpej if (sc->sc_srom[TULIP_ROM_CHIP_COUNT] == 1)
3295 1.17 thorpej break;
3296 1.17 thorpej if (sc->sc_srom[TULIP_ROM_CHIPn_DEVICE_NUMBER(i)] ==
3297 1.17 thorpej sc->sc_devno)
3298 1.17 thorpej break;
3299 1.17 thorpej }
3300 1.17 thorpej
3301 1.17 thorpej if (i == devcnt) {
3302 1.17 thorpej printf("%s: unable to locate info leaf in SROM\n",
3303 1.17 thorpej sc->sc_dev.dv_xname);
3304 1.17 thorpej return;
3305 1.17 thorpej }
3306 1.17 thorpej
3307 1.17 thorpej leaf_offset = TULIP_ROM_GETW(sc->sc_srom,
3308 1.17 thorpej TULIP_ROM_CHIPn_INFO_LEAF_OFFSET(i));
3309 1.17 thorpej
3310 1.17 thorpej /* XXX SELECT CONN TYPE */
3311 1.17 thorpej
3312 1.17 thorpej cp = &sc->sc_srom[leaf_offset + TULIP_ROM_IL_MEDIA_COUNT];
3313 1.17 thorpej
3314 1.17 thorpej /*
3315 1.17 thorpej * On some chips, the first thing in the Info Leaf is the
3316 1.17 thorpej * GPIO pin direction data.
3317 1.17 thorpej */
3318 1.17 thorpej switch (sc->sc_chip) {
3319 1.17 thorpej case TULIP_CHIP_21140:
3320 1.17 thorpej case TULIP_CHIP_21140A:
3321 1.17 thorpej case TULIP_CHIP_MX98713:
3322 1.17 thorpej case TULIP_CHIP_MX98713A:
3323 1.17 thorpej case TULIP_CHIP_AX88140:
3324 1.17 thorpej case TULIP_CHIP_AX88141:
3325 1.17 thorpej sc->sc_gp_dir = *cp++;
3326 1.17 thorpej break;
3327 1.17 thorpej
3328 1.17 thorpej default:
3329 1.17 thorpej /* Nothing. */
3330 1.17 thorpej }
3331 1.17 thorpej
3332 1.17 thorpej /* Get the media count. */
3333 1.17 thorpej m_cnt = *cp++;
3334 1.17 thorpej
3335 1.17 thorpej for (; m_cnt != 0; cp = ncp, m_cnt--) {
3336 1.17 thorpej /*
3337 1.17 thorpej * Determine the type and length of this media block.
3338 1.17 thorpej */
3339 1.17 thorpej if ((*cp & 0x80) == 0) {
3340 1.17 thorpej length = 4;
3341 1.17 thorpej type = TULIP_ROM_MB_21140_GPR;
3342 1.17 thorpej } else {
3343 1.17 thorpej length = (*cp++ & 0x7f) - 1;
3344 1.17 thorpej type = *cp++ & 0x3f;
3345 1.17 thorpej }
3346 1.17 thorpej
3347 1.17 thorpej /* Compute the start of the next block. */
3348 1.17 thorpej ncp = cp + length;
3349 1.17 thorpej
3350 1.17 thorpej /* Now, parse the block. */
3351 1.17 thorpej switch (type) {
3352 1.17 thorpej case TULIP_ROM_MB_21140_GPR:
3353 1.17 thorpej printf("%s: 21140 GPR block\n", sc->sc_dev.dv_xname);
3354 1.17 thorpej break;
3355 1.17 thorpej
3356 1.17 thorpej case TULIP_ROM_MB_21140_MII:
3357 1.17 thorpej seen |= 1 << TULIP_ROM_MB_21140_MII;
3358 1.17 thorpej
3359 1.17 thorpej tm = malloc(sizeof(*tm), M_DEVBUF, M_WAITOK);
3360 1.17 thorpej memset(tm, 0, sizeof(*tm));
3361 1.17 thorpej
3362 1.17 thorpej tm->tm_type = TULIP_ROM_MB_21140_MII;
3363 1.17 thorpej tm->tm_get = tlp_mii_getmedia;
3364 1.17 thorpej tm->tm_set = tlp_mii_setmedia;
3365 1.17 thorpej
3366 1.17 thorpej sc->sc_reset = tlp_21140_reset;
3367 1.17 thorpej
3368 1.17 thorpej /* First is the PHY number. */
3369 1.17 thorpej tm->tm_phyno = *cp++;
3370 1.17 thorpej
3371 1.17 thorpej /* Next is the MII select sequence length and offset. */
3372 1.17 thorpej tm->tm_gp_length = *cp++;
3373 1.17 thorpej tm->tm_gp_offset = cp - &sc->sc_srom[0];
3374 1.17 thorpej cp += tm->tm_gp_length;
3375 1.17 thorpej
3376 1.17 thorpej /* Next is the MII reset sequence length and offset. */
3377 1.17 thorpej tm->tm_reset_length = *cp++;
3378 1.17 thorpej tm->tm_reset_offset = cp - &sc->sc_srom[0];
3379 1.17 thorpej cp += tm->tm_reset_length;
3380 1.17 thorpej
3381 1.17 thorpej /*
3382 1.17 thorpej * The following items are left in the media block
3383 1.17 thorpej * that we don't particularly care about:
3384 1.17 thorpej *
3385 1.17 thorpej * capabilities W
3386 1.17 thorpej * advertisement W
3387 1.17 thorpej * full duplex W
3388 1.17 thorpej * tx threshold W
3389 1.17 thorpej *
3390 1.17 thorpej * These appear to be bits in the PHY registers,
3391 1.17 thorpej * which our MII code handles on its own.
3392 1.17 thorpej */
3393 1.17 thorpej
3394 1.17 thorpej /*
3395 1.17 thorpej * Before we probe the MII bus, we need to reset
3396 1.17 thorpej * it and issue the selection sequence.
3397 1.17 thorpej */
3398 1.17 thorpej
3399 1.17 thorpej /* Set the direction of the pins... */
3400 1.17 thorpej TULIP_WRITE(sc, CSR_GPP, GPP_GPC|sc->sc_gp_dir);
3401 1.17 thorpej
3402 1.17 thorpej for (i = 0; i < tm->tm_reset_length; i++) {
3403 1.17 thorpej delay(10);
3404 1.17 thorpej TULIP_WRITE(sc, CSR_GPP,
3405 1.17 thorpej sc->sc_srom[tm->tm_reset_offset + i]);
3406 1.17 thorpej }
3407 1.17 thorpej
3408 1.17 thorpej for (i = 0; i < tm->tm_gp_length; i++) {
3409 1.17 thorpej delay(10);
3410 1.17 thorpej TULIP_WRITE(sc, CSR_GPP,
3411 1.17 thorpej sc->sc_srom[tm->tm_gp_offset + i]);
3412 1.17 thorpej }
3413 1.17 thorpej
3414 1.17 thorpej /* If there were no sequences, just lower the pins. */
3415 1.17 thorpej if (tm->tm_reset_length == 0 && tm->tm_gp_length == 0) {
3416 1.17 thorpej delay(10);
3417 1.17 thorpej TULIP_WRITE(sc, CSR_GPP, 0);
3418 1.17 thorpej }
3419 1.17 thorpej
3420 1.17 thorpej /*
3421 1.17 thorpej * Now, probe the MII for the PHY. Note, we know
3422 1.17 thorpej * the location of the PHY on the bus, but we don't
3423 1.17 thorpej * particularly care; the MII code just likes to
3424 1.17 thorpej * search the whole thing anyhow.
3425 1.17 thorpej */
3426 1.17 thorpej mii_phy_probe(&sc->sc_dev, &sc->sc_mii, 0xffffffff);
3427 1.17 thorpej
3428 1.17 thorpej /*
3429 1.17 thorpej * Now, search for the PHY we hopefully just
3430 1.17 thorpej * configured. If it's not configured into the
3431 1.17 thorpej * kernel, we lose. The PHY's default media always
3432 1.17 thorpej * takes priority.
3433 1.17 thorpej */
3434 1.17 thorpej for (phy = LIST_FIRST(&sc->sc_mii.mii_phys);
3435 1.17 thorpej phy != NULL;
3436 1.17 thorpej phy = LIST_NEXT(phy, mii_list))
3437 1.17 thorpej if (phy->mii_offset == tm->tm_phyno)
3438 1.17 thorpej break;
3439 1.17 thorpej if (phy == NULL) {
3440 1.17 thorpej printf("%s: unable to configure MII\n",
3441 1.17 thorpej sc->sc_dev.dv_xname);
3442 1.17 thorpej break;
3443 1.17 thorpej }
3444 1.17 thorpej
3445 1.17 thorpej sc->sc_flags |= TULIPF_HAS_MII;
3446 1.17 thorpej sc->sc_tick = tlp_mii_tick;
3447 1.17 thorpej defmedia = IFM_MAKEWORD(IFM_ETHER, IFM_AUTO, 0,
3448 1.17 thorpej phy->mii_inst);
3449 1.17 thorpej
3450 1.17 thorpej /*
3451 1.17 thorpej * Okay, now that we've found the PHY and the MII
3452 1.17 thorpej * layer has added all of the media associated
3453 1.17 thorpej * with that PHY, we need to traverse the media
3454 1.17 thorpej * list, and add our `tm' to each entry's `aux'
3455 1.17 thorpej * pointer.
3456 1.17 thorpej *
3457 1.17 thorpej * We do this by looking for media with our
3458 1.17 thorpej * PHY's `instance'.
3459 1.17 thorpej */
3460 1.17 thorpej for (ife = LIST_FIRST(&sc->sc_mii.mii_media.ifm_list);
3461 1.17 thorpej ife != NULL;
3462 1.17 thorpej ife = LIST_NEXT(ife, ifm_list)) {
3463 1.17 thorpej if (IFM_INST(ife->ifm_media) != phy->mii_inst)
3464 1.17 thorpej continue;
3465 1.17 thorpej ife->ifm_aux = tm;
3466 1.17 thorpej }
3467 1.17 thorpej break;
3468 1.17 thorpej
3469 1.17 thorpej case TULIP_ROM_MB_21142_SIA:
3470 1.17 thorpej printf("%s: 21142 SIA block\n", sc->sc_dev.dv_xname);
3471 1.17 thorpej break;
3472 1.17 thorpej
3473 1.17 thorpej case TULIP_ROM_MB_21142_MII:
3474 1.17 thorpej printf("%s: 21142 MII block\n", sc->sc_dev.dv_xname);
3475 1.17 thorpej break;
3476 1.17 thorpej
3477 1.17 thorpej case TULIP_ROM_MB_21143_SYM:
3478 1.17 thorpej printf("%s: 21143 SYM block\n", sc->sc_dev.dv_xname);
3479 1.17 thorpej break;
3480 1.17 thorpej
3481 1.17 thorpej case TULIP_ROM_MB_21143_RESET:
3482 1.17 thorpej printf("%s: 21143 reset block\n", sc->sc_dev.dv_xname);
3483 1.17 thorpej break;
3484 1.17 thorpej
3485 1.17 thorpej default:
3486 1.17 thorpej printf("%s: unknown ISV media block type 0x%02x\n",
3487 1.17 thorpej sc->sc_dev.dv_xname, type);
3488 1.17 thorpej }
3489 1.17 thorpej }
3490 1.17 thorpej
3491 1.17 thorpej /*
3492 1.17 thorpej * Deal with the case where no media is configured.
3493 1.17 thorpej */
3494 1.17 thorpej if (LIST_FIRST(&sc->sc_mii.mii_media.ifm_list) == NULL) {
3495 1.17 thorpej printf("%s: no media found!\n", sc->sc_dev.dv_xname);
3496 1.17 thorpej ifmedia_add(&sc->sc_mii.mii_media, IFM_ETHER|IFM_NONE, 0, NULL);
3497 1.17 thorpej defmedia = IFM_ETHER|IFM_NONE;
3498 1.17 thorpej goto set_default;
3499 1.17 thorpej }
3500 1.17 thorpej
3501 1.17 thorpej /*
3502 1.17 thorpej * Display any non-MII media we've located.
3503 1.17 thorpej */
3504 1.17 thorpej if (seen & (1 << TULIP_ROM_MB_21140_GPR)) {
3505 1.17 thorpej printf("%s: GPR media: ", sc->sc_dev.dv_xname);
3506 1.17 thorpej /* XXX */
3507 1.17 thorpej printf("\n");
3508 1.17 thorpej }
3509 1.17 thorpej
3510 1.17 thorpej if (seen & (1 << TULIP_ROM_MB_21142_SIA)) {
3511 1.17 thorpej printf("%s: SIA media: ", sc->sc_dev.dv_xname);
3512 1.17 thorpej /* XXX */
3513 1.17 thorpej printf("\n");
3514 1.17 thorpej }
3515 1.17 thorpej
3516 1.17 thorpej if (seen & (1 << TULIP_ROM_MB_21143_SYM)) {
3517 1.17 thorpej printf("%s: SYM media: ", sc->sc_dev.dv_xname);
3518 1.17 thorpej /* XXX */
3519 1.17 thorpej printf("\n");
3520 1.17 thorpej }
3521 1.17 thorpej
3522 1.17 thorpej /*
3523 1.17 thorpej * XXX Display default media if not MII.
3524 1.17 thorpej */
3525 1.17 thorpej
3526 1.17 thorpej set_default:
3527 1.17 thorpej /*
3528 1.17 thorpej * Set the default media.
3529 1.17 thorpej *
3530 1.17 thorpej * XXX Should make some attempt to care about the SROM default
3531 1.17 thorpej * setting, but we don't.
3532 1.17 thorpej */
3533 1.17 thorpej #ifdef DIAGNOSTIC
3534 1.17 thorpej if (defmedia == 0)
3535 1.17 thorpej panic("tlp_2114x_isv_tmsw_init: no default media");
3536 1.17 thorpej #endif
3537 1.17 thorpej ifmedia_set(&sc->sc_mii.mii_media, defmedia);
3538 1.17 thorpej }
3539 1.17 thorpej
3540 1.17 thorpej void
3541 1.17 thorpej tlp_2114x_isv_tmsw_get(sc, ifmr)
3542 1.17 thorpej struct tulip_softc *sc;
3543 1.17 thorpej struct ifmediareq *ifmr;
3544 1.17 thorpej {
3545 1.17 thorpej struct ifmedia_entry *ife = sc->sc_mii.mii_media.ifm_cur;
3546 1.17 thorpej struct tulip_2114x_media *tm = ife->ifm_aux;
3547 1.17 thorpej
3548 1.17 thorpej (*tm->tm_get)(sc, ifmr);
3549 1.17 thorpej }
3550 1.17 thorpej
3551 1.17 thorpej int
3552 1.17 thorpej tlp_2114x_isv_tmsw_set(sc)
3553 1.17 thorpej struct tulip_softc *sc;
3554 1.17 thorpej {
3555 1.17 thorpej struct ifmedia_entry *ife = sc->sc_mii.mii_media.ifm_cur;
3556 1.17 thorpej struct tulip_2114x_media *tm = ife->ifm_aux;
3557 1.17 thorpej
3558 1.17 thorpej return ((*tm->tm_set)(sc));
3559 1.7 thorpej }
3560 1.7 thorpej
3561 1.7 thorpej /*
3562 1.1 thorpej * MII-on-SIO media switch. Handles only MII attached to the SIO.
3563 1.1 thorpej */
3564 1.1 thorpej void tlp_sio_mii_tmsw_init __P((struct tulip_softc *));
3565 1.1 thorpej
3566 1.1 thorpej const struct tulip_mediasw tlp_sio_mii_mediasw = {
3567 1.1 thorpej tlp_sio_mii_tmsw_init, tlp_mii_getmedia, tlp_mii_setmedia
3568 1.1 thorpej };
3569 1.1 thorpej
3570 1.1 thorpej void
3571 1.1 thorpej tlp_sio_mii_tmsw_init(sc)
3572 1.1 thorpej struct tulip_softc *sc;
3573 1.1 thorpej {
3574 1.1 thorpej struct ifnet *ifp = &sc->sc_ethercom.ec_if;
3575 1.1 thorpej
3576 1.1 thorpej sc->sc_mii.mii_ifp = ifp;
3577 1.1 thorpej sc->sc_mii.mii_readreg = tlp_sio_mii_readreg;
3578 1.1 thorpej sc->sc_mii.mii_writereg = tlp_sio_mii_writereg;
3579 1.5 thorpej sc->sc_mii.mii_statchg = sc->sc_statchg;
3580 1.1 thorpej ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
3581 1.1 thorpej tlp_mediastatus);
3582 1.1 thorpej mii_phy_probe(&sc->sc_dev, &sc->sc_mii, 0xffffffff);
3583 1.1 thorpej if (LIST_FIRST(&sc->sc_mii.mii_phys) == NULL) {
3584 1.1 thorpej ifmedia_add(&sc->sc_mii.mii_media, IFM_ETHER|IFM_NONE, 0, NULL);
3585 1.1 thorpej ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_NONE);
3586 1.1 thorpej } else {
3587 1.1 thorpej sc->sc_flags |= TULIPF_HAS_MII;
3588 1.6 thorpej sc->sc_tick = tlp_mii_tick;
3589 1.1 thorpej ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_AUTO);
3590 1.1 thorpej }
3591 1.1 thorpej }
3592 1.1 thorpej
3593 1.1 thorpej /*
3594 1.1 thorpej * Lite-On PNIC media switch. Must handle MII or internal NWAY.
3595 1.1 thorpej */
3596 1.1 thorpej void tlp_pnic_tmsw_init __P((struct tulip_softc *));
3597 1.1 thorpej void tlp_pnic_tmsw_get __P((struct tulip_softc *, struct ifmediareq *));
3598 1.1 thorpej int tlp_pnic_tmsw_set __P((struct tulip_softc *));
3599 1.1 thorpej
3600 1.1 thorpej const struct tulip_mediasw tlp_pnic_mediasw = {
3601 1.1 thorpej tlp_pnic_tmsw_init, tlp_pnic_tmsw_get, tlp_pnic_tmsw_set
3602 1.1 thorpej };
3603 1.1 thorpej
3604 1.7 thorpej void tlp_pnic_nway_statchg __P((struct device *));
3605 1.6 thorpej void tlp_pnic_nway_tick __P((void *));
3606 1.6 thorpej int tlp_pnic_nway_service __P((struct tulip_softc *, int));
3607 1.6 thorpej void tlp_pnic_nway_reset __P((struct tulip_softc *));
3608 1.6 thorpej int tlp_pnic_nway_auto __P((struct tulip_softc *, int));
3609 1.6 thorpej void tlp_pnic_nway_auto_timeout __P((void *));
3610 1.6 thorpej void tlp_pnic_nway_status __P((struct tulip_softc *));
3611 1.6 thorpej void tlp_pnic_nway_acomp __P((struct tulip_softc *));
3612 1.6 thorpej
3613 1.1 thorpej void
3614 1.1 thorpej tlp_pnic_tmsw_init(sc)
3615 1.1 thorpej struct tulip_softc *sc;
3616 1.1 thorpej {
3617 1.1 thorpej struct ifnet *ifp = &sc->sc_ethercom.ec_if;
3618 1.6 thorpej const char *sep = "";
3619 1.6 thorpej
3620 1.6 thorpej #define ADD(m, c) ifmedia_add(&sc->sc_mii.mii_media, (m), (c), NULL)
3621 1.6 thorpej #define PRINT(s) printf("%s%s", sep, s); sep = ", "
3622 1.1 thorpej
3623 1.1 thorpej sc->sc_mii.mii_ifp = ifp;
3624 1.1 thorpej sc->sc_mii.mii_readreg = tlp_pnic_mii_readreg;
3625 1.1 thorpej sc->sc_mii.mii_writereg = tlp_pnic_mii_writereg;
3626 1.5 thorpej sc->sc_mii.mii_statchg = sc->sc_statchg;
3627 1.1 thorpej ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
3628 1.1 thorpej tlp_mediastatus);
3629 1.1 thorpej mii_phy_probe(&sc->sc_dev, &sc->sc_mii, 0xffffffff);
3630 1.1 thorpej if (LIST_FIRST(&sc->sc_mii.mii_phys) == NULL) {
3631 1.6 thorpej /* XXX What about AUI/BNC support? */
3632 1.6 thorpej printf("%s: ", sc->sc_dev.dv_xname);
3633 1.6 thorpej
3634 1.6 thorpej tlp_pnic_nway_reset(sc);
3635 1.6 thorpej
3636 1.6 thorpej ADD(IFM_MAKEWORD(IFM_ETHER, IFM_10_T, 0, 0),
3637 1.6 thorpej PNIC_NWAY_TW|PNIC_NWAY_CAP10T);
3638 1.6 thorpej PRINT("10baseT");
3639 1.6 thorpej
3640 1.6 thorpej ADD(IFM_MAKEWORD(IFM_ETHER, IFM_10_T, IFM_FDX, 0),
3641 1.6 thorpej PNIC_NWAY_TW|PNIC_NWAY_FD|PNIC_NWAY_CAP10TFDX);
3642 1.6 thorpej PRINT("10baseT-FDX");
3643 1.6 thorpej
3644 1.6 thorpej ADD(IFM_MAKEWORD(IFM_ETHER, IFM_100_TX, 0, 0),
3645 1.6 thorpej PNIC_NWAY_TW|PNIC_NWAY_100|PNIC_NWAY_CAP100TX);
3646 1.6 thorpej PRINT("100baseTX");
3647 1.6 thorpej
3648 1.6 thorpej ADD(IFM_MAKEWORD(IFM_ETHER, IFM_100_TX, IFM_FDX, 0),
3649 1.6 thorpej PNIC_NWAY_TW|PNIC_NWAY_100|PNIC_NWAY_FD|
3650 1.6 thorpej PNIC_NWAY_CAP100TXFDX);
3651 1.6 thorpej PRINT("100baseTX-FDX");
3652 1.6 thorpej
3653 1.6 thorpej ADD(IFM_MAKEWORD(IFM_ETHER, IFM_AUTO, 0, 0),
3654 1.6 thorpej PNIC_NWAY_TW|PNIC_NWAY_RN|PNIC_NWAY_NW|
3655 1.6 thorpej PNIC_NWAY_CAP10T|PNIC_NWAY_CAP10TFDX|
3656 1.6 thorpej PNIC_NWAY_CAP100TXFDX|PNIC_NWAY_CAP100TX);
3657 1.6 thorpej PRINT("auto");
3658 1.6 thorpej
3659 1.7 thorpej printf("\n");
3660 1.7 thorpej
3661 1.7 thorpej sc->sc_statchg = tlp_pnic_nway_statchg;
3662 1.6 thorpej sc->sc_tick = tlp_pnic_nway_tick;
3663 1.6 thorpej ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_AUTO);
3664 1.1 thorpej } else {
3665 1.1 thorpej sc->sc_flags |= TULIPF_HAS_MII;
3666 1.6 thorpej sc->sc_tick = tlp_mii_tick;
3667 1.1 thorpej ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_AUTO);
3668 1.1 thorpej }
3669 1.6 thorpej
3670 1.6 thorpej #undef ADD
3671 1.6 thorpej #undef PRINT
3672 1.1 thorpej }
3673 1.1 thorpej
3674 1.1 thorpej void
3675 1.1 thorpej tlp_pnic_tmsw_get(sc, ifmr)
3676 1.1 thorpej struct tulip_softc *sc;
3677 1.1 thorpej struct ifmediareq *ifmr;
3678 1.1 thorpej {
3679 1.6 thorpej struct mii_data *mii = &sc->sc_mii;
3680 1.1 thorpej
3681 1.1 thorpej if (sc->sc_flags & TULIPF_HAS_MII)
3682 1.1 thorpej tlp_mii_getmedia(sc, ifmr);
3683 1.1 thorpej else {
3684 1.6 thorpej mii->mii_media_status = 0;
3685 1.6 thorpej mii->mii_media_active = IFM_NONE;
3686 1.6 thorpej tlp_pnic_nway_service(sc, MII_POLLSTAT);
3687 1.6 thorpej ifmr->ifm_status = sc->sc_mii.mii_media_status;
3688 1.6 thorpej ifmr->ifm_active = sc->sc_mii.mii_media_active;
3689 1.1 thorpej }
3690 1.1 thorpej }
3691 1.1 thorpej
3692 1.1 thorpej int
3693 1.1 thorpej tlp_pnic_tmsw_set(sc)
3694 1.1 thorpej struct tulip_softc *sc;
3695 1.1 thorpej {
3696 1.6 thorpej struct ifnet *ifp = &sc->sc_ethercom.ec_if;
3697 1.6 thorpej struct mii_data *mii = &sc->sc_mii;
3698 1.1 thorpej
3699 1.15 thorpej if (sc->sc_flags & TULIPF_HAS_MII) {
3700 1.15 thorpej /*
3701 1.15 thorpej * Make sure the built-in Tx jabber timer is disabled.
3702 1.15 thorpej */
3703 1.15 thorpej TULIP_WRITE(sc, CSR_PNIC_ENDEC, PNIC_ENDEC_JDIS);
3704 1.15 thorpej
3705 1.1 thorpej return (tlp_mii_setmedia(sc));
3706 1.15 thorpej }
3707 1.1 thorpej
3708 1.6 thorpej if (ifp->if_flags & IFF_UP) {
3709 1.6 thorpej mii->mii_media_status = 0;
3710 1.6 thorpej mii->mii_media_active = IFM_NONE;
3711 1.6 thorpej return (tlp_pnic_nway_service(sc, MII_MEDIACHG));
3712 1.6 thorpej }
3713 1.6 thorpej
3714 1.6 thorpej return (0);
3715 1.7 thorpej }
3716 1.7 thorpej
3717 1.7 thorpej void
3718 1.7 thorpej tlp_pnic_nway_statchg(self)
3719 1.7 thorpej struct device *self;
3720 1.7 thorpej {
3721 1.7 thorpej struct tulip_softc *sc = (struct tulip_softc *)self;
3722 1.7 thorpej
3723 1.7 thorpej /* Idle the transmit and receive processes. */
3724 1.7 thorpej tlp_idle(sc, OPMODE_ST|OPMODE_SR);
3725 1.7 thorpej
3726 1.7 thorpej /*
3727 1.7 thorpej * XXX What about Heartbeat Disable? Is it magically frobbed
3728 1.7 thorpej * XXX by the PHY? I hope so...
3729 1.7 thorpej */
3730 1.7 thorpej
3731 1.7 thorpej sc->sc_opmode &= ~(OPMODE_TTM|OPMODE_FD|OPMODE_PS|OPMODE_PCS|
3732 1.7 thorpej OPMODE_SCR);
3733 1.7 thorpej
3734 1.7 thorpej if (IFM_SUBTYPE(sc->sc_mii.mii_media_active) == IFM_10_T) {
3735 1.7 thorpej sc->sc_opmode |= OPMODE_TTM;
3736 1.7 thorpej TULIP_WRITE(sc, CSR_GPP,
3737 1.7 thorpej GPP_PNIC_OUT(GPP_PNIC_PIN_SPEED_RLY, 0) |
3738 1.7 thorpej GPP_PNIC_OUT(GPP_PNIC_PIN_100M_LPKB, 1));
3739 1.7 thorpej } else {
3740 1.7 thorpej sc->sc_opmode |= OPMODE_PS|OPMODE_PCS|OPMODE_SCR;
3741 1.7 thorpej TULIP_WRITE(sc, CSR_GPP,
3742 1.7 thorpej GPP_PNIC_OUT(GPP_PNIC_PIN_SPEED_RLY, 1) |
3743 1.7 thorpej GPP_PNIC_OUT(GPP_PNIC_PIN_100M_LPKB, 1));
3744 1.7 thorpej }
3745 1.7 thorpej
3746 1.7 thorpej if (sc->sc_mii.mii_media_active & IFM_FDX)
3747 1.7 thorpej sc->sc_opmode |= OPMODE_FD;
3748 1.7 thorpej
3749 1.7 thorpej /*
3750 1.7 thorpej * Write new OPMODE bits. This also restarts the transmit
3751 1.7 thorpej * and receive processes.
3752 1.7 thorpej */
3753 1.7 thorpej TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
3754 1.7 thorpej
3755 1.7 thorpej /* XXX Update ifp->if_baudrate */
3756 1.6 thorpej }
3757 1.6 thorpej
3758 1.6 thorpej void
3759 1.6 thorpej tlp_pnic_nway_tick(arg)
3760 1.6 thorpej void *arg;
3761 1.6 thorpej {
3762 1.6 thorpej struct tulip_softc *sc = arg;
3763 1.6 thorpej int s;
3764 1.6 thorpej
3765 1.6 thorpej s = splnet();
3766 1.6 thorpej tlp_pnic_nway_service(sc, MII_TICK);
3767 1.6 thorpej splx(s);
3768 1.6 thorpej
3769 1.6 thorpej timeout(tlp_pnic_nway_tick, sc, hz);
3770 1.6 thorpej }
3771 1.6 thorpej
3772 1.6 thorpej /*
3773 1.6 thorpej * Support for the Lite-On PNIC internal NWay block. This is constructed
3774 1.6 thorpej * somewhat like a PHY driver for simplicity.
3775 1.6 thorpej */
3776 1.6 thorpej
3777 1.6 thorpej int
3778 1.6 thorpej tlp_pnic_nway_service(sc, cmd)
3779 1.6 thorpej struct tulip_softc *sc;
3780 1.6 thorpej int cmd;
3781 1.6 thorpej {
3782 1.6 thorpej struct mii_data *mii = &sc->sc_mii;
3783 1.6 thorpej struct ifmedia_entry *ife = mii->mii_media.ifm_cur;
3784 1.6 thorpej
3785 1.6 thorpej if ((mii->mii_ifp->if_flags & IFF_UP) == 0)
3786 1.6 thorpej return (0);
3787 1.6 thorpej
3788 1.6 thorpej switch (cmd) {
3789 1.6 thorpej case MII_POLLSTAT:
3790 1.6 thorpej /* Nothing special to do here. */
3791 1.6 thorpej break;
3792 1.6 thorpej
3793 1.6 thorpej case MII_MEDIACHG:
3794 1.6 thorpej switch (IFM_SUBTYPE(ife->ifm_media)) {
3795 1.6 thorpej case IFM_AUTO:
3796 1.6 thorpej (void) tlp_pnic_nway_auto(sc, 1);
3797 1.6 thorpej break;
3798 1.6 thorpej case IFM_100_T4:
3799 1.6 thorpej /*
3800 1.6 thorpej * XXX Not supported as a manual setting right now.
3801 1.6 thorpej */
3802 1.6 thorpej return (EINVAL);
3803 1.6 thorpej default:
3804 1.6 thorpej /*
3805 1.6 thorpej * NWAY register data is stored in the ifmedia entry.
3806 1.6 thorpej */
3807 1.6 thorpej TULIP_WRITE(sc, CSR_PNIC_NWAY, ife->ifm_data);
3808 1.6 thorpej }
3809 1.6 thorpej break;
3810 1.6 thorpej
3811 1.6 thorpej case MII_TICK:
3812 1.6 thorpej /*
3813 1.6 thorpej * Only used for autonegotiation.
3814 1.6 thorpej */
3815 1.6 thorpej if (IFM_SUBTYPE(ife->ifm_media) != IFM_AUTO)
3816 1.6 thorpej return (0);
3817 1.6 thorpej
3818 1.6 thorpej /*
3819 1.6 thorpej * Check to see if we have link. If we do, we don't
3820 1.6 thorpej * need to restart the autonegotiation process.
3821 1.6 thorpej */
3822 1.6 thorpej if (sc->sc_flags & TULIPF_LINK_UP)
3823 1.6 thorpej return (0);
3824 1.6 thorpej
3825 1.6 thorpej /*
3826 1.6 thorpej * Only retry autonegotiation every 5 seconds.
3827 1.6 thorpej */
3828 1.6 thorpej if (++sc->sc_nway_ticks != 5)
3829 1.6 thorpej return (0);
3830 1.6 thorpej
3831 1.6 thorpej sc->sc_nway_ticks = 0;
3832 1.6 thorpej tlp_pnic_nway_reset(sc);
3833 1.6 thorpej if (tlp_pnic_nway_auto(sc, 0) == EJUSTRETURN)
3834 1.6 thorpej return (0);
3835 1.6 thorpej break;
3836 1.6 thorpej }
3837 1.6 thorpej
3838 1.6 thorpej /* Update the media status. */
3839 1.6 thorpej tlp_pnic_nway_status(sc);
3840 1.6 thorpej
3841 1.6 thorpej /* Callback if something changed. */
3842 1.6 thorpej if (sc->sc_nway_active != mii->mii_media_active ||
3843 1.6 thorpej cmd == MII_MEDIACHG) {
3844 1.6 thorpej (*sc->sc_statchg)(&sc->sc_dev);
3845 1.6 thorpej sc->sc_nway_active = mii->mii_media_active;
3846 1.6 thorpej }
3847 1.6 thorpej return (0);
3848 1.6 thorpej }
3849 1.6 thorpej
3850 1.6 thorpej void
3851 1.6 thorpej tlp_pnic_nway_reset(sc)
3852 1.6 thorpej struct tulip_softc *sc;
3853 1.6 thorpej {
3854 1.6 thorpej
3855 1.6 thorpej TULIP_WRITE(sc, CSR_PNIC_NWAY, PNIC_NWAY_RS);
3856 1.6 thorpej delay(100);
3857 1.6 thorpej TULIP_WRITE(sc, CSR_PNIC_NWAY, 0);
3858 1.6 thorpej }
3859 1.6 thorpej
3860 1.6 thorpej int
3861 1.6 thorpej tlp_pnic_nway_auto(sc, waitfor)
3862 1.6 thorpej struct tulip_softc *sc;
3863 1.6 thorpej int waitfor;
3864 1.6 thorpej {
3865 1.6 thorpej struct mii_data *mii = &sc->sc_mii;
3866 1.6 thorpej struct ifmedia_entry *ife = mii->mii_media.ifm_cur;
3867 1.6 thorpej u_int32_t reg;
3868 1.6 thorpej int i;
3869 1.6 thorpej
3870 1.6 thorpej if ((sc->sc_flags & TULIPF_DOINGAUTO) == 0)
3871 1.6 thorpej TULIP_WRITE(sc, CSR_PNIC_NWAY, ife->ifm_data);
3872 1.6 thorpej
3873 1.6 thorpej if (waitfor) {
3874 1.6 thorpej /* Wait 500ms for it to complete. */
3875 1.6 thorpej for (i = 0; i < 500; i++) {
3876 1.6 thorpej reg = TULIP_READ(sc, CSR_PNIC_NWAY);
3877 1.6 thorpej if (reg & PNIC_NWAY_LPAR_MASK) {
3878 1.6 thorpej tlp_pnic_nway_acomp(sc);
3879 1.6 thorpej return (0);
3880 1.6 thorpej }
3881 1.6 thorpej delay(1000);
3882 1.6 thorpej }
3883 1.6 thorpej #if 0
3884 1.6 thorpej if ((reg & PNIC_NWAY_LPAR_MASK) == 0)
3885 1.6 thorpej printf("%s: autonegotiation failed to complete\n",
3886 1.6 thorpej sc->sc_dev.dv_xname);
3887 1.6 thorpej #endif
3888 1.6 thorpej
3889 1.6 thorpej /*
3890 1.6 thorpej * Don't need to worry about clearing DOINGAUTO.
3891 1.6 thorpej * If that's set, a timeout is pending, and it will
3892 1.6 thorpej * clear the flag.
3893 1.6 thorpej */
3894 1.6 thorpej return (EIO);
3895 1.6 thorpej }
3896 1.6 thorpej
3897 1.6 thorpej /*
3898 1.6 thorpej * Just let it finish asynchronously. This is for the benefit of
3899 1.6 thorpej * the tick handler driving autonegotiation. Don't want 500ms
3900 1.6 thorpej * delays all the time while the system is running!
3901 1.6 thorpej */
3902 1.6 thorpej if ((sc->sc_flags & TULIPF_DOINGAUTO) == 0) {
3903 1.6 thorpej sc->sc_flags |= TULIPF_DOINGAUTO;
3904 1.6 thorpej timeout(tlp_pnic_nway_auto_timeout, sc, hz >> 1);
3905 1.6 thorpej }
3906 1.6 thorpej return (EJUSTRETURN);
3907 1.6 thorpej }
3908 1.6 thorpej
3909 1.6 thorpej void
3910 1.6 thorpej tlp_pnic_nway_auto_timeout(arg)
3911 1.6 thorpej void *arg;
3912 1.6 thorpej {
3913 1.6 thorpej struct tulip_softc *sc = arg;
3914 1.6 thorpej u_int32_t reg;
3915 1.6 thorpej int s;
3916 1.6 thorpej
3917 1.6 thorpej s = splnet();
3918 1.6 thorpej sc->sc_flags &= ~TULIPF_DOINGAUTO;
3919 1.6 thorpej reg = TULIP_READ(sc, CSR_PNIC_NWAY);
3920 1.6 thorpej #if 0
3921 1.6 thorpej if ((reg & PNIC_NWAY_LPAR_MASK) == 0)
3922 1.6 thorpej printf("%s: autonegotiation failed to complete\n",
3923 1.6 thorpej sc->sc_dev.dv_xname);
3924 1.6 thorpej #endif
3925 1.6 thorpej
3926 1.6 thorpej tlp_pnic_nway_acomp(sc);
3927 1.6 thorpej
3928 1.6 thorpej /* Update the media status. */
3929 1.6 thorpej (void) tlp_pnic_nway_service(sc, MII_POLLSTAT);
3930 1.6 thorpej splx(s);
3931 1.6 thorpej }
3932 1.6 thorpej
3933 1.6 thorpej void
3934 1.6 thorpej tlp_pnic_nway_status(sc)
3935 1.6 thorpej struct tulip_softc *sc;
3936 1.6 thorpej {
3937 1.6 thorpej struct mii_data *mii = &sc->sc_mii;
3938 1.6 thorpej u_int32_t reg;
3939 1.6 thorpej
3940 1.6 thorpej mii->mii_media_status = IFM_AVALID;
3941 1.6 thorpej mii->mii_media_active = IFM_ETHER;
3942 1.6 thorpej
3943 1.6 thorpej reg = TULIP_READ(sc, CSR_PNIC_NWAY);
3944 1.6 thorpej
3945 1.6 thorpej if (sc->sc_flags & TULIPF_LINK_UP)
3946 1.6 thorpej mii->mii_media_status |= IFM_ACTIVE;
3947 1.6 thorpej
3948 1.6 thorpej if (reg & PNIC_NWAY_NW) {
3949 1.6 thorpej if ((reg & PNIC_NWAY_LPAR_MASK) == 0) {
3950 1.6 thorpej /* Erg, still trying, I guess... */
3951 1.6 thorpej mii->mii_media_active |= IFM_NONE;
3952 1.6 thorpej return;
3953 1.6 thorpej }
3954 1.6 thorpej
3955 1.6 thorpej #if 0
3956 1.6 thorpej if (reg & PNIC_NWAY_LPAR100T4)
3957 1.6 thorpej mii->mii_media_active |= IFM_100_T4;
3958 1.6 thorpej else
3959 1.6 thorpej #endif
3960 1.6 thorpej if (reg & PNIC_NWAY_LPAR100TXFDX)
3961 1.6 thorpej mii->mii_media_active |= IFM_100_TX|IFM_FDX;
3962 1.6 thorpej else if (reg & PNIC_NWAY_LPAR100TX)
3963 1.6 thorpej mii->mii_media_active |= IFM_100_TX;
3964 1.6 thorpej else if (reg & PNIC_NWAY_LPAR10TFDX)
3965 1.6 thorpej mii->mii_media_active |= IFM_10_T|IFM_FDX;
3966 1.6 thorpej else if (reg & PNIC_NWAY_LPAR10T)
3967 1.6 thorpej mii->mii_media_active |= IFM_10_T;
3968 1.6 thorpej else
3969 1.6 thorpej mii->mii_media_active |= IFM_NONE;
3970 1.6 thorpej } else {
3971 1.6 thorpej if (reg & PNIC_NWAY_100)
3972 1.6 thorpej mii->mii_media_active |= IFM_100_TX;
3973 1.6 thorpej else
3974 1.6 thorpej mii->mii_media_active |= IFM_10_T;
3975 1.6 thorpej if (reg & PNIC_NWAY_FD)
3976 1.6 thorpej mii->mii_media_active |= IFM_FDX;
3977 1.6 thorpej }
3978 1.6 thorpej }
3979 1.6 thorpej
3980 1.6 thorpej void
3981 1.6 thorpej tlp_pnic_nway_acomp(sc)
3982 1.6 thorpej struct tulip_softc *sc;
3983 1.6 thorpej {
3984 1.6 thorpej u_int32_t reg;
3985 1.6 thorpej
3986 1.6 thorpej reg = TULIP_READ(sc, CSR_PNIC_NWAY);
3987 1.6 thorpej reg &= ~(PNIC_NWAY_FD|PNIC_NWAY_100|PNIC_NWAY_RN);
3988 1.6 thorpej
3989 1.6 thorpej if (reg & (PNIC_NWAY_LPAR100TXFDX|PNIC_NWAY_LPAR100TX))
3990 1.6 thorpej reg |= PNIC_NWAY_100;
3991 1.6 thorpej if (reg & (PNIC_NWAY_LPAR10TFDX|PNIC_NWAY_LPAR100TXFDX))
3992 1.6 thorpej reg |= PNIC_NWAY_FD;
3993 1.6 thorpej
3994 1.6 thorpej TULIP_WRITE(sc, CSR_PNIC_NWAY, reg);
3995 1.1 thorpej }
3996