/* $OpenBSD: if_le.c,v 1.3 2003/12/30 21:25:59 miod Exp $ */ /*- * Copyright (c) 1982, 1992, 1993 * The Regents of the University of California. All rights reserved. * * 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. 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) 10/30/93 */ #include "bpfilter.h" #include #include #include #include #include #include #include #include #ifdef INET #include #include #endif #include #include #include #include #include #include #include #include #include /* autoconfiguration driver */ void leattach(struct device *, struct device *, void *); int lematch(struct device *, void *, void *); struct cfattach le_ca = { sizeof(struct le_softc), lematch, leattach }; void vlewrcsr(struct am7990_softc *, u_int16_t, u_int16_t); u_int16_t vlerdcsr(struct am7990_softc *, u_int16_t); void nvram_cmd(struct am7990_softc *, u_char, u_short); u_int16_t nvram_read(struct am7990_softc *, u_char); void vleetheraddr(struct am7990_softc *); void vleinit(struct am7990_softc *); void vlereset(struct am7990_softc *); int vle_intr(void *); void vle_copyfrombuf_contig(struct am7990_softc *, void *, int, int); void vle_copytobuf_contig(struct am7990_softc *, void *, int, int); void vle_zerobuf_contig(struct am7990_softc *, int, int); /* send command to the nvram controller */ void nvram_cmd(sc, cmd, addr) struct am7990_softc *sc; u_char cmd; u_short addr; { int i; struct vlereg1 *reg1 = (struct vlereg1 *)((struct le_softc *)sc)->sc_r1; for (i=0;i<8;i++) { reg1->ler1_ear=((cmd|(addr<<1))>>i); CDELAY; } } /* read nvram one bit at a time */ u_int16_t nvram_read(sc, nvram_addr) struct am7990_softc *sc; u_char nvram_addr; { u_short val = 0, mask = 0x04000; u_int16_t wbit; /* these used by macros DO NOT CHANGE!*/ struct vlereg1 *reg1 = (struct vlereg1 *)((struct le_softc *)sc)->sc_r1; ((struct le_softc *)sc)->csr = 0x4f; ENABLE_NVRAM; nvram_cmd(sc, NVRAM_RCL, 0); DISABLE_NVRAM; CDELAY; ENABLE_NVRAM; nvram_cmd(sc, NVRAM_READ, nvram_addr); for (wbit=0; wbit<15; wbit++) { (reg1->ler1_ear & 0x01) ? (val = (val | mask)) : (val = (val & (~mask))); mask = mask>>1; CDELAY; } (reg1->ler1_ear & 0x01) ? (val = (val | 0x8000)) : (val = (val & 0x7FFF)); CDELAY; DISABLE_NVRAM; return (val); } void vleetheraddr(sc) struct am7990_softc *sc; { u_char * cp = sc->sc_arpcom.ac_enaddr; u_int16_t ival[3]; u_char i; for (i=0; i<3; i++) { ival[i] = nvram_read(sc, i); } memcpy(cp, &ival[0], 6); } void vlewrcsr(sc, port, val) struct am7990_softc *sc; u_int16_t port, val; { register struct vlereg1 *ler1 = (struct vlereg1 *)((struct le_softc *)sc)->sc_r1; ler1->ler1_rap = port; ler1->ler1_rdp = val; } u_int16_t vlerdcsr(sc, port) struct am7990_softc *sc; u_int16_t port; { register struct vlereg1 *ler1 = (struct vlereg1 *)((struct le_softc *)sc)->sc_r1; u_int16_t val; ler1->ler1_rap = port; val = ler1->ler1_rdp; return (val); } /* init MVME376, set ipl and vec */ void vleinit(sc) struct am7990_softc *sc; { register struct vlereg1 *reg1 = (struct vlereg1 *)((struct le_softc *)sc)->sc_r1; u_char vec = ((struct le_softc *)sc)->sc_vec; u_char ipl = ((struct le_softc *)sc)->sc_ipl; ((struct le_softc *)sc)->csr = 0x4f; WRITE_CSR_AND( ~ipl ); SET_VEC(vec); return; } /* MVME376 hardware reset */ void vlereset(sc) struct am7990_softc *sc; { register struct vlereg1 *reg1 = (struct vlereg1 *)((struct le_softc *)sc)->sc_r1; RESET_HW; #ifdef LEDEBUG if (sc->sc_debug) { printf("%s: hardware reset\n", sc->sc_dev.dv_xname); } #endif SYSFAIL_CL; return; } int vle_intr(sc) void *sc; { register struct vlereg1 *reg1 = (struct vlereg1 *)((struct le_softc *)sc)->sc_r1; int rc; rc = am7990_intr(sc); ENABLE_INTR; return (rc); } void vle_copytobuf_contig(sc, from, boff, len) struct am7990_softc *sc; void *from; int boff, len; { volatile caddr_t buf = sc->sc_mem; dma_cachectl((vaddr_t)buf + boff, len, DMA_CACHE_SYNC); d16_bcopy(from, buf + boff, len); } void vle_copyfrombuf_contig(sc, to, boff, len) struct am7990_softc *sc; void *to; int boff, len; { volatile caddr_t buf = sc->sc_mem; dma_cachectl((vaddr_t)buf + boff, len, DMA_CACHE_SYNC_INVAL); d16_bcopy(buf + boff, to, len); } void vle_zerobuf_contig(sc, boff, len) struct am7990_softc *sc; int boff, len; { volatile caddr_t buf = sc->sc_mem; dma_cachectl((vaddr_t)buf + boff, len, DMA_CACHE_SYNC); d16_bzero(buf + boff, len); } int lematch(parent, vcf, args) struct device *parent; void *vcf, *args; { struct confargs *ca = args; return (!badvaddr((vaddr_t)ca->ca_vaddr, 2)); } /* * Interface exists: make available by filling in network interface * record. System will initialize the interface when it is ready * to accept packets. */ void leattach(parent, self, aux) struct device *parent; struct device *self; void *aux; { register struct le_softc *lesc = (struct le_softc *)self; struct am7990_softc *sc = &lesc->sc_am7990; struct confargs *ca = aux; caddr_t addr; int card; /* Are we the boot device? */ if (ca->ca_paddr == bootaddr) bootdv = self; /* * get the first available etherbuf. MVME376 uses its own dual-ported * RAM for etherbuf. It is set by dip switches on board. We support * the six Motorola address locations, however, the board can be set up * at any other address. * XXX These physical addresses should be mapped in extio!!! */ switch ((int)ca->ca_paddr) { case 0xffff1200: card = 0; break; case 0xffff1400: card = 1; break; case 0xffff1600: card = 2; break; case 0xffff5400: card = 3; break; case 0xffff5600: card = 4; break; case 0xffffa400: card = 5; break; default: printf(": unsupported address\n"); return; } addr = (caddr_t)(VLEMEMBASE - (card * VLEMEMSIZE)); sc->sc_mem = (void *)mapiodev(addr, VLEMEMSIZE); if (sc->sc_mem == NULL) { printf("\n%s: no more memory in external I/O map\n", sc->sc_dev.dv_xname); return; } sc->sc_addr = kvtop((vaddr_t)sc->sc_mem); if (sc->sc_addr == 0L) { printf("\n%s: kvtop() failed!\n", sc->sc_dev.dv_xname); return; } lesc->sc_r1 = (void *)ca->ca_vaddr; lesc->sc_ipl = ca->ca_ipl; lesc->sc_vec = ca->ca_vec; sc->sc_memsize = VLEMEMSIZE; sc->sc_conf3 = LE_C3_BSWP; sc->sc_hwreset = vlereset; sc->sc_rdcsr = vlerdcsr; sc->sc_wrcsr = vlewrcsr; sc->sc_hwinit = vleinit; sc->sc_copytodesc = vle_copytobuf_contig; sc->sc_copyfromdesc = vle_copyfrombuf_contig; sc->sc_copytobuf = vle_copytobuf_contig; sc->sc_copyfrombuf = vle_copyfrombuf_contig; sc->sc_zerobuf = vle_zerobuf_contig; /* get ether address */ vleetheraddr(sc); evcnt_attach(&sc->sc_dev, "intr", &lesc->sc_intrcnt); evcnt_attach(&sc->sc_dev, "errs", &lesc->sc_errcnt); am7990_config(sc); /* connect the interrupt */ lesc->sc_ih.ih_fn = vle_intr; lesc->sc_ih.ih_arg = sc; lesc->sc_ih.ih_ipl = ca->ca_ipl; vmeintr_establish(ca->ca_vec + 0, &lesc->sc_ih); }