1 /* $NetBSD: if_sn_obio.c,v 1.21 2002/10/02 05:36:39 thorpej Exp $ */ 2 3 /* 4 * Copyright (C) 1997 Allen Briggs 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. All advertising materials mentioning features or use of this software 16 * must display the following acknowledgement: 17 * This product includes software developed by Allen Briggs 18 * 4. The name of the author may not be used to endorse or promote products 19 * derived from this software without specific prior written permission. 20 * 21 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 22 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 23 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 24 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 25 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 26 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 27 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 28 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 29 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 30 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 31 */ 32 33 #include "opt_inet.h" 34 35 #include <sys/param.h> 36 #include <sys/device.h> 37 #include <sys/errno.h> 38 #include <sys/ioctl.h> 39 #include <sys/socket.h> 40 #include <sys/syslog.h> 41 #include <sys/systm.h> 42 43 #include <net/if.h> 44 #include <net/if_ether.h> 45 46 #if 0 /* XXX this shouldn't be necessary... else reinsert */ 47 #ifdef INET 48 #include <netinet/in.h> 49 #include <netinet/if_ether.h> 50 #endif 51 #endif 52 53 #include <machine/bus.h> 54 #include <machine/cpu.h> 55 #include <machine/viareg.h> 56 57 #include <mac68k/obio/obiovar.h> 58 #include <mac68k/dev/if_snreg.h> 59 #include <mac68k/dev/if_snvar.h> 60 61 #define SONIC_REG_BASE 0x50F0A000 62 #define SONIC_PROM_BASE 0x50F08000 63 64 static int sn_obio_match __P((struct device *, struct cfdata *, void *)); 65 static void sn_obio_attach __P((struct device *, struct device *, void *)); 66 static int sn_obio_getaddr __P((struct sn_softc *, u_int8_t *)); 67 static int sn_obio_getaddr_kludge __P((struct sn_softc *, u_int8_t *)); 68 69 CFATTACH_DECL(sn_obio, sizeof(struct sn_softc), 70 sn_obio_match, sn_obio_attach, NULL, NULL); 71 72 static int 73 sn_obio_match(parent, cf, aux) 74 struct device *parent; 75 struct cfdata *cf; 76 void *aux; 77 { 78 struct obio_attach_args *oa = (struct obio_attach_args *)aux; 79 bus_space_handle_t bsh; 80 int found = 0; 81 82 if (!mac68k_machine.sonic) 83 return 0; 84 85 if (bus_space_map(oa->oa_tag, 86 SONIC_REG_BASE, SN_REGSIZE, 0, &bsh)) 87 return 0; 88 89 if (mac68k_bus_space_probe(oa->oa_tag, bsh, 0, 4)) 90 found = 1; 91 92 bus_space_unmap(oa->oa_tag, bsh, SN_REGSIZE); 93 94 return found; 95 } 96 97 /* 98 * Install interface into kernel networking data structures 99 */ 100 static void 101 sn_obio_attach(parent, self, aux) 102 struct device *parent, *self; 103 void *aux; 104 { 105 struct obio_attach_args *oa = (struct obio_attach_args *)aux; 106 struct sn_softc *sc = (void *)self; 107 u_int8_t myaddr[ETHER_ADDR_LEN]; 108 int i; 109 110 sc->snr_dcr = DCR_WAIT0 | DCR_DMABLOCK | DCR_RFT16 | DCR_TFT16; 111 sc->snr_dcr2 = 0; 112 113 sc->slotno = 9; 114 115 switch (current_mac_model->machineid) { 116 case MACH_MACC610: 117 case MACH_MACC650: 118 case MACH_MACQ610: 119 case MACH_MACQ650: 120 case MACH_MACQ700: 121 case MACH_MACQ800: 122 case MACH_MACQ900: 123 case MACH_MACQ950: 124 sc->snr_dcr |= DCR_EXBUS; 125 sc->bitmode = 1; 126 break; 127 128 case MACH_MACLC575: 129 case MACH_MACP580: 130 case MACH_MACQ630: 131 break; 132 133 case MACH_MACPB500: 134 sc->snr_dcr |= DCR_SYNC | DCR_LBR; 135 sc->bitmode = 0; /* 16 bit interface */ 136 break; 137 138 default: 139 printf(": unsupported machine type\n"); 140 return; 141 } 142 143 sc->sc_regt = oa->oa_tag; 144 145 if (bus_space_map(sc->sc_regt, 146 SONIC_REG_BASE, SN_REGSIZE, 0, &sc->sc_regh)) { 147 printf(": failed to map space for SONIC regs.\n"); 148 return; 149 } 150 151 /* regs are addressed as words, big-endian. */ 152 for (i = 0; i < SN_NREGS; i++) { 153 sc->sc_reg_map[i] = (bus_size_t)((i * 4) + 2); 154 } 155 156 /* 157 * Kind of kludge this. Comm-slot cards do not really 158 * have a visible type, as far as I can tell at this time, 159 * so assume that MacOS had it properly configured and use 160 * that configuration. 161 */ 162 switch (current_mac_model->machineid) { 163 case MACH_MACLC575: 164 case MACH_MACP580: 165 case MACH_MACQ630: 166 NIC_PUT(sc, SNR_CR, CR_RST); wbflush(); 167 i = NIC_GET(sc, SNR_DCR); 168 sc->snr_dcr |= (i & 0xfff0); 169 sc->bitmode = (i & DCR_DW) ? 1 : 0; 170 break; 171 default: 172 break; 173 } 174 175 if (sn_obio_getaddr(sc, myaddr) && 176 sn_obio_getaddr_kludge(sc, myaddr)) { /* XXX kludge for PB */ 177 printf(": failed to get MAC address.\n"); 178 bus_space_unmap(sc->sc_regt, sc->sc_regh, SN_REGSIZE); 179 return; 180 } 181 182 printf(": integrated Ethernet adapter\n"); 183 184 /* snsetup returns 1 if something fails */ 185 if (snsetup(sc, myaddr)) { 186 bus_space_unmap(sc->sc_regt, sc->sc_regh, SN_REGSIZE); 187 return; 188 } 189 190 if (mac68k_machine.aux_interrupts) { 191 intr_establish((int (*)(void *))snintr, (void *)sc, 3); 192 } else { 193 add_nubus_intr(sc->slotno, snintr, (void *)sc); 194 } 195 } 196 197 static int 198 sn_obio_getaddr(sc, lladdr) 199 struct sn_softc *sc; 200 u_int8_t *lladdr; 201 { 202 bus_space_handle_t bsh; 203 204 if (bus_space_map(sc->sc_regt, SONIC_PROM_BASE, NBPG, 0, &bsh)) { 205 printf(": failed to map space to read SONIC address.\n%s", 206 sc->sc_dev.dv_xname); 207 return (-1); 208 } 209 210 if (!mac68k_bus_space_probe(sc->sc_regt, bsh, 0, 1)) { 211 bus_space_unmap(sc->sc_regt, bsh, NBPG); 212 return (-1); 213 } 214 215 sn_get_enaddr(sc->sc_regt, bsh, 0, lladdr); 216 217 bus_space_unmap(sc->sc_regt, bsh, NBPG); 218 219 return 0; 220 } 221 222 /* 223 * Assume that the SONIC was initialized in MacOS. This should go away 224 * when we can properly get the MAC address on the PBs. 225 */ 226 static int 227 sn_obio_getaddr_kludge(sc, lladdr) 228 struct sn_softc *sc; 229 u_int8_t *lladdr; 230 { 231 int i, ors = 0; 232 233 /* Shut down NIC */ 234 NIC_PUT(sc, SNR_CR, CR_RST); 235 wbflush(); 236 237 NIC_PUT(sc, SNR_CEP, 15); /* For some reason, Apple fills top first. */ 238 wbflush(); 239 i = NIC_GET(sc, SNR_CAP2); 240 wbflush(); 241 242 ors |= i; 243 lladdr[5] = i >> 8; 244 lladdr[4] = i; 245 246 i = NIC_GET(sc, SNR_CAP1); 247 wbflush(); 248 249 ors |= i; 250 lladdr[3] = i >> 8; 251 lladdr[2] = i; 252 253 i = NIC_GET(sc, SNR_CAP0); 254 wbflush(); 255 256 ors |= i; 257 lladdr[1] = i >> 8; 258 lladdr[0] = i; 259 260 NIC_PUT(sc, SNR_CR, 0); 261 wbflush(); 262 263 if (ors == 0) 264 return -1; 265 266 return 0; 267 } 268