xref: /netbsd/sys/arch/mips/alchemy/dev/if_aumac.c (revision 57f8e18f)
1 /* $NetBSD: if_aumac.c,v 1.52 2022/09/29 07:00:46 skrll Exp $ */
2 
3 /*
4  * Copyright (c) 2001 Wasabi Systems, Inc.
5  * All rights reserved.
6  *
7  * Written by Jason R. Thorpe for Wasabi Systems, Inc.
8  *
9  * Redistribution and use in source and binary forms, with or without
10  * modification, are permitted provided that the following conditions
11  * are met:
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  * 2. Redistributions in binary form must reproduce the above copyright
15  *    notice, this list of conditions and the following disclaimer in the
16  *    documentation and/or other materials provided with the distribution.
17  * 3. All advertising materials mentioning features or use of this software
18  *    must display the following acknowledgement:
19  *	This product includes software developed for the NetBSD Project by
20  *	Wasabi Systems, Inc.
21  * 4. The name of Wasabi Systems, Inc. may not be used to endorse
22  *    or promote products derived from this software without specific prior
23  *    written permission.
24  *
25  * THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``AS IS'' AND
26  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
27  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
28  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL WASABI SYSTEMS, INC
29  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
30  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
31  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
32  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
33  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
34  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
35  * POSSIBILITY OF SUCH DAMAGE.
36  */
37 
38 /*
39  * Device driver for Alchemy Semiconductor Au1x00 Ethernet Media
40  * Access Controller.
41  *
42  * TODO:
43  *
44  *	Better Rx buffer management; we want to get new Rx buffers
45  *	to the chip more quickly than we currently do.
46  */
47 
48 #include <sys/cdefs.h>
49 __KERNEL_RCSID(0, "$NetBSD: if_aumac.c,v 1.52 2022/09/29 07:00:46 skrll Exp $");
50 
51 
52 
53 #include <sys/param.h>
54 #include <sys/bus.h>
55 #include <sys/callout.h>
56 #include <sys/device.h>
57 #include <sys/endian.h>
58 #include <sys/errno.h>
59 #include <sys/intr.h>
60 #include <sys/ioctl.h>
61 #include <sys/kernel.h>
62 #include <sys/mbuf.h>
63 #include <sys/socket.h>
64 
65 #include <uvm/uvm.h>		/* for PAGE_SIZE */
66 
67 #include <net/if.h>
68 #include <net/if_dl.h>
69 #include <net/if_media.h>
70 #include <net/if_ether.h>
71 
72 #include <net/bpf.h>
73 #include <sys/rndsource.h>
74 
75 #include <dev/mii/mii.h>
76 #include <dev/mii/miivar.h>
77 
78 #include <mips/alchemy/include/aureg.h>
79 #include <mips/alchemy/include/auvar.h>
80 #include <mips/alchemy/include/aubusvar.h>
81 #include <mips/alchemy/dev/if_aumacreg.h>
82 
83 /*
84  * The Au1X00 MAC has 4 transmit and receive descriptors.  Each buffer
85  * must consist of a single DMA segment, and must be aligned to a 2K
86  * boundary.  Therefore, this driver does not perform DMA directly
87  * to/from mbufs.  Instead, we copy the data to/from buffers allocated
88  * at device attach time.
89  *
90  * We also skip the bus_dma dance.  The MAC is built in to the CPU, so
91  * there's little point in not making assumptions based on the CPU type.
92  * We also program the Au1X00 cache to be DMA coherent, so the buffers
93  * are accessed via KSEG0 addresses.
94  */
95 #define	AUMAC_NTXDESC		4
96 #define	AUMAC_NTXDESC_MASK	(AUMAC_NTXDESC - 1)
97 
98 #define	AUMAC_NRXDESC		4
99 #define	AUMAC_NRXDESC_MASK	(AUMAC_NRXDESC - 1)
100 
101 #define	AUMAC_NEXTTX(x)		(((x) + 1) & AUMAC_NTXDESC_MASK)
102 #define	AUMAC_NEXTRX(x)		(((x) + 1) & AUMAC_NRXDESC_MASK)
103 
104 #define	AUMAC_TXBUF_OFFSET	0
105 #define	AUMAC_RXBUF_OFFSET	(MAC_BUFLEN * AUMAC_NTXDESC)
106 #define	AUMAC_BUFSIZE		(MAC_BUFLEN * (AUMAC_NTXDESC + AUMAC_NRXDESC))
107 
108 struct aumac_buf {
109 	vaddr_t buf_vaddr;		/* virtual address of buffer */
110 	bus_addr_t buf_paddr;		/* DMA address of buffer */
111 };
112 
113 /*
114  * Software state per device.
115  */
116 struct aumac_softc {
117 	device_t sc_dev;		/* generic device information */
118 	bus_space_tag_t sc_st;		/* bus space tag */
119 	bus_space_handle_t sc_mac_sh;	/* MAC space handle */
120 	bus_space_handle_t sc_macen_sh;	/* MAC enable space handle */
121 	bus_space_handle_t sc_dma_sh;	/* DMA space handle */
122 	struct ethercom sc_ethercom;	/* Ethernet common data */
123 	void *sc_sdhook;		/* shutdown hook */
124 
125 	int sc_irq;
126 	void *sc_ih;			/* interrupt cookie */
127 
128 	struct mii_data sc_mii;		/* MII/media information */
129 
130 	struct callout sc_tick_ch;	/* tick callout */
131 
132 	/* Transmit and receive buffers */
133 	struct aumac_buf sc_txbufs[AUMAC_NTXDESC];
134 	struct aumac_buf sc_rxbufs[AUMAC_NRXDESC];
135 	void *sc_bufaddr;
136 
137 	int sc_txfree;			/* number of free Tx descriptors */
138 	int sc_txnext;			/* next Tx descriptor to use */
139 	int sc_txdirty;			/* first dirty Tx descriptor */
140 
141 	int sc_rxptr;			/* next ready Rx descriptor */
142 
143 	krndsource_t rnd_source;
144 
145 #ifdef AUMAC_EVENT_COUNTERS
146 	struct evcnt sc_ev_txstall;	/* Tx stalled */
147 	struct evcnt sc_ev_rxstall;	/* Rx stalled */
148 	struct evcnt sc_ev_txintr;	/* Tx interrupts */
149 	struct evcnt sc_ev_rxintr;	/* Rx interrupts */
150 #endif
151 
152 	uint32_t sc_control;		/* MAC_CONTROL contents */
153 	uint32_t sc_flowctrl;		/* MAC_FLOWCTRL contents */
154 };
155 
156 #ifdef AUMAC_EVENT_COUNTERS
157 #define	AUMAC_EVCNT_INCR(ev)	(ev)->ev_count++
158 #else
159 #define	AUMAC_EVCNT_INCR(ev)	/* nothing */
160 #endif
161 
162 #define	AUMAC_INIT_RXDESC(sc, x)					\
163 do {									\
164 	bus_space_write_4((sc)->sc_st, (sc)->sc_dma_sh,			\
165 	    MACDMA_RX_STAT((x)), 0);					\
166 	bus_space_write_4((sc)->sc_st, (sc)->sc_dma_sh,			\
167 	    MACDMA_RX_ADDR((x)),					\
168 	    (sc)->sc_rxbufs[(x)].buf_paddr | RX_ADDR_EN);		\
169 } while (/*CONSTCOND*/0)
170 
171 static void	aumac_start(struct ifnet *);
172 static void	aumac_watchdog(struct ifnet *);
173 static int	aumac_ioctl(struct ifnet *, u_long, void *);
174 static int	aumac_init(struct ifnet *);
175 static void	aumac_stop(struct ifnet *, int);
176 
177 static void	aumac_shutdown(void *);
178 
179 static void	aumac_tick(void *);
180 
181 static void	aumac_set_filter(struct aumac_softc *);
182 
183 static void	aumac_powerup(struct aumac_softc *);
184 static void	aumac_powerdown(struct aumac_softc *);
185 
186 static int	aumac_intr(void *);
187 static int	aumac_txintr(struct aumac_softc *);
188 static int	aumac_rxintr(struct aumac_softc *);
189 
190 static int	aumac_mii_readreg(device_t, int, int, uint16_t *);
191 static int	aumac_mii_writereg(device_t, int, int, uint16_t);
192 static void	aumac_mii_statchg(struct ifnet *);
193 static int	aumac_mii_wait(struct aumac_softc *, const char *);
194 
195 static int	aumac_match(device_t, struct cfdata *, void *);
196 static void	aumac_attach(device_t, device_t, void *);
197 
198 int	aumac_copy_small = 0;
199 
200 CFATTACH_DECL_NEW(aumac, sizeof(struct aumac_softc),
201     aumac_match, aumac_attach, NULL, NULL);
202 
203 static int
aumac_match(device_t parent,struct cfdata * cf,void * aux)204 aumac_match(device_t parent, struct cfdata *cf, void *aux)
205 {
206 	struct aubus_attach_args *aa = aux;
207 
208 	if (strcmp(aa->aa_name, cf->cf_name) == 0)
209 		return 1;
210 
211 	return 0;
212 }
213 
214 static void
aumac_attach(device_t parent,device_t self,void * aux)215 aumac_attach(device_t parent, device_t self, void *aux)
216 {
217 	const uint8_t *enaddr;
218 	prop_data_t ea;
219 	struct aumac_softc *sc = device_private(self);
220 	struct aubus_attach_args *aa = aux;
221 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
222 	struct mii_data * const mii = &sc->sc_mii;
223 	struct pglist pglist;
224 	paddr_t bufaddr;
225 	vaddr_t vbufaddr;
226 	int i;
227 
228 	callout_init(&sc->sc_tick_ch, 0);
229 
230 	aprint_normal(": Au1X00 10/100 Ethernet\n");
231 	aprint_naive("\n");
232 
233 	sc->sc_dev = self;
234 	sc->sc_st = aa->aa_st;
235 
236 	/* Get the MAC address. */
237 	ea = prop_dictionary_get(device_properties(self), "mac-address");
238 	if (ea == NULL) {
239 		aprint_error_dev(self, "unable to get mac-addr property\n");
240 		return;
241 	}
242 	KASSERT(prop_object_type(ea) == PROP_TYPE_DATA);
243 	KASSERT(prop_data_size(ea) == ETHER_ADDR_LEN);
244 	enaddr = prop_data_data_nocopy(ea);
245 
246 	aprint_normal_dev(self, "Ethernet address %s\n", ether_sprintf(enaddr));
247 
248 	/* Map the device. */
249 	if (bus_space_map(sc->sc_st, aa->aa_addrs[AA_MAC_BASE],
250 	    MACx_SIZE, 0, &sc->sc_mac_sh) != 0) {
251 		aprint_error_dev(self, "unable to map MAC registers\n");
252 		return;
253 	}
254 	if (bus_space_map(sc->sc_st, aa->aa_addrs[AA_MAC_ENABLE],
255 	    MACENx_SIZE, 0, &sc->sc_macen_sh) != 0) {
256 		aprint_error_dev(self, "unable to map MACEN registers\n");
257 		return;
258 	}
259 	if (bus_space_map(sc->sc_st, aa->aa_addrs[AA_MAC_DMA_BASE],
260 	    MACx_DMA_SIZE, 0, &sc->sc_dma_sh) != 0) {
261 		aprint_error_dev(self, "unable to map MACDMA registers\n");
262 		return;
263 	}
264 
265 	/* Make sure the MAC is powered off. */
266 	aumac_powerdown(sc);
267 
268 	/* Hook up the interrupt handler. */
269 	sc->sc_ih = au_intr_establish(aa->aa_irq[0], 1, IPL_NET, IST_LEVEL,
270 	    aumac_intr, sc);
271 	if (sc->sc_ih == NULL) {
272 		aprint_error_dev(self,
273 		    "unable to register interrupt handler\n");
274 		return;
275 	}
276 	sc->sc_irq = aa->aa_irq[0];
277 	au_intr_disable(sc->sc_irq);
278 
279 	/*
280 	 * Allocate space for the transmit and receive buffers.
281 	 */
282 	if (uvm_pglistalloc(AUMAC_BUFSIZE, 0, ctob(physmem), PAGE_SIZE, 0,
283 	    &pglist, 1, 0))
284 		return;
285 
286 	bufaddr = VM_PAGE_TO_PHYS(TAILQ_FIRST(&pglist));
287 	vbufaddr = MIPS_PHYS_TO_KSEG0(bufaddr);
288 
289 	for (i = 0; i < AUMAC_NTXDESC; i++) {
290 		int offset = AUMAC_TXBUF_OFFSET + (i * MAC_BUFLEN);
291 
292 		sc->sc_txbufs[i].buf_vaddr = vbufaddr + offset;
293 		sc->sc_txbufs[i].buf_paddr = bufaddr + offset;
294 	}
295 
296 	for (i = 0; i < AUMAC_NRXDESC; i++) {
297 		int offset = AUMAC_RXBUF_OFFSET + (i * MAC_BUFLEN);
298 
299 		sc->sc_rxbufs[i].buf_vaddr = vbufaddr + offset;
300 		sc->sc_rxbufs[i].buf_paddr = bufaddr + offset;
301 	}
302 
303 	/*
304 	 * Power up the MAC before accessing any MAC registers (including
305 	 * MII configuration.
306 	 */
307 	aumac_powerup(sc);
308 
309 	/*
310 	 * Initialize the media structures and probe the MII.
311 	 */
312 	mii->mii_ifp = ifp;
313 	mii->mii_readreg = aumac_mii_readreg;
314 	mii->mii_writereg = aumac_mii_writereg;
315 	mii->mii_statchg = aumac_mii_statchg;
316 	sc->sc_ethercom.ec_mii = mii;
317 	ifmedia_init(&mii->mii_media, 0, ether_mediachange, ether_mediastatus);
318 
319 	mii_attach(self, mii, 0xffffffff, MII_PHY_ANY,
320 	    MII_OFFSET_ANY, 0);
321 
322 	if (LIST_FIRST(&mii->mii_phys) == NULL) {
323 		ifmedia_add(&mii->mii_media, IFM_ETHER | IFM_NONE,
324 		    0, NULL);
325 		ifmedia_set(&mii->mii_media, IFM_ETHER | IFM_NONE);
326 	} else
327 		ifmedia_set(&mii->mii_media, IFM_ETHER | IFM_AUTO);
328 
329 	strcpy(ifp->if_xname, device_xname(self));
330 	ifp->if_softc = sc;
331 	ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST;
332 	ifp->if_ioctl = aumac_ioctl;
333 	ifp->if_start = aumac_start;
334 	ifp->if_watchdog = aumac_watchdog;
335 	ifp->if_init = aumac_init;
336 	ifp->if_stop = aumac_stop;
337 	IFQ_SET_READY(&ifp->if_snd);
338 
339 	/* Attach the interface. */
340 	if_attach(ifp);
341 	if_deferred_start_init(ifp, NULL);
342 	ether_ifattach(ifp, enaddr);
343 
344 	rnd_attach_source(&sc->rnd_source, device_xname(self),
345 	    RND_TYPE_NET, RND_FLAG_DEFAULT);
346 
347 #ifdef AUMAC_EVENT_COUNTERS
348 	evcnt_attach_dynamic(&sc->sc_ev_txstall, EVCNT_TYPE_MISC,
349 	    NULL, device_xname(self), "txstall");
350 	evcnt_attach_dynamic(&sc->sc_ev_rxstall, EVCNT_TYPE_MISC,
351 	    NULL, device_xname(self), "rxstall");
352 	evcnt_attach_dynamic(&sc->sc_ev_txintr, EVCNT_TYPE_MISC,
353 	    NULL, device_xname(self), "txintr");
354 	evcnt_attach_dynamic(&sc->sc_ev_rxintr, EVCNT_TYPE_MISC,
355 	    NULL, device_xname(self), "rxintr");
356 #endif
357 
358 	/* Make sure the interface is shutdown during reboot. */
359 	sc->sc_sdhook = shutdownhook_establish(aumac_shutdown, sc);
360 	if (sc->sc_sdhook == NULL)
361 		aprint_error_dev(self,
362 		    "WARNING: unable to establish shutdown hook\n");
363 	return;
364 }
365 
366 /*
367  * aumac_shutdown:
368  *
369  *	Make sure the interface is stopped at reboot time.
370  */
371 static void
aumac_shutdown(void * arg)372 aumac_shutdown(void *arg)
373 {
374 	struct aumac_softc *sc = arg;
375 
376 	aumac_stop(&sc->sc_ethercom.ec_if, 1);
377 
378 	/*
379 	 * XXX aumac_stop leaves device powered up at the moment
380 	 * XXX but this still isn't enough to keep yamon happy... :-(
381 	 */
382 	bus_space_write_4(sc->sc_st, sc->sc_macen_sh, 0, 0);
383 }
384 
385 /*
386  * aumac_start:		[ifnet interface function]
387  *
388  *	Start packet transmission on the interface.
389  */
390 static void
aumac_start(struct ifnet * ifp)391 aumac_start(struct ifnet *ifp)
392 {
393 	struct aumac_softc *sc = ifp->if_softc;
394 	struct mbuf *m;
395 	int nexttx;
396 
397 	if ((ifp->if_flags & IFF_RUNNING) == 0)
398 		return;
399 
400 	/*
401 	 * Loop through the send queue, setting up transmit descriptors
402 	 * unitl we drain the queue, or use up all available transmit
403 	 * descriptors.
404 	 */
405 	for (;;) {
406 		/* Grab a packet off the queue. */
407 		IFQ_POLL(&ifp->if_snd, m);
408 		if (m == NULL)
409 			return;
410 
411 		/* Get a spare descriptor. */
412 		if (sc->sc_txfree == 0) {
413 			/* No more slots left. */
414 			AUMAC_EVCNT_INCR(&sc->sc_ev_txstall);
415 			return;
416 		}
417 		nexttx = sc->sc_txnext;
418 
419 		IFQ_DEQUEUE(&ifp->if_snd, m);
420 
421 		/*
422 		 * WE ARE NOW COMMITTED TO TRANSMITTING THE PACKET.
423 		 */
424 
425 		m_copydata(m, 0, m->m_pkthdr.len,
426 		    (void *)sc->sc_txbufs[nexttx].buf_vaddr);
427 
428 		/* Zero out the remainder of any short packets. */
429 		if (m->m_pkthdr.len < (ETHER_MIN_LEN - ETHER_CRC_LEN))
430 			memset((char *)sc->sc_txbufs[nexttx].buf_vaddr +
431 			    m->m_pkthdr.len, 0,
432 			    ETHER_MIN_LEN - ETHER_CRC_LEN - m->m_pkthdr.len);
433 
434 		bus_space_write_4(sc->sc_st, sc->sc_dma_sh,
435 		    MACDMA_TX_STAT(nexttx), 0);
436 		bus_space_write_4(sc->sc_st, sc->sc_dma_sh,
437 		    MACDMA_TX_LEN(nexttx),
438 		    m->m_pkthdr.len < (ETHER_MIN_LEN - ETHER_CRC_LEN) ?
439 		    ETHER_MIN_LEN - ETHER_CRC_LEN : m->m_pkthdr.len);
440 		bus_space_write_4(sc->sc_st, sc->sc_dma_sh,
441 		    MACDMA_TX_ADDR(nexttx),
442 		    sc->sc_txbufs[nexttx].buf_paddr | TX_ADDR_EN);
443 		/* XXX - needed??  we should be coherent */
444 		bus_space_barrier(sc->sc_st, sc->sc_dma_sh, 0 /* XXX */,
445 		    0 /* XXX */, BUS_SPACE_BARRIER_WRITE);
446 
447 		/* Advance the Tx pointer. */
448 		sc->sc_txfree--;
449 		sc->sc_txnext = AUMAC_NEXTTX(nexttx);
450 
451 		/* Pass the packet to any BPF listeners. */
452 		bpf_mtap(ifp, m, BPF_D_OUT);
453 
454 		m_freem(m);
455 
456 		/* Set a watchdog timer in case the chip flakes out. */
457 		ifp->if_timer = 5;
458 	}
459 	/* NOTREACHED */
460 }
461 
462 /*
463  * aumac_watchdog:	[ifnet interface function]
464  *
465  *	Watchdog timer handler.
466  */
467 static void
aumac_watchdog(struct ifnet * ifp)468 aumac_watchdog(struct ifnet *ifp)
469 {
470 	struct aumac_softc *sc = ifp->if_softc;
471 
472 	printf("%s: device timeout\n", device_xname(sc->sc_dev));
473 	(void) aumac_init(ifp);
474 
475 	/* Try to get more packets going. */
476 	aumac_start(ifp);
477 }
478 
479 /*
480  * aumac_ioctl:		[ifnet interface function]
481  *
482  *	Handle control requests from the operator.
483  */
484 static int
aumac_ioctl(struct ifnet * ifp,u_long cmd,void * data)485 aumac_ioctl(struct ifnet *ifp, u_long cmd, void *data)
486 {
487 	struct aumac_softc *sc = ifp->if_softc;
488 	int s, error;
489 
490 	s = splnet();
491 
492 	error = ether_ioctl(ifp, cmd, data);
493 	if (error == ENETRESET) {
494 		/*
495 		 * Multicast list has changed; set the hardware filter
496 		 * accordingly.
497 		 */
498 		if (ifp->if_flags & IFF_RUNNING)
499 			aumac_set_filter(sc);
500 		error = 0;
501 	}
502 
503 	/* Try to get more packets going. */
504 	aumac_start(ifp);
505 
506 	splx(s);
507 	return error;
508 }
509 
510 /*
511  * aumac_intr:
512  *
513  *	Interrupt service routine.
514  */
515 static int
aumac_intr(void * arg)516 aumac_intr(void *arg)
517 {
518 	struct aumac_softc *sc = arg;
519 	int status;
520 
521 	/*
522 	 * There aren't really any interrupt status bits on the
523 	 * Au1X00 MAC, and each MAC has a dedicated interrupt
524 	 * in the CPU's built-in interrupt controller.  Just
525 	 * check for new incoming packets, and then Tx completions
526 	 * (for status updating).
527 	 */
528 	if ((sc->sc_ethercom.ec_if.if_flags & IFF_RUNNING) == 0)
529 		return 0;
530 
531 	status = aumac_rxintr(sc);
532 	status += aumac_txintr(sc);
533 
534 	rnd_add_uint32(&sc->rnd_source, status);
535 
536 	return status;
537 }
538 
539 /*
540  * aumac_txintr:
541  *
542  *	Helper; handle transmit interrupts.
543  */
544 static int
aumac_txintr(struct aumac_softc * sc)545 aumac_txintr(struct aumac_softc *sc)
546 {
547 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
548 	uint32_t stat;
549 	int i;
550 	int pkts = 0;
551 
552 	for (i = sc->sc_txdirty; sc->sc_txfree != AUMAC_NTXDESC;
553 	     i = AUMAC_NEXTTX(i)) {
554 		if ((bus_space_read_4(sc->sc_st, sc->sc_dma_sh,
555 		     MACDMA_TX_ADDR(i)) & TX_ADDR_DN) == 0)
556 			break;
557 		pkts++;
558 
559 		/* ACK interrupt. */
560 		bus_space_write_4(sc->sc_st, sc->sc_dma_sh,
561 		    MACDMA_TX_ADDR(i), 0);
562 
563 		stat = bus_space_read_4(sc->sc_st, sc->sc_dma_sh,
564 		    MACDMA_TX_STAT(i));
565 
566 		net_stat_ref_t nsr = IF_STAT_GETREF(ifp);
567 		if (stat & TX_STAT_FA) {
568 			/* XXX STATS */
569 			if_statinc_ref(nsr, if_oerrors);
570 		} else
571 			if_statinc_ref(nsr, if_opackets);
572 
573 		if (stat & TX_STAT_EC)
574 			if_statadd_ref(nsr, if_collisions, 16);
575 		else if (TX_STAT_CC(stat))
576 			if_statadd_ref(nsr, if_collisions, TX_STAT_CC(stat));
577 		IF_STAT_PUTREF(ifp);
578 
579 		sc->sc_txfree++;
580 
581 		/* Try to queue more packets. */
582 		if_schedule_deferred_start(ifp);
583 	}
584 
585 	if (pkts)
586 		AUMAC_EVCNT_INCR(&sc->sc_ev_txintr);
587 
588 	/* Update the dirty descriptor pointer. */
589 	sc->sc_txdirty = i;
590 
591 	/*
592 	 * If there are no more pending transmissions, cancel the watchdog
593 	 * timer.
594 	 */
595 	if (sc->sc_txfree == AUMAC_NTXDESC)
596 		ifp->if_timer = 0;
597 
598 	return pkts;
599 }
600 
601 /*
602  * aumac_rxintr:
603  *
604  *	Helper; handle receive interrupts.
605  */
606 static int
aumac_rxintr(struct aumac_softc * sc)607 aumac_rxintr(struct aumac_softc *sc)
608 {
609 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
610 	struct mbuf *m;
611 	uint32_t stat;
612 	int i, len;
613 	int pkts = 0;
614 
615 	for (i = sc->sc_rxptr;; i = AUMAC_NEXTRX(i)) {
616 		if ((bus_space_read_4(sc->sc_st, sc->sc_dma_sh,
617 		     MACDMA_RX_ADDR(i)) & RX_ADDR_DN) == 0)
618 			break;
619 		pkts++;
620 
621 		stat = bus_space_read_4(sc->sc_st, sc->sc_dma_sh,
622 		    MACDMA_RX_STAT(i));
623 
624 #define PRINTERR(str)							\
625 	do {								\
626 		error++;						\
627 		printf("%s: %s\n", device_xname(sc->sc_dev), str);	\
628 	} while (0)
629 
630 		if (stat & RX_STAT_ERRS) {
631 			int error = 0;
632 
633 #if 0	/*
634 	 * Missed frames are a semi-frequent occurrence with this hardware,
635 	 * and reporting of them just makes everything run slower and fills
636 	 * the system log.  Be silent.
637 	 *
638 	 * Additionally, this missed bit indicates an error with the previous
639 	 * packet, and not with this one!  So PRINTERR is definitely wrong
640 	 * here.
641 	 *
642 	 * These should probably all be converted to evcnt counters anyway.
643 	 */
644 			if (stat & RX_STAT_MI)
645 				PRINTERR("missed frame");
646 #endif
647 			if (stat & RX_STAT_UC)
648 				PRINTERR("unknown control frame");
649 			if (stat & RX_STAT_LE)
650 				PRINTERR("short frame");
651 			if (stat & RX_STAT_CR)
652 				PRINTERR("CRC error");
653 			if (stat & RX_STAT_ME)
654 				PRINTERR("medium error");
655 			if (stat & RX_STAT_CS)
656 				PRINTERR("late collision");
657 			if (stat & RX_STAT_FL)
658 				PRINTERR("frame too big");
659 			if (stat & RX_STAT_RF)
660 				PRINTERR("runt frame (collision)");
661 			if (stat & RX_STAT_WT)
662 				PRINTERR("watch dog");
663 			if (stat & RX_STAT_DB) {
664 				if (stat & (RX_STAT_CS | RX_STAT_RF |
665 				    RX_STAT_CR)) {
666 					if (!error)
667 						goto pktok;
668 				} else
669 					PRINTERR("dribbling bit");
670 			}
671 #undef PRINTERR
672 			if_statinc(ifp, if_ierrors);
673 
674  dropit:
675 			/* reuse the current descriptor */
676 			AUMAC_INIT_RXDESC(sc, i);
677 			continue;
678 		}
679  pktok:
680 		len = RX_STAT_L(stat);
681 
682 		/*
683 		 * The Au1X00 MAC includes the CRC with every packet;
684 		 * trim it off here.
685 		 */
686 		len -= ETHER_CRC_LEN;
687 
688 		/*
689 		 * Truncate the packet if it's too big to fit in
690 		 * a single mbuf cluster.
691 		 */
692 		if (len > MCLBYTES - 2)
693 			len = MCLBYTES - 2;
694 
695 		MGETHDR(m, M_DONTWAIT, MT_DATA);
696 		if (m == NULL) {
697 			printf("%s: unable to allocate Rx mbuf\n",
698 			    device_xname(sc->sc_dev));
699 			goto dropit;
700 		}
701 		if (len > MHLEN - 2) {
702 			MCLGET(m, M_DONTWAIT);
703 			if ((m->m_flags & M_EXT) == 0) {
704 				printf("%s: unable to allocate Rx cluster\n",
705 				    device_xname(sc->sc_dev));
706 				m_freem(m);
707 				goto dropit;
708 			}
709 		}
710 
711 		m->m_data += 2;		/* align payload */
712 		memcpy(mtod(m, void *),
713 		    (void *)sc->sc_rxbufs[i].buf_vaddr, len);
714 		AUMAC_INIT_RXDESC(sc, i);
715 
716 		m_set_rcvif(m, ifp);
717 		m->m_pkthdr.len = m->m_len = len;
718 
719 		/* Pass it on. */
720 		if_percpuq_enqueue(ifp->if_percpuq, m);
721 	}
722 	if (pkts)
723 		AUMAC_EVCNT_INCR(&sc->sc_ev_rxintr);
724 	if (pkts == AUMAC_NRXDESC)
725 		AUMAC_EVCNT_INCR(&sc->sc_ev_rxstall);
726 
727 	/* Update the receive pointer. */
728 	sc->sc_rxptr = i;
729 
730 	return pkts;
731 }
732 
733 /*
734  * aumac_tick:
735  *
736  *	One second timer, used to tick the MII.
737  */
738 static void
aumac_tick(void * arg)739 aumac_tick(void *arg)
740 {
741 	struct aumac_softc *sc = arg;
742 	int s;
743 
744 	s = splnet();
745 	mii_tick(&sc->sc_mii);
746 	splx(s);
747 
748 	callout_reset(&sc->sc_tick_ch, hz, aumac_tick, sc);
749 }
750 
751 /*
752  * aumac_init:		[ifnet interface function]
753  *
754  *	Initialize the interface.  Must be called at splnet().
755  */
756 static int
aumac_init(struct ifnet * ifp)757 aumac_init(struct ifnet *ifp)
758 {
759 	struct aumac_softc *sc = ifp->if_softc;
760 	int i, error = 0;
761 
762 	/* Cancel any pending I/O, reset MAC. */
763 	aumac_stop(ifp, 0);
764 
765 	/* Set up the transmit ring. */
766 	for (i = 0; i < AUMAC_NTXDESC; i++) {
767 		bus_space_write_4(sc->sc_st, sc->sc_dma_sh,
768 		    MACDMA_TX_STAT(i), 0);
769 		bus_space_write_4(sc->sc_st, sc->sc_dma_sh,
770 		    MACDMA_TX_LEN(i), 0);
771 		bus_space_write_4(sc->sc_st, sc->sc_dma_sh,
772 		    MACDMA_TX_ADDR(i), sc->sc_txbufs[i].buf_paddr);
773 	}
774 	sc->sc_txfree = AUMAC_NTXDESC;
775 	sc->sc_txnext = TX_ADDR_CB(bus_space_read_4(sc->sc_st, sc->sc_dma_sh,
776 	    MACDMA_TX_ADDR(0)));
777 	sc->sc_txdirty = sc->sc_txnext;
778 
779 	/* Set up the receive ring. */
780 	for (i = 0; i < AUMAC_NRXDESC; i++)
781 			AUMAC_INIT_RXDESC(sc, i);
782 	sc->sc_rxptr = RX_ADDR_CB(bus_space_read_4(sc->sc_st, sc->sc_dma_sh,
783 	    MACDMA_RX_ADDR(0)));
784 
785 	/*
786 	 * Power up the MAC.
787 	 */
788 	aumac_powerup(sc);
789 
790 	sc->sc_control |= CONTROL_DO | CONTROL_TE | CONTROL_RE;
791 #if _BYTE_ORDER == _BIG_ENDIAN
792 	sc->sc_control |= CONTROL_EM;
793 #endif
794 
795 	/* Set the media. */
796 	if ((error = ether_mediachange(ifp)) != 0)
797 		goto out;
798 
799 	/*
800 	 * Set the receive filter.  This will actually start the transmit
801 	 * and receive processes.
802 	 */
803 	aumac_set_filter(sc);
804 
805 	/* Start the one second clock. */
806 	callout_reset(&sc->sc_tick_ch, hz, aumac_tick, sc);
807 
808 	/* ...all done! */
809 	ifp->if_flags |= IFF_RUNNING;
810 
811 	au_intr_enable(sc->sc_irq);
812 out:
813 	if (error)
814 		printf("%s: interface not running\n", device_xname(sc->sc_dev));
815 	return error;
816 }
817 
818 /*
819  * aumac_stop:		[ifnet interface function]
820  *
821  *	Stop transmission on the interface.
822  */
823 static void
aumac_stop(struct ifnet * ifp,int disable)824 aumac_stop(struct ifnet *ifp, int disable)
825 {
826 	struct aumac_softc *sc = ifp->if_softc;
827 
828 	/* Stop the one-second clock. */
829 	callout_stop(&sc->sc_tick_ch);
830 
831 	/* Down the MII. */
832 	mii_down(&sc->sc_mii);
833 
834 	/* Stop the transmit and receive processes. */
835 	bus_space_write_4(sc->sc_st, sc->sc_mac_sh, MAC_CONTROL, 0);
836 
837 	/* Power down/reset the MAC. */
838 	aumac_powerdown(sc);
839 
840 	au_intr_disable(sc->sc_irq);
841 
842 	/* Mark the interface as down and cancel the watchdog timer. */
843 	ifp->if_flags &= ~IFF_RUNNING;
844 	ifp->if_timer = 0;
845 }
846 
847 /*
848  * aumac_powerdown:
849  *
850  *	Power down the MAC.
851  */
852 static void
aumac_powerdown(struct aumac_softc * sc)853 aumac_powerdown(struct aumac_softc *sc)
854 {
855 
856 	/* Disable the MAC clocks, and place the device in reset. */
857 	// bus_space_write_4(sc->sc_st, sc->sc_macen_sh, 0, MACEN_JP);
858 
859 	// delay(10000);
860 }
861 
862 /*
863  * aumac_powerup:
864  *
865  *	Bring the device out of reset.
866  */
867 static void
aumac_powerup(struct aumac_softc * sc)868 aumac_powerup(struct aumac_softc *sc)
869 {
870 
871 	/* Enable clocks to the MAC. */
872 	bus_space_write_4(sc->sc_st, sc->sc_macen_sh, 0, MACEN_JP | MACEN_CE);
873 
874 	/* Enable MAC, coherent transactions, pass only valid frames. */
875 	bus_space_write_4(sc->sc_st, sc->sc_macen_sh, 0,
876 	    MACEN_E2 | MACEN_E1 | MACEN_E0 | MACEN_CE);
877 
878 	delay(20000);
879 }
880 
881 /*
882  * aumac_set_filter:
883  *
884  *	Set up the receive filter.
885  */
886 static void
aumac_set_filter(struct aumac_softc * sc)887 aumac_set_filter(struct aumac_softc *sc)
888 {
889 	struct ethercom *ec = &sc->sc_ethercom;
890 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
891 	struct ether_multi *enm;
892 	struct ether_multistep step;
893 	const uint8_t *enaddr = CLLADDR(ifp->if_sadl);
894 	uint32_t mchash[2], crc;
895 
896 	sc->sc_control &= ~(CONTROL_PM | CONTROL_PR);
897 
898 	/* Stop the receiver. */
899 	bus_space_write_4(sc->sc_st, sc->sc_mac_sh, MAC_CONTROL,
900 	    sc->sc_control & ~CONTROL_RE);
901 
902 	if (ifp->if_flags & IFF_PROMISC) {
903 		sc->sc_control |= CONTROL_PR;
904 		goto allmulti;
905 	}
906 
907 	/* Set the station address. */
908 	bus_space_write_4(sc->sc_st, sc->sc_mac_sh, MAC_ADDRHIGH,
909 	    enaddr[4] | (enaddr[5] << 8));
910 	bus_space_write_4(sc->sc_st, sc->sc_mac_sh, MAC_ADDRLOW,
911 	    enaddr[0] | (enaddr[1] << 8) | (enaddr[2] << 16) |
912 	    (enaddr[3] << 24));
913 
914 	sc->sc_control |= CONTROL_HP;
915 
916 	mchash[0] = mchash[1] = 0;
917 
918 	/*
919 	 * Set up the multicast address filter by passing all multicast
920 	 * addresses through a CRC generator, and then using the high
921 	 * order 6 bits as an index into the 64-bit multicast hash table.
922 	 * The high order bits select the word, while the rest of the bits
923 	 * select the bit within the word.
924 	 */
925 	ETHER_LOCK(ec);
926 	ETHER_FIRST_MULTI(step, ec, enm);
927 	while (enm != NULL) {
928 		if (memcmp(enm->enm_addrlo, enm->enm_addrhi, ETHER_ADDR_LEN)) {
929 			/*
930 			 * We must listen to a range of multicast addresses.
931 			 * For now, just accept all multicasts, rather than
932 			 * trying to set only those filter bits needed to match
933 			 * the range.  (At this time, the only use of address
934 			 * ranges is for IP multicast routing, for which the
935 			 * range is large enough to require all bits set.)
936 			 */
937 			ETHER_UNLOCK(ec);
938 			goto allmulti;
939 		}
940 
941 		crc = ether_crc32_be(enm->enm_addrlo, ETHER_ADDR_LEN);
942 
943 		/* Just want the 6 most significant bits. */
944 		crc >>= 26;
945 
946 		/* Set the corresponding bit in the filter. */
947 		mchash[crc >> 5] |= 1U << (crc & 0x1f);
948 
949 		ETHER_NEXT_MULTI(step, enm);
950 	}
951 	ETHER_UNLOCK(ec);
952 
953 	ifp->if_flags &= ~IFF_ALLMULTI;
954 
955 	bus_space_write_4(sc->sc_st, sc->sc_mac_sh, MAC_HASHHIGH,
956 	    mchash[1]);
957 	bus_space_write_4(sc->sc_st, sc->sc_mac_sh, MAC_HASHLOW,
958 	    mchash[0]);
959 
960 	bus_space_write_4(sc->sc_st, sc->sc_mac_sh, MAC_CONTROL,
961 	    sc->sc_control);
962 	return;
963 
964  allmulti:
965 	sc->sc_control |= CONTROL_PM;
966 	bus_space_write_4(sc->sc_st, sc->sc_mac_sh, MAC_CONTROL,
967 	    sc->sc_control);
968 }
969 
970 /*
971  * aumac_mii_wait:
972  *
973  *	Wait for the MII interface to not be busy.
974  */
975 static int
aumac_mii_wait(struct aumac_softc * sc,const char * msg)976 aumac_mii_wait(struct aumac_softc *sc, const char *msg)
977 {
978 	int i;
979 
980 	for (i = 0; i < 10000; i++) {
981 		if ((bus_space_read_4(sc->sc_st, sc->sc_mac_sh,
982 		     MAC_MIICTRL) & MIICTRL_MB) == 0)
983 			return 0;
984 		delay(10);
985 	}
986 
987 	printf("%s: MII failed to %s\n", device_xname(sc->sc_dev), msg);
988 	return ETIMEDOUT;
989 }
990 
991 /*
992  * aumac_mii_readreg:	[mii interface function]
993  *
994  *	Read a PHY register on the MII.
995  */
996 static int
aumac_mii_readreg(device_t self,int phy,int reg,uint16_t * val)997 aumac_mii_readreg(device_t self, int phy, int reg, uint16_t *val)
998 {
999 	struct aumac_softc *sc = device_private(self);
1000 	int rv;
1001 
1002 	if ((rv = aumac_mii_wait(sc, "become ready")) != 0)
1003 		return rv;
1004 
1005 	bus_space_write_4(sc->sc_st, sc->sc_mac_sh, MAC_MIICTRL,
1006 	    MIICTRL_PHYADDR(phy) | MIICTRL_MIIREG(reg));
1007 
1008 	if ((rv = aumac_mii_wait(sc, "complete")) != 0)
1009 		return rv;
1010 
1011 	*val = bus_space_read_4(sc->sc_st, sc->sc_mac_sh, MAC_MIIDATA)
1012 	    & MIIDATA_MASK;
1013 	return 0;
1014 }
1015 
1016 /*
1017  * aumac_mii_writereg:	[mii interface function]
1018  *
1019  *	Write a PHY register on the MII.
1020  */
1021 static int
aumac_mii_writereg(device_t self,int phy,int reg,uint16_t val)1022 aumac_mii_writereg(device_t self, int phy, int reg, uint16_t val)
1023 {
1024 	struct aumac_softc *sc = device_private(self);
1025 	int rv;
1026 
1027 	if ((rv = aumac_mii_wait(sc, "become ready")) != 0)
1028 		return rv;
1029 
1030 	bus_space_write_4(sc->sc_st, sc->sc_mac_sh, MAC_MIIDATA, val);
1031 	bus_space_write_4(sc->sc_st, sc->sc_mac_sh, MAC_MIICTRL,
1032 	    MIICTRL_PHYADDR(phy) | MIICTRL_MIIREG(reg) | MIICTRL_MW);
1033 
1034 	return aumac_mii_wait(sc, "complete");
1035 }
1036 
1037 /*
1038  * aumac_mii_statchg:	[mii interface function]
1039  *
1040  *	Callback from MII layer when media changes.
1041  */
1042 static void
aumac_mii_statchg(struct ifnet * ifp)1043 aumac_mii_statchg(struct ifnet *ifp)
1044 {
1045 	struct aumac_softc *sc = ifp->if_softc;
1046 
1047 	if ((sc->sc_mii.mii_media_active & IFM_FDX) != 0)
1048 		sc->sc_control |= CONTROL_F;
1049 	else
1050 		sc->sc_control &= ~CONTROL_F;
1051 
1052 	bus_space_write_4(sc->sc_st, sc->sc_mac_sh, MAC_CONTROL,
1053 	    sc->sc_control);
1054 }
1055