Home | History | Annotate | Line # | Download | only in dev
le_elb.c revision 1.7
      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