Home | History | Annotate | Line # | Download | only in if
if_le.c revision 1.35
      1 /*	$NetBSD: if_le.c,v 1.35 2009/10/26 19:16:58 cegger 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 and by Jason R. Thorpe of the Numerical Aerospace
      9  * Simulation Facility, NASA Ames Research Center.
     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 /*-
     34  * Copyright (c) 1992, 1993
     35  *	The Regents of the University of California.  All rights reserved.
     36  *
     37  * This code is derived from software contributed to Berkeley by
     38  * Ralph Campbell and Rick Macklem.
     39  *
     40  * Redistribution and use in source and binary forms, with or without
     41  * modification, are permitted provided that the following conditions
     42  * are met:
     43  * 1. Redistributions of source code must retain the above copyright
     44  *    notice, this list of conditions and the following disclaimer.
     45  * 2. Redistributions in binary form must reproduce the above copyright
     46  *    notice, this list of conditions and the following disclaimer in the
     47  *    documentation and/or other materials provided with the distribution.
     48  * 3. Neither the name of the University nor the names of its contributors
     49  *    may be used to endorse or promote products derived from this software
     50  *    without specific prior written permission.
     51  *
     52  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     53  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     54  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     55  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     56  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     57  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     58  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     59  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     60  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     61  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     62  * SUCH DAMAGE.
     63  *
     64  *	@(#)if_le.c	8.2 (Berkeley) 11/16/93
     65  */
     66 
     67 #include <sys/cdefs.h>
     68 __KERNEL_RCSID(0, "$NetBSD: if_le.c,v 1.35 2009/10/26 19:16:58 cegger Exp $");
     69 
     70 #include "opt_inet.h"
     71 #include "bpfilter.h"
     72 
     73 #include <sys/param.h>
     74 #include <sys/syslog.h>
     75 #include <sys/socket.h>
     76 #include <sys/device.h>
     77 #include <sys/reboot.h>
     78 
     79 #include <uvm/uvm_extern.h>
     80 
     81 #include <net/if.h>
     82 #include <net/if_ether.h>
     83 #include <net/if_media.h>
     84 
     85 #ifdef INET
     86 #include <netinet/in.h>
     87 #include <netinet/if_inarp.h>
     88 #endif
     89 
     90 #include <machine/cpu.h>
     91 #include <machine/nexus.h>
     92 #include <machine/scb.h>
     93 #include <machine/mainbus.h>
     94 
     95 #include <dev/ic/lancereg.h>
     96 #include <dev/ic/lancevar.h>
     97 #include <dev/ic/am7990reg.h>
     98 #include <dev/ic/am7990var.h>
     99 
    100 #include "ioconf.h"
    101 
    102 #define	LE_VEC	0xd4	/* Interrupt vector on 3300/3400 */
    103 
    104 #define	LE_CSR	0x20084400
    105 #define	LE_ROM	0x20084200
    106 #define	LE_RAM	0x20120000
    107 
    108 struct le_softc {
    109 	struct	am7990_softc sc_am7990; /* Must be first */
    110 	struct	evcnt sc_intrcnt;
    111 	volatile uint16_t *sc_rap;
    112 	volatile uint16_t *sc_rdp;
    113 };
    114 
    115 static int	le_mainbus_match(device_t, cfdata_t, void *);
    116 static void	le_mainbus_attach(device_t, device_t, void *);
    117 static void	lewrcsr(struct lance_softc *, uint16_t, uint16_t);
    118 static uint16_t lerdcsr(struct lance_softc *, uint16_t);
    119 static void	lance_copytobuf_gap2(struct lance_softc *, void *, int, int);
    120 static void	lance_copyfrombuf_gap2(struct lance_softc *, void *, int, int);
    121 static void	lance_zerobuf_gap2(struct lance_softc *, int, int);
    122 
    123 CFATTACH_DECL_NEW(le_mainbus, sizeof(struct le_softc),
    124     le_mainbus_match, le_mainbus_attach, NULL, NULL);
    125 
    126 void
    127 lewrcsr(struct lance_softc *ls, uint16_t port, uint16_t val)
    128 {
    129 	struct le_softc * const sc = (void *)ls;
    130 
    131 	*sc->sc_rap = port;
    132 	*sc->sc_rdp = val;
    133 }
    134 
    135 uint16_t
    136 lerdcsr(struct lance_softc *ls, uint16_t port)
    137 {
    138 	struct le_softc * const sc = (void *)ls;
    139 
    140 	*sc->sc_rap = port;
    141 	return *sc->sc_rdp;
    142 }
    143 
    144 int
    145 le_mainbus_match(device_t parent, cfdata_t cf, void *aux)
    146 {
    147 	struct mainbus_attach_args * const ma = aux;
    148 	int found;
    149 	vaddr_t va;
    150 
    151 	if (strcmp("lance", ma->ma_type))
    152 		return 0;
    153 
    154 	va = vax_map_physmem(LE_CSR, 1);
    155 	found = (badaddr((void *)va, 2) == 0);
    156 	vax_unmap_physmem(va, 1);
    157 
    158 	return found;
    159 }
    160 
    161 void
    162 le_mainbus_attach(device_t parent, device_t self, void *aux)
    163 {
    164 	struct le_softc * const sc = device_private(self);
    165 	int *lance_addr;
    166 	int i, vec, br;
    167 
    168 	sc->sc_am7990.lsc.sc_dev = self;
    169 	sc->sc_rdp = (uint16_t *)vax_map_physmem(LE_CSR, 1);
    170 	sc->sc_rap = sc->sc_rdp + 2;
    171 
    172 	/*
    173 	 * Set interrupt vector, by forcing an interrupt.
    174 	 */
    175 	scb_vecref(0, 0); /* Clear vector ref */
    176 	*sc->sc_rap = LE_CSR0;
    177 	*sc->sc_rdp = LE_C0_STOP;
    178 	DELAY(100);
    179 	*sc->sc_rdp = LE_C0_INIT|LE_C0_INEA;
    180 	DELAY(100000);
    181 	i = scb_vecref(&vec, &br);
    182 	if (i == 0 || vec == 0)
    183 		return;
    184 
    185 	scb_vecalloc(vec, (void (*)(void *))am7990_intr, sc,
    186 		SCB_ISTACK, &sc->sc_intrcnt);
    187 	evcnt_attach_dynamic(&sc->sc_intrcnt, EVCNT_TYPE_INTR, NULL,
    188 		device_xname(self), "intr");
    189 
    190 	aprint_normal(": vec %o ipl %x\n%s", vec, br, device_xname(self));
    191 	/*
    192 	 * MD functions.
    193 	 */
    194 	sc->sc_am7990.lsc.sc_rdcsr = lerdcsr;
    195 	sc->sc_am7990.lsc.sc_wrcsr = lewrcsr;
    196 	sc->sc_am7990.lsc.sc_nocarrier = NULL;
    197 
    198 	sc->sc_am7990.lsc.sc_mem =
    199 	    (void *)uvm_km_alloc(kernel_map, (128 * 1024), 0, UVM_KMF_VAONLY);
    200 	if (sc->sc_am7990.lsc.sc_mem == 0)
    201 		return;
    202 
    203 	ioaccess((vaddr_t)sc->sc_am7990.lsc.sc_mem, LE_RAM,
    204 	    (128 * 1024) >> VAX_PGSHIFT);
    205 
    206 
    207 	sc->sc_am7990.lsc.sc_addr = 0;
    208 	sc->sc_am7990.lsc.sc_memsize = (64 * 1024);
    209 
    210 	sc->sc_am7990.lsc.sc_copytodesc = lance_copytobuf_gap2;
    211 	sc->sc_am7990.lsc.sc_copyfromdesc = lance_copyfrombuf_gap2;
    212 	sc->sc_am7990.lsc.sc_copytobuf = lance_copytobuf_gap2;
    213 	sc->sc_am7990.lsc.sc_copyfrombuf = lance_copyfrombuf_gap2;
    214 	sc->sc_am7990.lsc.sc_zerobuf = lance_zerobuf_gap2;
    215 
    216 	/*
    217 	 * Get the ethernet address out of rom
    218 	 */
    219 	lance_addr = (int *)vax_map_physmem(LE_ROM, 1);
    220 	for (i = 0; i < 6; i++)
    221 		sc->sc_am7990.lsc.sc_enaddr[i] = (u_char)lance_addr[i];
    222 	vax_unmap_physmem((vaddr_t)lance_addr, 1);
    223 
    224 	memcpy(sc->sc_am7990.lsc.sc_ethercom.ec_if.if_xname, device_xname(self),
    225 	    IFNAMSIZ);
    226 	am7990_config(&sc->sc_am7990);
    227 }
    228 
    229 /*
    230  * gap2: two bytes of data followed by two bytes of pad.
    231  *
    232  * Buffers must be 4-byte aligned.  The code doesn't worry about
    233  * doing an extra byte.
    234  */
    235 
    236 void
    237 lance_copytobuf_gap2(struct lance_softc *sc, void *fromv, int boff, int len)
    238 {
    239 	volatile void *buf = sc->sc_mem;
    240 	char *from = fromv;
    241 	volatile uint16_t *bptr;
    242 
    243 	if (boff & 0x1) {
    244 		/* handle unaligned first byte */
    245 		bptr = ((volatile uint16_t *)buf) + (boff - 1);
    246 		*bptr = (*from++ << 8) | (*bptr & 0xff);
    247 		bptr += 2;
    248 		len--;
    249 	} else
    250 		bptr = ((volatile uint16_t *)buf) + boff;
    251 	while (len > 1) {
    252 		*bptr = (from[1] << 8) | (from[0] & 0xff);
    253 		bptr += 2;
    254 		from += 2;
    255 		len -= 2;
    256 	}
    257 	if (len == 1)
    258 		*bptr = (uint16_t)*from;
    259 }
    260 
    261 void
    262 lance_copyfrombuf_gap2(struct lance_softc *sc, void *tov, int boff, int len)
    263 {
    264 	volatile void *buf = sc->sc_mem;
    265 	char *to = tov;
    266 	volatile uint16_t *bptr;
    267 	uint16_t tmp;
    268 
    269 	if (boff & 0x1) {
    270 		/* handle unaligned first byte */
    271 		bptr = ((volatile uint16_t *)buf) + (boff - 1);
    272 		*to++ = (*bptr >> 8) & 0xff;
    273 		bptr += 2;
    274 		len--;
    275 	} else
    276 		bptr = ((volatile uint16_t *)buf) + boff;
    277 	while (len > 1) {
    278 		tmp = *bptr;
    279 		*to++ = tmp & 0xff;
    280 		*to++ = (tmp >> 8) & 0xff;
    281 		bptr += 2;
    282 		len -= 2;
    283 	}
    284 	if (len == 1)
    285 		*to = *bptr & 0xff;
    286 }
    287 
    288 void
    289 lance_zerobuf_gap2(struct lance_softc *sc, int boff, int len)
    290 {
    291 	volatile void *buf = sc->sc_mem;
    292 	volatile uint16_t *bptr;
    293 
    294 	if ((unsigned int)boff & 0x1) {
    295 		bptr = ((volatile uint16_t *)buf) + (boff - 1);
    296 		*bptr &= 0xff;
    297 		bptr += 2;
    298 		len--;
    299 	} else
    300 		bptr = ((volatile uint16_t *)buf) + boff;
    301 	while (len > 0) {
    302 		*bptr = 0;
    303 		bptr += 2;
    304 		len -= 2;
    305 	}
    306 }
    307