1 /* $NetBSD: le_elb.c,v 1.7 2008/04/04 12:25:06 tsutsui Exp $ */ 2 3 /*- 4 * Copyright (c) 2003 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Juergen Hannken-Illjes. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 3. All advertising materials mentioning features or use of this software 19 * must display the following acknowledgement: 20 * This product includes software developed by the NetBSD 21 * Foundation, Inc. and its contributors. 22 * 4. Neither the name of The NetBSD Foundation nor the names of its 23 * contributors may be used to endorse or promote products derived 24 * from this software without specific prior written permission. 25 * 26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 36 * POSSIBILITY OF SUCH DAMAGE. 37 */ 38 39 #include <sys/cdefs.h> 40 __KERNEL_RCSID(0, "$NetBSD: le_elb.c,v 1.7 2008/04/04 12:25:06 tsutsui Exp $"); 41 42 #include <sys/param.h> 43 #include <sys/conf.h> 44 #include <sys/device.h> 45 #include <sys/systm.h> 46 47 #include <uvm/uvm_extern.h> 48 49 #include <machine/bus.h> 50 51 #include <net/if.h> 52 #include <net/if_ether.h> 53 #include <net/if_media.h> 54 55 #include <dev/ic/lancereg.h> 56 #include <dev/ic/lancevar.h> 57 #include <dev/ic/am79900reg.h> 58 #include <dev/ic/am79900var.h> 59 60 #include <evbppc/explora/dev/elbvar.h> 61 62 #define LE_MEMSIZE 16384 63 #define LE_RDP 0x10 /* Indirect data register. */ 64 #define LE_RAP 0x14 /* Indirect address register. */ 65 #define LE_NPORTS 32 66 67 struct le_elb_softc { 68 struct am79900_softc sc_am79900; 69 bus_dma_tag_t sc_dmat; 70 bus_dmamap_t sc_dmam; 71 bus_space_tag_t sc_iot; 72 bus_space_handle_t sc_ioh; 73 void *sc_ih; 74 }; 75 76 static int le_elb_probe(device_t, cfdata_t, void *); 77 static void le_elb_attach(device_t, device_t, void *); 78 static uint16_t le_rdcsr(struct lance_softc *, uint16_t); 79 static void le_wrcsr(struct lance_softc *, uint16_t, uint16_t); 80 static void le_copytodesc(struct lance_softc *, void *, int, int); 81 static void le_copyfromdesc(struct lance_softc *, void *, int, int); 82 static void le_copytobuf(struct lance_softc *, void *, int, int); 83 static void le_copyfrombuf(struct lance_softc *, void *, int, int); 84 static void le_zerobuf(struct lance_softc *, int, int); 85 86 CFATTACH_DECL_NEW(le_elb, sizeof(struct le_elb_softc), 87 le_elb_probe, le_elb_attach, NULL, NULL); 88 89 int 90 le_elb_probe(device_t parent, cfdata_t cf, void *aux) 91 { 92 struct elb_attach_args *oaa = aux; 93 94 if (strcmp(oaa->elb_name, cf->cf_name) != 0) 95 return 0; 96 97 return (1); 98 } 99 100 void 101 le_elb_attach(device_t parent, device_t self, void *aux) 102 { 103 struct le_elb_softc *msc = device_private(self); 104 struct lance_softc *sc = &msc->sc_am79900.lsc; 105 struct elb_attach_args *eaa = aux; 106 bus_dma_segment_t seg; 107 int i, rseg; 108 109 sc->sc_dev = self; 110 aprint_normal("\n"); 111 112 if (booted_device == NULL) /*XXX*/ 113 booted_device = self; 114 115 msc->sc_iot = eaa->elb_bt; 116 msc->sc_dmat = eaa->elb_dmat; 117 118 bus_space_map(msc->sc_iot, eaa->elb_base, LE_NPORTS, 0, &msc->sc_ioh); 119 120 /* 121 * Allocate a DMA area for the card. 122 */ 123 if (bus_dmamem_alloc(msc->sc_dmat, LE_MEMSIZE, PAGE_SIZE, 0, 124 &seg, 1, &rseg, BUS_DMA_NOWAIT)) { 125 aprint_error_dev(self, "couldn't allocate memory for card\n"); 126 return; 127 } 128 if (bus_dmamem_map(msc->sc_dmat, &seg, rseg, LE_MEMSIZE, 129 (void **)&sc->sc_mem, 130 BUS_DMA_NOWAIT|BUS_DMA_COHERENT)) { 131 aprint_error_dev(self, "couldn't map memory for card\n"); 132 return; 133 } 134 135 /* 136 * Create and load the DMA map for the DMA area. 137 */ 138 if (bus_dmamap_create(msc->sc_dmat, LE_MEMSIZE, 1, 139 LE_MEMSIZE, 0, BUS_DMA_NOWAIT, &msc->sc_dmam)) { 140 aprint_error_dev(self, "couldn't create DMA map\n"); 141 bus_dmamem_free(msc->sc_dmat, &seg, rseg); 142 return; 143 } 144 if (bus_dmamap_load(msc->sc_dmat, msc->sc_dmam, 145 sc->sc_mem, LE_MEMSIZE, NULL, BUS_DMA_NOWAIT)) { 146 aprint_error_dev(self, "coundn't load DMA map\n"); 147 bus_dmamem_free(msc->sc_dmat, &seg, rseg); 148 return; 149 } 150 151 /* 152 * This is magic -- DMA doesn't work without address 153 * bit 30 set to one. 154 */ 155 sc->sc_addr = 0x40000000 | msc->sc_dmam->dm_segs[0].ds_addr; 156 sc->sc_memsize = LE_MEMSIZE; 157 158 sc->sc_copytodesc = le_copytodesc; 159 sc->sc_copyfromdesc = le_copyfromdesc; 160 sc->sc_copytobuf = le_copytobuf; 161 sc->sc_copyfrombuf = le_copyfrombuf; 162 sc->sc_zerobuf = le_zerobuf; 163 164 sc->sc_rdcsr = le_rdcsr; 165 sc->sc_wrcsr = le_wrcsr; 166 167 aprint_normal("%s", device_xname(self)); 168 169 /* Save the MAC address. */ 170 for (i = 0; i < 3; i++) { 171 sc->sc_enaddr[i * 2] = le_rdcsr(sc, 12 + i); 172 sc->sc_enaddr[i * 2 + 1] = le_rdcsr(sc, 12 + i) >> 8; 173 } 174 175 am79900_config(&msc->sc_am79900); 176 177 /* Chip is stopped. Set "software style" to 32-bit. */ 178 le_wrcsr(sc, LE_CSR58, 2); 179 180 intr_establish(eaa->elb_irq, IST_LEVEL, IPL_NET, am79900_intr, sc); 181 } 182 183 /* 184 * Read from an indirect CSR. 185 */ 186 static uint16_t 187 le_rdcsr(struct lance_softc *sc, uint16_t reg) 188 { 189 struct le_elb_softc *lesc = (struct le_elb_softc *)sc; 190 bus_space_tag_t iot = lesc->sc_iot; 191 bus_space_handle_t ioh = lesc->sc_ioh; 192 uint16_t val; 193 194 bus_space_write_4(iot, ioh, LE_RAP, reg); 195 val = bus_space_read_4(iot, ioh, LE_RDP); 196 197 return val; 198 } 199 200 /* 201 * Write to an indirect CSR. 202 */ 203 static void 204 le_wrcsr(struct lance_softc *sc, uint16_t reg, uint16_t val) 205 { 206 struct le_elb_softc *lesc = (struct le_elb_softc *)sc; 207 bus_space_tag_t iot = lesc->sc_iot; 208 bus_space_handle_t ioh = lesc->sc_ioh; 209 210 bus_space_write_4(iot, ioh, LE_RAP, reg); 211 bus_space_write_4(iot, ioh, LE_RDP, val); 212 } 213 214 /* 215 * Copy data to memory and swap bytes. 216 */ 217 static void 218 le_copytodesc(struct lance_softc *sc, void *from, int boff, int len) 219 { 220 struct le_elb_softc *msc = (struct le_elb_softc *)sc; 221 volatile uint32_t *src = from; 222 volatile uint32_t *dst = (uint32_t *)((uint8_t *)sc->sc_mem + boff); 223 int todo = len; 224 225 /* XXX lance_setladrf should be modified to use u_int32_t instead. 226 * The init block contains u_int16_t values that require 227 * special swapping. 228 */ 229 if (boff == LE_INITADDR(sc) && len == sizeof(struct leinit)) { 230 src[3] = (src[3] >> 16) | (src[3] << 16); 231 src[4] = (src[4] >> 16) | (src[4] << 16); 232 } 233 234 todo /= sizeof(uint32_t); 235 while (todo-- > 0) 236 *dst++ = bswap32(*src++); 237 238 bus_dmamap_sync(msc->sc_dmat, msc->sc_dmam, boff, len, 239 BUS_DMASYNC_PREWRITE); 240 } 241 242 /* 243 * Copy data from memory and swap bytes. 244 */ 245 static void 246 le_copyfromdesc(struct lance_softc *sc, void *to, int boff, int len) 247 { 248 struct le_elb_softc *msc = (struct le_elb_softc *)sc; 249 volatile uint32_t *src = (uint32_t *)((uint8_t *)sc->sc_mem + boff); 250 volatile uint32_t *dst = to; 251 252 bus_dmamap_sync(msc->sc_dmat, msc->sc_dmam, boff, len, 253 BUS_DMASYNC_POSTREAD|BUS_DMASYNC_POSTWRITE); 254 255 len /= sizeof(uint32_t); 256 while (len-- > 0) 257 *dst++ = bswap32(*src++); 258 } 259 260 /* 261 * Copy data to memory. 262 */ 263 static void 264 le_copytobuf(struct lance_softc *sc, void *from, int boff, int len) 265 { 266 struct le_elb_softc *msc = (struct le_elb_softc *)sc; 267 volatile void *buf = (void *)((uint8_t *)sc->sc_mem + boff); 268 269 memcpy(__UNVOLATILE(buf), from, len); 270 271 bus_dmamap_sync(msc->sc_dmat, msc->sc_dmam, boff, len, 272 BUS_DMASYNC_PREWRITE); 273 } 274 275 /* 276 * Copy data from memory. 277 */ 278 static void 279 le_copyfrombuf(struct lance_softc *sc, void *to, int boff, int len) 280 { 281 struct le_elb_softc *msc = (struct le_elb_softc *)sc; 282 volatile void *buf = (void *)((uint8_t *)sc->sc_mem + boff); 283 284 bus_dmamap_sync(msc->sc_dmat, msc->sc_dmam, boff, len, 285 BUS_DMASYNC_POSTREAD|BUS_DMASYNC_POSTWRITE); 286 287 memcpy(to, __UNVOLATILE(buf), len); 288 } 289 290 /* 291 * Zero memory. 292 */ 293 static void 294 le_zerobuf(struct lance_softc *sc, int boff, int len) 295 { 296 struct le_elb_softc *msc = (struct le_elb_softc *)sc; 297 volatile void *buf = (void *)((uint8_t *)sc->sc_mem + boff); 298 299 memset(__UNVOLATILE(buf), 0, len); 300 301 bus_dmamap_sync(msc->sc_dmat, msc->sc_dmam, boff, len, 302 BUS_DMASYNC_PREWRITE); 303 } 304