1 /* $NetBSD: if_le.c,v 1.21 2002/03/20 20:39:15 eeh Exp $ */ 2 3 /*- 4 * Copyright (c) 1997, 1998 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Charles M. Hannum; Jason R. Thorpe of the Numerical Aerospace 9 * Simulation Facility, NASA Ames Research Center; Paul Kranenburg. 10 * 11 * Redistribution and use in source and binary forms, with or without 12 * modification, are permitted provided that the following conditions 13 * are met: 14 * 1. Redistributions of source code must retain the above copyright 15 * notice, this list of conditions and the following disclaimer. 16 * 2. Redistributions in binary form must reproduce the above copyright 17 * notice, this list of conditions and the following disclaimer in the 18 * documentation and/or other materials provided with the distribution. 19 * 3. All advertising materials mentioning features or use of this software 20 * must display the following acknowledgement: 21 * This product includes software developed by the NetBSD 22 * Foundation, Inc. and its contributors. 23 * 4. Neither the name of The NetBSD Foundation nor the names of its 24 * contributors may be used to endorse or promote products derived 25 * from this software without specific prior written permission. 26 * 27 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 28 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 29 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 30 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 31 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 32 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 33 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 34 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 35 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 36 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 37 * POSSIBILITY OF SUCH DAMAGE. 38 */ 39 40 #include <sys/cdefs.h> 41 __KERNEL_RCSID(0, "$NetBSD: if_le.c,v 1.21 2002/03/20 20:39:15 eeh Exp $"); 42 43 #include "opt_inet.h" 44 #include "bpfilter.h" 45 46 #include <sys/param.h> 47 #include <sys/systm.h> 48 #include <sys/mbuf.h> 49 #include <sys/syslog.h> 50 #include <sys/socket.h> 51 #include <sys/device.h> 52 #include <sys/malloc.h> 53 54 #include <net/if.h> 55 #include <net/if_ether.h> 56 #include <net/if_media.h> 57 58 #include <machine/bus.h> 59 #include <machine/intr.h> 60 #include <machine/autoconf.h> 61 62 #include <dev/sbus/sbusvar.h> 63 #include <dev/sbus/lebuffervar.h> /*XXX*/ 64 65 #include <dev/ic/lancereg.h> 66 #include <dev/ic/lancevar.h> 67 #include <dev/ic/am7990reg.h> 68 #include <dev/ic/am7990var.h> 69 70 /* 71 * LANCE registers. 72 */ 73 #define LEREG1_RDP 0 /* Register Data port */ 74 #define LEREG1_RAP 2 /* Register Address port */ 75 76 struct le_softc { 77 struct am7990_softc sc_am7990; /* glue to MI code */ 78 struct sbusdev sc_sd; /* sbus device */ 79 bus_space_tag_t sc_bustag; 80 bus_dma_tag_t sc_dmatag; 81 bus_dmamap_t sc_dmamap; 82 bus_space_handle_t sc_reg; 83 }; 84 85 #define MEMSIZE 0x4000 /* LANCE memory size */ 86 87 int lematch_sbus __P((struct device *, struct cfdata *, void *)); 88 void leattach_sbus __P((struct device *, struct device *, void *)); 89 90 /* 91 * Media types supported. 92 */ 93 static int lemedia[] = { 94 IFM_ETHER|IFM_10_5, 95 }; 96 #define NLEMEDIA (sizeof(lemedia) / sizeof(lemedia[0])) 97 98 struct cfattach le_sbus_ca = { 99 sizeof(struct le_softc), lematch_sbus, leattach_sbus 100 }; 101 102 extern struct cfdriver le_cd; 103 104 #if defined(_KERNEL_OPT) 105 #include "opt_ddb.h" 106 #endif 107 108 #ifdef DDB 109 #define integrate 110 #define hide 111 #else 112 #define integrate static __inline 113 #define hide static 114 #endif 115 116 static void lewrcsr __P((struct lance_softc *, u_int16_t, u_int16_t)); 117 static u_int16_t lerdcsr __P((struct lance_softc *, u_int16_t)); 118 119 static void 120 lewrcsr(sc, port, val) 121 struct lance_softc *sc; 122 u_int16_t port, val; 123 { 124 struct le_softc *lesc = (struct le_softc *)sc; 125 126 bus_space_write_2(lesc->sc_bustag, lesc->sc_reg, LEREG1_RAP, port); 127 bus_space_write_2(lesc->sc_bustag, lesc->sc_reg, LEREG1_RDP, val); 128 129 #if defined(SUN4M) 130 /* 131 * We need to flush the Sbus->Mbus write buffers. This can most 132 * easily be accomplished by reading back the register that we 133 * just wrote (thanks to Chris Torek for this solution). 134 */ 135 if (CPU_ISSUN4M) { 136 volatile u_int16_t discard; 137 discard = bus_space_read_2(lesc->sc_bustag, lesc->sc_reg, 138 LEREG1_RDP); 139 } 140 #endif 141 } 142 143 static u_int16_t 144 lerdcsr(sc, port) 145 struct lance_softc *sc; 146 u_int16_t port; 147 { 148 struct le_softc *lesc = (struct le_softc *)sc; 149 150 bus_space_write_2(lesc->sc_bustag, lesc->sc_reg, LEREG1_RAP, port); 151 return (bus_space_read_2(lesc->sc_bustag, lesc->sc_reg, LEREG1_RDP)); 152 } 153 154 155 int 156 lematch_sbus(parent, cf, aux) 157 struct device *parent; 158 struct cfdata *cf; 159 void *aux; 160 { 161 struct sbus_attach_args *sa = aux; 162 163 return (strcmp(cf->cf_driver->cd_name, sa->sa_name) == 0); 164 } 165 166 void 167 leattach_sbus(parent, self, aux) 168 struct device *parent, *self; 169 void *aux; 170 { 171 struct sbus_attach_args *sa = aux; 172 struct le_softc *lesc = (struct le_softc *)self; 173 struct lance_softc *sc = &lesc->sc_am7990.lsc; 174 bus_dma_tag_t dmatag; 175 struct sbusdev *sd; 176 /* XXX the following declarations should be elsewhere */ 177 extern void myetheraddr __P((u_char *)); 178 179 180 lesc->sc_bustag = sa->sa_bustag; 181 lesc->sc_dmatag = dmatag = sa->sa_dmatag; 182 183 if (sbus_bus_map(sa->sa_bustag, 184 sa->sa_slot, 185 sa->sa_offset, 186 sa->sa_size, 187 0, &lesc->sc_reg) != 0) { 188 printf("%s @ sbus: cannot map registers\n", self->dv_xname); 189 return; 190 } 191 192 /* 193 * Look for an "unallocated" lebuffer and pair it with 194 * this `le' device on the assumption that we're on 195 * a pre-historic ROM that doesn't establish le<=>lebuffer 196 * parent-child relationships. 197 */ 198 for (sd = ((struct sbus_softc *)parent)->sc_sbdev; sd != NULL; 199 sd = sd->sd_bchain) { 200 201 struct lebuf_softc *lebuf = (struct lebuf_softc *)sd->sd_dev; 202 203 if (strncmp("lebuffer", sd->sd_dev->dv_xname, 8) != 0) 204 continue; 205 206 if (lebuf->attached != 0) 207 continue; 208 209 sc->sc_mem = lebuf->sc_buffer; 210 sc->sc_memsize = lebuf->sc_bufsiz; 211 sc->sc_addr = 0; /* Lance view is offset by buffer location */ 212 lebuf->attached = 1; 213 214 /* That old black magic... */ 215 sc->sc_conf3 = PROM_getpropint(sa->sa_node, 216 "busmaster-regval", 217 LE_C3_BSWP | LE_C3_ACON | LE_C3_BCON); 218 break; 219 } 220 221 lesc->sc_sd.sd_reset = (void *)lance_reset; 222 sbus_establish(&lesc->sc_sd, &sc->sc_dev); 223 224 if (sc->sc_mem == 0) { 225 bus_dma_segment_t seg; 226 int rseg, error; 227 228 #ifndef BUS_DMA_24BIT 229 /* XXX - This flag is not defined on all archs */ 230 #define BUS_DMA_24BIT 0 231 #endif 232 /* Get a DMA handle */ 233 if ((error = bus_dmamap_create(dmatag, MEMSIZE, 1, MEMSIZE, 0, 234 BUS_DMA_NOWAIT|BUS_DMA_24BIT, 235 &lesc->sc_dmamap)) != 0) { 236 printf("%s: DMA map create error %d\n", 237 self->dv_xname, error); 238 return; 239 } 240 241 /* Allocate DMA buffer */ 242 if ((error = bus_dmamem_alloc(dmatag, MEMSIZE, 0, 0, 243 &seg, 1, &rseg, 244 BUS_DMA_NOWAIT|BUS_DMA_24BIT)) != 0){ 245 printf("%s: DMA buffer allocation error %d\n", 246 self->dv_xname, error); 247 return; 248 } 249 250 /* Map DMA buffer into kernel space */ 251 if ((error = bus_dmamem_map(dmatag, &seg, rseg, MEMSIZE, 252 (caddr_t *)&sc->sc_mem, 253 BUS_DMA_NOWAIT|BUS_DMA_COHERENT)) != 0) { 254 printf("%s: DMA buffer map error %d\n", 255 self->dv_xname, error); 256 bus_dmamem_free(lesc->sc_dmatag, &seg, rseg); 257 return; 258 } 259 260 /* Load DMA buffer */ 261 if ((error = bus_dmamap_load(dmatag, lesc->sc_dmamap, sc->sc_mem, 262 MEMSIZE, NULL, BUS_DMA_NOWAIT|BUS_DMA_COHERENT)) != 0) { 263 printf("%s: DMA buffer map load error %d\n", 264 self->dv_xname, error); 265 bus_dmamem_free(dmatag, &seg, rseg); 266 bus_dmamem_unmap(dmatag, sc->sc_mem, MEMSIZE); 267 return; 268 } 269 270 sc->sc_addr = lesc->sc_dmamap->dm_segs[0].ds_addr & 0xffffff; 271 sc->sc_memsize = MEMSIZE; 272 sc->sc_conf3 = LE_C3_BSWP | LE_C3_ACON | LE_C3_BCON; 273 } 274 275 myetheraddr(sc->sc_enaddr); 276 277 sc->sc_supmedia = lemedia; 278 sc->sc_nsupmedia = NLEMEDIA; 279 sc->sc_defaultmedia = lemedia[0]; 280 281 sc->sc_copytodesc = lance_copytobuf_contig; 282 sc->sc_copyfromdesc = lance_copyfrombuf_contig; 283 sc->sc_copytobuf = lance_copytobuf_contig; 284 sc->sc_copyfrombuf = lance_copyfrombuf_contig; 285 sc->sc_zerobuf = lance_zerobuf_contig; 286 287 sc->sc_rdcsr = lerdcsr; 288 sc->sc_wrcsr = lewrcsr; 289 290 am7990_config(&lesc->sc_am7990); 291 292 /* Establish interrupt handler */ 293 if (sa->sa_nintr != 0) 294 (void)bus_intr_establish(lesc->sc_bustag, sa->sa_pri, 295 IPL_NET, 0, am7990_intr, sc); 296 } 297