/* $NetBSD: depca.c,v 1.8 2002/10/02 16:33:32 thorpej Exp $ */ /*- * Copyright (c) 1997, 1998, 2000 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 __KERNEL_RCSID(0, "$NetBSD: depca.c,v 1.8 2002/10/02 16:33:32 thorpej Exp $"); #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include struct le_depca_softc { struct am7990_softc sc_am7990; /* glue to MI code */ void *sc_ih; }; int le_depca_match(struct device *, struct cfdata *, void *); void le_depca_attach(struct device *, struct device *, void *); CFATTACH_DECL(le_depca, sizeof(struct le_depca_softc), le_depca_match, le_depca_attach, NULL, NULL); void depca_copytobuf(struct lance_softc *, void *, int, int); void depca_copyfrombuf(struct lance_softc *, void *, int, int); void depca_zerobuf(struct lance_softc *, int, int); struct depca_attach_args { const char *da_name; }; int depca_print(void *, const char *); void depca_attach(struct depca_softc *sc) { struct depca_attach_args da; da.da_name = "le"; (void) config_found(&sc->sc_dev, &da, depca_print); } int depca_print(void *aux, const char *pnp) { struct depca_attach_args *da = aux; if (pnp) printf("%s at %s", da->da_name, pnp); return (UNCONF); } void depca_wrcsr(struct lance_softc *sc, u_int16_t port, u_int16_t val) { struct depca_softc *dsc = (void *) sc->sc_dev.dv_parent; bus_space_write_2(dsc->sc_iot, dsc->sc_ioh, DEPCA_RAP, port); bus_space_write_2(dsc->sc_iot, dsc->sc_ioh, DEPCA_RDP, val); } u_int16_t depca_rdcsr(struct lance_softc *sc, u_int16_t port) { struct depca_softc *dsc = (void *) sc->sc_dev.dv_parent; bus_space_write_2(dsc->sc_iot, dsc->sc_ioh, DEPCA_RAP, port); return (bus_space_read_2(dsc->sc_iot, dsc->sc_ioh, DEPCA_RDP)); } int depca_readprom(bus_space_tag_t iot, bus_space_handle_t ioh, u_int8_t *laddr) { int port, i; /* * Extract the physical MAC address from the ROM. * * The address PROM is 32 bytes wide, and we access it through * a single I/O port. On each read, it rotates to the next * position. We find the ethernet address by looking for a * particular sequence of bytes (0xff, 0x00, 0x55, 0xaa, 0xff, * 0x00, 0x55, 0xaa), and then reading the next 8 bytes (the * ethernet address and a checksum). * * It appears that the PROM can be at one of two locations, so * we just try both. */ port = DEPCA_ADP; for (i = 0; i < 32; i++) if (bus_space_read_1(iot, ioh, port) == 0xff && bus_space_read_1(iot, ioh, port) == 0x00 && bus_space_read_1(iot, ioh, port) == 0x55 && bus_space_read_1(iot, ioh, port) == 0xaa && bus_space_read_1(iot, ioh, port) == 0xff && bus_space_read_1(iot, ioh, port) == 0x00 && bus_space_read_1(iot, ioh, port) == 0x55 && bus_space_read_1(iot, ioh, port) == 0xaa) goto found; port = DEPCA_ADP + 1; for (i = 0; i < 32; i++) if (bus_space_read_1(iot, ioh, port) == 0xff && bus_space_read_1(iot, ioh, port) == 0x00 && bus_space_read_1(iot, ioh, port) == 0x55 && bus_space_read_1(iot, ioh, port) == 0xaa && bus_space_read_1(iot, ioh, port) == 0xff && bus_space_read_1(iot, ioh, port) == 0x00 && bus_space_read_1(iot, ioh, port) == 0x55 && bus_space_read_1(iot, ioh, port) == 0xaa) goto found; printf("depca: address not found\n"); return (-1); found: if (laddr) { for (i = 0; i < 6; i++) laddr[i] = bus_space_read_1(iot, ioh, port); } #if 0 sum = (laddr[0] << 2) + (laddr[1] << 10) + (laddr[2] << 1) + (laddr[3] << 9) + (laddr[4] << 0) + (laddr[5] << 8); sum = (sum & 0xffff) + (sum >> 16); sum = (sum & 0xffff) + (sum >> 16); rom_sum = bus_space_read_1(iot, ioh, port); rom_sum |= bus_space_read_1(iot, ioh, port) << 8; if (sum != rom_sum) { printf("depca: checksum mismatch; calculated %04x != read %04x", sum, rom_sum); return (-1); } #endif return (0); } int le_depca_match(struct device *parent, struct cfdata *match, void *aux) { struct depca_attach_args *da = aux; return (strcmp(da->da_name, match->cf_name) == 0); } void le_depca_attach(struct device *parent, struct device *self, void *aux) { struct depca_softc *dsc = (void *) parent; struct le_depca_softc *lesc = (void *) self; struct lance_softc *sc = &lesc->sc_am7990.lsc; u_int8_t val; int i; printf("\n"); /* I/O and memory spaces already mapped. */ if (depca_readprom(dsc->sc_iot, dsc->sc_ioh, sc->sc_enaddr)) { printf("%s: can't read PROM\n", self->dv_xname); return; } bus_space_write_2(dsc->sc_iot, dsc->sc_ioh, DEPCA_CSR, DEPCA_CSR_DUM | DEPCA_CSR_IEN | DEPCA_CSR_SHE | (dsc->sc_memsize == 32*1024 ? DEPCA_CSR_LOW32K : 0)); val = 0xff; for (;;) { u_int8_t cv; bus_space_set_region_1(dsc->sc_memt, dsc->sc_memh, 0, val, dsc->sc_memsize); for (i = 0; i < dsc->sc_memsize; i++) { cv = bus_space_read_1(dsc->sc_memt, dsc->sc_memh, i); if (cv != val) { printf("%s: failed to clear memory at %d " "(0x%02x != 0x%02x)\n", sc->sc_dev.dv_xname, i, cv, val); return; } } if (val == 0x00) break; val -= 0x55; } sc->sc_conf3 = LE_C3_ACON; sc->sc_mem = 0; /* Not used. */ sc->sc_addr = 0; sc->sc_memsize = dsc->sc_memsize; sc->sc_copytodesc = depca_copytobuf; sc->sc_copyfromdesc = depca_copyfrombuf; sc->sc_copytobuf = depca_copytobuf; sc->sc_copyfrombuf = depca_copyfrombuf; sc->sc_zerobuf = depca_zerobuf; sc->sc_rdcsr = depca_rdcsr; sc->sc_wrcsr = depca_wrcsr; sc->sc_hwinit = NULL; printf("%s", sc->sc_dev.dv_xname); am7990_config(&lesc->sc_am7990); lesc->sc_ih = (*dsc->sc_intr_establish)(dsc, sc); } /* * Controller interrupt. */ int depca_intredge(void *arg) { if (am7990_intr(arg) == 0) return (0); for (;;) if (am7990_intr(arg) == 0) return (1); } /* * DEPCA shared memory access functions. */ void depca_copytobuf(struct lance_softc *sc, void *from, int boff, int len) { struct depca_softc *dsc = (void *) sc->sc_dev.dv_parent; bus_space_write_region_1(dsc->sc_memt, dsc->sc_memh, boff, from, len); } void depca_copyfrombuf(struct lance_softc *sc, void *to, int boff, int len) { struct depca_softc *dsc = (void *) sc->sc_dev.dv_parent; bus_space_read_region_1(dsc->sc_memt, dsc->sc_memh, boff, to, len); } void depca_zerobuf(struct lance_softc *sc, int boff, int len) { struct depca_softc *dsc = (void *) sc->sc_dev.dv_parent; bus_space_set_region_1(dsc->sc_memt, dsc->sc_memh, boff, 0x00, len); }