1 /* $NetBSD: if_le.c,v 1.40 2010/01/19 22:07:43 pooka 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 * 20 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 21 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 22 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 23 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 24 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 25 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 26 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 27 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 28 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 29 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 30 * POSSIBILITY OF SUCH DAMAGE. 31 */ 32 33 #include <sys/cdefs.h> 34 __KERNEL_RCSID(0, "$NetBSD: if_le.c,v 1.40 2010/01/19 22:07:43 pooka Exp $"); 35 36 #include "opt_inet.h" 37 38 #include <sys/param.h> 39 #include <sys/systm.h> 40 #include <sys/mbuf.h> 41 #include <sys/syslog.h> 42 #include <sys/socket.h> 43 #include <sys/device.h> 44 #include <sys/malloc.h> 45 46 #include <net/if.h> 47 #include <net/if_ether.h> 48 #include <net/if_media.h> 49 50 #include <sys/bus.h> 51 #include <sys/intr.h> 52 #include <machine/autoconf.h> 53 54 #include <dev/sbus/sbusvar.h> 55 #include <dev/sbus/lebuffervar.h> /*XXX*/ 56 57 #include <dev/ic/lancereg.h> 58 #include <dev/ic/lancevar.h> 59 #include <dev/ic/am7990reg.h> 60 #include <dev/ic/am7990var.h> 61 62 #include "ioconf.h" 63 64 /* 65 * LANCE registers. 66 */ 67 #define LEREG1_RDP 0 /* Register Data port */ 68 #define LEREG1_RAP 2 /* Register Address port */ 69 70 struct le_softc { 71 struct am7990_softc sc_am7990; /* glue to MI code */ 72 bus_space_tag_t sc_bustag; 73 bus_dma_tag_t sc_dmatag; 74 bus_dmamap_t sc_dmamap; 75 bus_space_handle_t sc_reg; 76 }; 77 78 #define MEMSIZE 0x4000 /* LANCE memory size */ 79 80 int lematch_sbus(device_t, cfdata_t, void *); 81 void leattach_sbus(device_t, device_t, void *); 82 83 /* 84 * Media types supported. 85 */ 86 static int lemedia[] = { 87 IFM_ETHER|IFM_10_5, 88 }; 89 #define NLEMEDIA __arraycount(lemedia) 90 91 CFATTACH_DECL_NEW(le_sbus, sizeof(struct le_softc), 92 lematch_sbus, leattach_sbus, NULL, NULL); 93 94 #if defined(_KERNEL_OPT) 95 #include "opt_ddb.h" 96 #endif 97 98 static void lewrcsr(struct lance_softc *, uint16_t, uint16_t); 99 static uint16_t lerdcsr(struct lance_softc *, uint16_t); 100 101 static void 102 lewrcsr(struct lance_softc *sc, uint16_t port, uint16_t val) 103 { 104 struct le_softc *lesc = (struct le_softc *)sc; 105 bus_space_tag_t t = lesc->sc_bustag; 106 bus_space_handle_t h = lesc->sc_reg; 107 108 bus_space_write_2(t, h, LEREG1_RAP, port); 109 bus_space_write_2(t, h, LEREG1_RDP, val); 110 111 #if defined(SUN4M) 112 /* 113 * We need to flush the Sbus->Mbus write buffers. This can most 114 * easily be accomplished by reading back the register that we 115 * just wrote (thanks to Chris Torek for this solution). 116 */ 117 (void)bus_space_read_2(t, h, LEREG1_RDP); 118 #endif 119 } 120 121 static uint16_t 122 lerdcsr(struct lance_softc *sc, uint16_t port) 123 { 124 struct le_softc *lesc = (struct le_softc *)sc; 125 bus_space_tag_t t = lesc->sc_bustag; 126 bus_space_handle_t h = lesc->sc_reg; 127 128 bus_space_write_2(t, h, LEREG1_RAP, port); 129 return (bus_space_read_2(t, h, LEREG1_RDP)); 130 } 131 132 133 int 134 lematch_sbus(device_t parent, cfdata_t cf, void *aux) 135 { 136 struct sbus_attach_args *sa = aux; 137 138 return (strcmp(cf->cf_name, sa->sa_name) == 0); 139 } 140 141 void 142 leattach_sbus(device_t parent, device_t self, void *aux) 143 { 144 struct le_softc *lesc = device_private(self); 145 struct lance_softc *sc = &lesc->sc_am7990.lsc; 146 struct sbus_attach_args *sa = aux; 147 bus_dma_tag_t dmatag; 148 cfdriver_t lebufcd; 149 150 sc->sc_dev = self; 151 lesc->sc_bustag = sa->sa_bustag; 152 lesc->sc_dmatag = dmatag = sa->sa_dmatag; 153 154 if (sbus_bus_map(sa->sa_bustag, 155 sa->sa_slot, 156 sa->sa_offset, 157 sa->sa_size, 158 0, &lesc->sc_reg) != 0) { 159 aprint_error(": cannot map registers\n"); 160 return; 161 } 162 163 /* 164 * Look for an "unallocated" lebuffer and pair it with 165 * this `le' device on the assumption that we're on 166 * a pre-historic ROM that doesn't establish le<=>lebuffer 167 * parent-child relationships. 168 */ 169 lebufcd = config_cfdriver_lookup("lebuffer"); 170 if (lebufcd != NULL) { 171 int unit; 172 173 /* Check all possible lebuffer units */ 174 for (unit = 0; unit < lebufcd->cd_ndevs; unit++) { 175 device_t lebufdev; 176 struct lebuf_softc *lebufsc; 177 178 /* Check if unit is valid */ 179 lebufdev = device_lookup(lebufcd, unit); 180 if (lebufdev == NULL) 181 continue; 182 183 /* Check if we have a common sbus parent */ 184 if (parent != device_parent(lebufdev)) 185 continue; 186 lebufsc = device_private(lebufdev); 187 188 /* 189 * Check if this lebuffer unit is attached 190 * but unused by its child, if_le_lebuffer. 191 * XXX: this won't work if lebuffer is configured 192 * but not le at lebuffer? 193 */ 194 if (lebufsc->sc_buffer == 0 || lebufsc->attached != 0) 195 continue; 196 197 /* Assume this lebuffer is my pair */ 198 sc->sc_mem = lebufsc->sc_buffer; 199 sc->sc_memsize = lebufsc->sc_bufsiz; 200 201 /* Lance view is offset by buffer location */ 202 sc->sc_addr = 0; 203 204 /* Denote it */ 205 aprint_normal(" (%s)", device_xname(lebufdev)); 206 lebufsc->attached = 1; 207 208 /* That old black magic... */ 209 sc->sc_conf3 = prom_getpropint(sa->sa_node, 210 "busmaster-regval", 211 LE_C3_BSWP | LE_C3_ACON | LE_C3_BCON); 212 break; 213 } 214 } 215 216 if (sc->sc_mem == 0) { 217 bus_dma_segment_t seg; 218 int rseg, error; 219 220 #ifndef BUS_DMA_24BIT 221 /* XXX - This flag is not defined on all archs */ 222 #define BUS_DMA_24BIT 0 223 #endif 224 /* Get a DMA handle */ 225 if ((error = bus_dmamap_create(dmatag, MEMSIZE, 1, MEMSIZE, 0, 226 BUS_DMA_NOWAIT|BUS_DMA_24BIT, 227 &lesc->sc_dmamap)) != 0) { 228 aprint_error(": DMA map create error %d\n", error); 229 return; 230 } 231 232 /* Allocate DMA buffer */ 233 if ((error = bus_dmamem_alloc(dmatag, MEMSIZE, 0, 0, 234 &seg, 1, &rseg, 235 BUS_DMA_NOWAIT|BUS_DMA_24BIT)) != 0){ 236 aprint_error(": DMA buffer allocation error %d\n", 237 error); 238 return; 239 } 240 241 /* Map DMA buffer into kernel space */ 242 if ((error = bus_dmamem_map(dmatag, &seg, rseg, MEMSIZE, 243 (void **)&sc->sc_mem, 244 BUS_DMA_NOWAIT|BUS_DMA_COHERENT)) != 0) { 245 aprint_error(": DMA buffer map error %d\n", error); 246 bus_dmamem_free(lesc->sc_dmatag, &seg, rseg); 247 return; 248 } 249 250 /* Load DMA buffer */ 251 if ((error = bus_dmamap_load(dmatag, lesc->sc_dmamap, 252 sc->sc_mem, MEMSIZE, NULL, BUS_DMA_NOWAIT)) != 0) { 253 aprint_error(": DMA buffer map load error %d\n", error); 254 bus_dmamem_free(dmatag, &seg, rseg); 255 bus_dmamem_unmap(dmatag, sc->sc_mem, MEMSIZE); 256 return; 257 } 258 259 sc->sc_addr = lesc->sc_dmamap->dm_segs[0].ds_addr & 0xffffff; 260 sc->sc_memsize = MEMSIZE; 261 sc->sc_conf3 = LE_C3_BSWP | LE_C3_ACON | LE_C3_BCON; 262 } 263 264 prom_getether(sa->sa_node, sc->sc_enaddr); 265 266 sc->sc_supmedia = lemedia; 267 sc->sc_nsupmedia = NLEMEDIA; 268 sc->sc_defaultmedia = lemedia[0]; 269 270 sc->sc_copytodesc = lance_copytobuf_contig; 271 sc->sc_copyfromdesc = lance_copyfrombuf_contig; 272 sc->sc_copytobuf = lance_copytobuf_contig; 273 sc->sc_copyfrombuf = lance_copyfrombuf_contig; 274 sc->sc_zerobuf = lance_zerobuf_contig; 275 276 sc->sc_rdcsr = lerdcsr; 277 sc->sc_wrcsr = lewrcsr; 278 279 am7990_config(&lesc->sc_am7990); 280 281 /* Establish interrupt handler */ 282 if (sa->sa_nintr != 0) 283 (void)bus_intr_establish(lesc->sc_bustag, sa->sa_pri, 284 IPL_NET, am7990_intr, sc); 285 } 286