1 /* $NetBSD: if_ate.c,v 1.39 2002/11/30 14:15:11 tsutsui Exp $ */ 2 3 /* 4 * All Rights Reserved, Copyright (C) Fujitsu Limited 1995 5 * 6 * This software may be used, modified, copied, distributed, and sold, in 7 * both source and binary form provided that the above copyright, these 8 * terms and the following disclaimer are retained. The name of the author 9 * and/or the contributor may not be used to endorse or promote products 10 * derived from this software without specific prior written permission. 11 * 12 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND THE CONTRIBUTOR ``AS IS'' AND 13 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 14 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 15 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR THE CONTRIBUTOR BE LIABLE 16 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 17 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 18 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION. 19 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 20 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 21 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 22 * SUCH DAMAGE. 23 */ 24 25 /* 26 * Portions copyright (C) 1993, David Greenman. This software may be used, 27 * modified, copied, distributed, and sold, in both source and binary form 28 * provided that the above copyright and these terms are retained. Under no 29 * circumstances is the author responsible for the proper functioning of this 30 * software, nor does the author assume any responsibility for damages 31 * incurred with its use. 32 */ 33 34 #include <sys/cdefs.h> 35 __KERNEL_RCSID(0, "$NetBSD: if_ate.c,v 1.39 2002/11/30 14:15:11 tsutsui Exp $"); 36 37 #include <sys/param.h> 38 #include <sys/systm.h> 39 #include <sys/device.h> 40 #include <sys/socket.h> 41 #include <sys/syslog.h> 42 43 #include <net/if.h> 44 #include <net/if_ether.h> 45 #include <net/if_media.h> 46 47 #include <machine/bus.h> 48 #include <machine/intr.h> 49 50 #include <dev/ic/mb86960reg.h> 51 #include <dev/ic/mb86960var.h> 52 53 #include <dev/isa/isavar.h> 54 55 int ate_match __P((struct device *, struct cfdata *, void *)); 56 void ate_attach __P((struct device *, struct device *, void *)); 57 58 struct ate_softc { 59 struct mb86960_softc sc_mb86960; /* real "mb86960" softc */ 60 61 /* ISA-specific goo. */ 62 void *sc_ih; /* interrupt cookie */ 63 }; 64 65 CFATTACH_DECL(ate_isa, sizeof(struct ate_softc), 66 ate_match, ate_attach, NULL, NULL); 67 68 struct fe_simple_probe_struct { 69 u_char port; /* Offset from the base I/O address. */ 70 u_char mask; /* Bits to be checked. */ 71 u_char bits; /* Values to be compared against. */ 72 }; 73 74 static __inline__ int fe_simple_probe __P((bus_space_tag_t, 75 bus_space_handle_t, struct fe_simple_probe_struct const *)); 76 static int ate_find __P((bus_space_tag_t, bus_space_handle_t, int *, 77 int *)); 78 static int ate_detect __P((bus_space_tag_t, bus_space_handle_t, 79 u_int8_t enaddr[ETHER_ADDR_LEN])); 80 81 static int const ate_iomap[8] = { 82 0x260, 0x280, 0x2A0, 0x240, 0x340, 0x320, 0x380, 0x300 83 }; 84 #define NATE_IOMAP (sizeof (ate_iomap) / sizeof (ate_iomap[0])) 85 #define ATE_NPORTS 0x20 86 87 /* 88 * Hardware probe routines. 89 */ 90 91 /* 92 * Determine if the device is present. 93 */ 94 int 95 ate_match(parent, match, aux) 96 struct device *parent; 97 struct cfdata *match; 98 void *aux; 99 { 100 struct isa_attach_args *ia = aux; 101 bus_space_tag_t iot = ia->ia_iot; 102 bus_space_handle_t ioh; 103 int i, iobase, irq, rv = 0; 104 u_int8_t myea[ETHER_ADDR_LEN]; 105 106 if (ia->ia_nio < 1) 107 return (0); 108 if (ia->ia_nirq < 1) 109 return (0); 110 111 if (ISA_DIRECT_CONFIG(ia)) 112 return (0); 113 114 /* Disallow wildcarded values. */ 115 if (ia->ia_io[0].ir_addr == ISACF_PORT_DEFAULT) 116 return (0); 117 118 /* 119 * See if the sepcified address is valid for MB86965A JLI mode. 120 */ 121 for (i = 0; i < NATE_IOMAP; i++) 122 if (ate_iomap[i] == ia->ia_io[0].ir_addr) 123 break; 124 if (i == NATE_IOMAP) { 125 #ifdef ATE_DEBUG 126 printf("ate_match: unknown iobase 0x%x\n", ia->ia_iobase); 127 #endif 128 return (0); 129 } 130 131 /* Map i/o space. */ 132 if (bus_space_map(iot, ia->ia_io[0].ir_addr, ATE_NPORTS, 0, &ioh)) { 133 #ifdef ATE_DEBUG 134 printf("ate_match: couldn't map iospace 0x%x\n", 135 ia->ia_io[0].ir_addr); 136 #endif 137 return (0); 138 } 139 140 if (ate_find(iot, ioh, &iobase, &irq) == 0) { 141 #ifdef ATE_DEBUG 142 printf("ate_match: ate_find failed\n"); 143 #endif 144 goto out; 145 } 146 147 if (iobase != ia->ia_io[0].ir_addr) { 148 #ifdef ATE_DEBUG 149 printf("ate_match: unexpected iobase in board: 0x%x\n", 150 ia->ia_iobase); 151 #endif 152 goto out; 153 } 154 155 if (ate_detect(iot, ioh, myea) == 0) { /* XXX necessary? */ 156 #ifdef ATE_DEBUG 157 printf("ate_match: ate_detect failed\n"); 158 #endif 159 goto out; 160 } 161 162 if (ia->ia_irq[0].ir_irq != ISACF_IRQ_DEFAULT) { 163 if (ia->ia_irq[0].ir_irq != irq) { 164 printf("ate_match: irq mismatch; " 165 "kernel configured %d != board configured %d\n", 166 ia->ia_irq[0].ir_irq, irq); 167 goto out; 168 } 169 } else 170 ia->ia_irq[0].ir_irq = irq; 171 172 ia->ia_nio = 1; 173 ia->ia_io[0].ir_size = ATE_NPORTS; 174 175 ia->ia_nirq = 1; 176 177 ia->ia_niomem = 0; 178 ia->ia_ndrq = 0; 179 180 rv = 1; 181 182 out: 183 bus_space_unmap(iot, ioh, ATE_NPORTS); 184 return (rv); 185 } 186 187 /* 188 * Check for specific bits in specific registers have specific values. 189 */ 190 static __inline__ int 191 fe_simple_probe (iot, ioh, sp) 192 bus_space_tag_t iot; 193 bus_space_handle_t ioh; 194 struct fe_simple_probe_struct const *sp; 195 { 196 u_int8_t val; 197 struct fe_simple_probe_struct const *p; 198 199 for (p = sp; p->mask != 0; p++) { 200 val = bus_space_read_1(iot, ioh, p->port); 201 if ((val & p->mask) != p->bits) { 202 #ifdef ATE_DEBUG 203 printf("fe_simple_probe: %x & %x != %x\n", 204 val, p->mask, p->bits); 205 #endif 206 return (0); 207 } 208 } 209 210 return (1); 211 } 212 213 /* 214 * Hardware (vendor) specific probe routines. 215 */ 216 217 /* 218 * Probe and initialization for Allied-Telesis AT1700/RE2000 series. 219 */ 220 static int 221 ate_find(iot, ioh, iobase, irq) 222 bus_space_tag_t iot; 223 bus_space_handle_t ioh; 224 int *iobase, *irq; 225 { 226 u_int8_t eeprom[FE_EEPROM_SIZE]; 227 int n; 228 229 static int const irqmap[4][4] = { 230 { 3, 4, 5, 9 }, 231 { 10, 11, 12, 15 }, 232 { 3, 11, 5, 15 }, 233 { 10, 11, 14, 15 }, 234 }; 235 static struct fe_simple_probe_struct const probe_table[] = { 236 { FE_DLCR2, 0x70, 0x00 }, 237 { FE_DLCR4, 0x08, 0x00 }, 238 { FE_DLCR5, 0x80, 0x00 }, 239 #if 0 240 { FE_BMPR16, 0x1B, 0x00 }, 241 { FE_BMPR17, 0x7F, 0x00 }, 242 #endif 243 { 0 } 244 }; 245 246 #if ATE_DEBUG >= 4 247 log(LOG_INFO, "ate_find: probe (0x%x) for ATE\n", iobase); 248 #if 0 249 fe_dump(LOG_INFO, sc); 250 #endif 251 #endif 252 253 /* 254 * We should test if MB86965A is on the base address now. 255 * Unfortunately, it is very hard to probe it reliably, since 256 * we have no way to reset the chip under software control. 257 * On cold boot, we could check the "signature" bit patterns 258 * described in the Fujitsu document. On warm boot, however, 259 * we can predict almost nothing about register values. 260 */ 261 if (!fe_simple_probe(iot, ioh, probe_table)) 262 return (0); 263 264 /* Check if our I/O address matches config info on 86965. */ 265 n = (bus_space_read_1(iot, ioh, FE_BMPR19) & FE_B19_ADDR) 266 >> FE_B19_ADDR_SHIFT; 267 *iobase = ate_iomap[n]; 268 269 /* 270 * We are now almost sure we have an AT1700 at the given 271 * address. So, read EEPROM through 86965. We have to write 272 * into LSI registers to read from EEPROM. I want to avoid it 273 * at this stage, but I cannot test the presence of the chip 274 * any further without reading EEPROM. FIXME. 275 */ 276 mb86965_read_eeprom(iot, ioh, eeprom); 277 278 /* Make sure that config info in EEPROM and 86965 agree. */ 279 if (eeprom[FE_EEPROM_CONF] != bus_space_read_1(iot, ioh, FE_BMPR19)) { 280 #ifdef DIAGNOSTIC 281 printf("ate_find: " 282 "incorrect configration in eeprom and chip\n"); 283 #endif 284 return (0); 285 } 286 287 /* 288 * Try to determine IRQ settings. 289 * Different models use different ranges of IRQs. 290 */ 291 n = (bus_space_read_1(iot, ioh, FE_BMPR19) & FE_B19_IRQ) 292 >> FE_B19_IRQ_SHIFT; 293 switch (eeprom[FE_ATI_EEP_REVISION] & 0xf0) { 294 case 0x30: 295 *irq = irqmap[3][n]; 296 break; 297 case 0x10: 298 case 0x50: 299 *irq = irqmap[2][n]; 300 break; 301 case 0x40: 302 case 0x60: 303 if (eeprom[FE_ATI_EEP_MAGIC] & 0x04) { 304 *irq = irqmap[1][n]; 305 break; 306 } 307 default: 308 *irq = irqmap[0][n]; 309 break; 310 } 311 312 return (1); 313 } 314 315 /* 316 * Determine type and ethernet address. 317 */ 318 static int 319 ate_detect(iot, ioh, enaddr) 320 bus_space_tag_t iot; 321 bus_space_handle_t ioh; 322 u_int8_t enaddr[ETHER_ADDR_LEN]; 323 { 324 u_int8_t eeprom[FE_EEPROM_SIZE]; 325 int type; 326 327 /* Get our station address from EEPROM. */ 328 mb86965_read_eeprom(iot, ioh, eeprom); 329 memcpy(enaddr, eeprom + FE_ATI_EEP_ADDR, ETHER_ADDR_LEN); 330 331 /* Make sure we got a valid station address. */ 332 if ((enaddr[0] & 0x03) != 0x00 || 333 (enaddr[0] == 0x00 && enaddr[1] == 0x00 && enaddr[2] == 0x00)) { 334 #ifdef ATE_DEBUG 335 printf("ate_detect: invalid ethernet address\n"); 336 #endif 337 return (0); 338 } 339 340 /* 341 * Determine the card type. 342 */ 343 switch (eeprom[FE_ATI_EEP_MODEL]) { 344 case FE_ATI_MODEL_AT1700T: 345 type = FE_TYPE_AT1700T; 346 break; 347 case FE_ATI_MODEL_AT1700BT: 348 type = FE_TYPE_AT1700BT; 349 break; 350 case FE_ATI_MODEL_AT1700FT: 351 type = FE_TYPE_AT1700FT; 352 break; 353 case FE_ATI_MODEL_AT1700AT: 354 type = FE_TYPE_AT1700AT; 355 break; 356 default: 357 type = FE_TYPE_AT_UNKNOWN; 358 break; 359 } 360 361 return (type); 362 } 363 364 void 365 ate_attach(parent, self, aux) 366 struct device *parent, *self; 367 void *aux; 368 { 369 struct ate_softc *isc = (struct ate_softc *)self; 370 struct mb86960_softc *sc = &isc->sc_mb86960; 371 struct isa_attach_args *ia = aux; 372 bus_space_tag_t iot = ia->ia_iot; 373 bus_space_handle_t ioh; 374 u_int8_t myea[ETHER_ADDR_LEN]; 375 const char *typestr; 376 int type; 377 378 /* Map i/o space. */ 379 if (bus_space_map(iot, ia->ia_io[0].ir_addr, ATE_NPORTS, 0, &ioh)) { 380 printf(": can't map i/o space\n"); 381 return; 382 } 383 384 sc->sc_bst = iot; 385 sc->sc_bsh = ioh; 386 387 /* Determine the card type and get ethernet address. */ 388 type = ate_detect(iot, ioh, myea); 389 switch (type) { 390 case FE_TYPE_AT1700T: 391 typestr = "AT-1700T/RE2001"; 392 break; 393 case FE_TYPE_AT1700BT: 394 typestr = "AT-1700BT/RE2003"; 395 break; 396 case FE_TYPE_AT1700FT: 397 typestr = "AT-1700FT/RE2009"; 398 break; 399 case FE_TYPE_AT1700AT: 400 typestr = "AT-1700AT/RE2005"; 401 break; 402 case FE_TYPE_AT_UNKNOWN: 403 typestr = "unknown AT-1700/RE2000"; 404 break; 405 406 default: 407 /* Unknown card type: maybe a new model, but... */ 408 printf(": where did the card go?!\n"); 409 panic("unknown card"); 410 } 411 412 printf(": %s Ethernet\n", typestr); 413 414 /* This interface is always enabled. */ 415 sc->sc_stat |= FE_STAT_ENABLED; 416 417 /* 418 * Do generic MB86960 attach. 419 */ 420 mb86960_attach(sc, myea); 421 422 mb86960_config(sc, NULL, 0, 0); 423 424 /* Establish the interrupt handler. */ 425 isc->sc_ih = isa_intr_establish(ia->ia_ic, ia->ia_irq[0].ir_irq, 426 IST_EDGE, IPL_NET, mb86960_intr, sc); 427 if (isc->sc_ih == NULL) 428 printf("%s: couldn't establish interrupt handler\n", 429 sc->sc_dev.dv_xname); 430 } 431