/* $OpenBSD: if_le.c,v 1.9 2002/03/14 01:26:48 millert Exp $ */ /* $NetBSD: if_le.c,v 1.14 1999/08/14 18:40:23 ragge Exp $ */ /*- * Copyright (c) 1997, 1998 The NetBSD Foundation, Inc. * All rights reserved. * * This code is derived from software contributed to The NetBSD Foundation * by Charles M. Hannum and by Jason R. Thorpe of the Numerical Aerospace * Simulation Facility, NASA Ames Research Center. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by the NetBSD * Foundation, Inc. and its contributors. * 4. Neither the name of The NetBSD Foundation nor the names of its * contributors may be used to endorse or promote products derived * from this software without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE * POSSIBILITY OF SUCH DAMAGE. */ /*- * Copyright (c) 1992, 1993 * The Regents of the University of California. All rights reserved. * * This code is derived from software contributed to Berkeley by * Ralph Campbell and Rick Macklem. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by the University of * California, Berkeley and its contributors. * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. * * @(#)if_le.c 8.2 (Berkeley) 11/16/93 */ #include "bpfilter.h" #include #include #include #include #include #include #include #include #if INET #include #endif #include #include #include #include #include #include #include #define ETHER_MIN_LEN 64 /* minimum frame length, including CRC */ #define LEVEC 0xd4 /* Interrupt vector on 3300/3400 */ struct le_softc { struct am7990_softc sc_am7990; /* Must be first */ struct evcnt sc_intrcnt; volatile u_short *sc_rap; volatile u_short *sc_rdp; }; int le_ibus_match(struct device *, void *, void *); void le_ibus_attach(struct device *, struct device *, void *); void lewrcsr(struct am7990_softc *, u_int16_t, u_int16_t); u_int16_t lerdcsr(struct am7990_softc *, u_int16_t); void lance_copytobuf_gap2(struct am7990_softc *, void *, int, int); void lance_copyfrombuf_gap2(struct am7990_softc *, void *, int, int); void lance_zerobuf_gap2(struct am7990_softc *, int, int); void leintr(void *); struct cfattach le_ibus_ca = { sizeof(struct le_softc), le_ibus_match, le_ibus_attach }; void lewrcsr(ls, port, val) struct am7990_softc *ls; u_int16_t port, val; { struct le_softc *sc = (void *)ls; *sc->sc_rap = port; *sc->sc_rdp = val; } u_int16_t lerdcsr(ls, port) struct am7990_softc *ls; u_int16_t port; { struct le_softc *sc = (void *)ls; *sc->sc_rap = port; return *sc->sc_rdp; } int le_ibus_match(parent, cf, aux) struct device *parent; void *cf; void *aux; { struct bp_conf *bp = aux; if (strcmp("lance", bp->type)) return 0; return 1; } void le_ibus_attach(parent, self, aux) struct device *parent, *self; void *aux; { struct le_softc *sc = (void *)self; int *lance_addr; int i, vec, br; sc->sc_rdp = (short *)vax_map_physmem(0x20084400, 1); sc->sc_rap = sc->sc_rdp + 2; /* * Set interrupt vector, by forcing an interrupt. */ scb_vecref(0, 0); /* Clear vector ref */ *sc->sc_rap = LE_CSR0; *sc->sc_rdp = LE_C0_STOP; DELAY(100); *sc->sc_rdp = LE_C0_INIT|LE_C0_INEA; DELAY(100000); i = scb_vecref(&vec, &br); if (i == 0 || vec == 0) return; scb_vecalloc(vec, (void *)am7990_intr, sc, SCB_ISTACK, &sc->sc_intrcnt); evcnt_attach(self, "intr", &sc->sc_intrcnt); printf(": vec %o ipl %x\n%s", vec, br, self->dv_xname); /* * MD functions. */ sc->sc_am7990.sc_rdcsr = lerdcsr; sc->sc_am7990.sc_wrcsr = lewrcsr; sc->sc_am7990.sc_nocarrier = NULL; sc->sc_am7990.sc_mem = (void *)uvm_km_valloc(kernel_map, (128 * 1024)); if (sc->sc_am7990.sc_mem == 0) return; ioaccess((vaddr_t)sc->sc_am7990.sc_mem, 0x20120000, (128 * 1024) >> VAX_PGSHIFT); sc->sc_am7990.sc_addr = 0; sc->sc_am7990.sc_memsize = (64 * 1024); sc->sc_am7990.sc_copytodesc = lance_copytobuf_gap2; sc->sc_am7990.sc_copyfromdesc = lance_copyfrombuf_gap2; sc->sc_am7990.sc_copytobuf = lance_copytobuf_gap2; sc->sc_am7990.sc_copyfrombuf = lance_copyfrombuf_gap2; sc->sc_am7990.sc_zerobuf = lance_zerobuf_gap2; /* * Get the ethernet address out of rom */ lance_addr = (int *)vax_map_physmem(0x20084200, 1); for (i = 0; i < 6; i++) sc->sc_am7990.sc_arpcom.ac_enaddr[i] = (u_char)lance_addr[i]; vax_unmap_physmem((vaddr_t)lance_addr, 1); bcopy(self->dv_xname, sc->sc_am7990.sc_arpcom.ac_if.if_xname, IFNAMSIZ); am7990_config(&sc->sc_am7990); /* * Register this device as boot device if we booted from it. * This will fail if there are more than one le in a machine, * fortunately there may be only one. */ if (B_TYPE(bootdev) == BDEV_LE) booted_from = self; } /* * gap2: two bytes of data followed by two bytes of pad. * * Buffers must be 4-byte aligned. The code doesn't worry about * doing an extra byte. */ void lance_copytobuf_gap2(sc, fromv, boff, len) struct am7990_softc *sc; void *fromv; int boff; register int len; { volatile caddr_t buf = sc->sc_mem; register caddr_t from = fromv; register volatile u_int16_t *bptr; if (boff & 0x1) { /* handle unaligned first byte */ bptr = ((volatile u_int16_t *)buf) + (boff - 1); *bptr = (*from++ << 8) | (*bptr & 0xff); bptr += 2; len--; } else bptr = ((volatile u_int16_t *)buf) + boff; while (len > 1) { *bptr = (from[1] << 8) | (from[0] & 0xff); bptr += 2; from += 2; len -= 2; } if (len == 1) *bptr = (u_int16_t)*from; } void lance_copyfrombuf_gap2(sc, tov, boff, len) struct am7990_softc *sc; void *tov; int boff, len; { volatile caddr_t buf = sc->sc_mem; register caddr_t to = tov; register volatile u_int16_t *bptr; register u_int16_t tmp; if (boff & 0x1) { /* handle unaligned first byte */ bptr = ((volatile u_int16_t *)buf) + (boff - 1); *to++ = (*bptr >> 8) & 0xff; bptr += 2; len--; } else bptr = ((volatile u_int16_t *)buf) + boff; while (len > 1) { tmp = *bptr; *to++ = tmp & 0xff; *to++ = (tmp >> 8) & 0xff; bptr += 2; len -= 2; } if (len == 1) *to = *bptr & 0xff; } void lance_zerobuf_gap2(sc, boff, len) struct am7990_softc *sc; int boff, len; { volatile caddr_t buf = sc->sc_mem; register volatile u_int16_t *bptr; if ((unsigned)boff & 0x1) { bptr = ((volatile u_int16_t *)buf) + (boff - 1); *bptr &= 0xff; bptr += 2; len--; } else bptr = ((volatile u_int16_t *)buf) + boff; while (len > 0) { *bptr = 0; bptr += 2; len -= 2; } } void leintr(arg) void *arg; { int unit = (int)arg; am7990_intr(le_cd.cd_devs[unit]); }