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