1 /* $NetBSD: if_ae_nubus.c,v 1.41 2009/01/16 23:43:46 tsutsui Exp $ */ 2 3 /* 4 * Copyright (C) 1997 Scott Reynolds 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. The name of the author may not be used to endorse or promote products 16 * derived from this software without specific prior written permission. 17 * 18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 19 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 20 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 21 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 22 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 23 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 24 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 25 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 26 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 27 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 28 */ 29 /* 30 * Some parts are derived from code adapted for MacBSD by Brad Parker 31 * <brad@fcr.com>. 32 * 33 * Currently supports: 34 * Apple NB Ethernet Card 35 * Apple NB Ethernet Card II 36 * Interlan A310 NuBus Ethernet card 37 * Cayman Systems GatorCard 38 * Asante MacCon II/E 39 * Kinetics EtherPort SE/30 40 */ 41 42 #include <sys/cdefs.h> 43 __KERNEL_RCSID(0, "$NetBSD: if_ae_nubus.c,v 1.41 2009/01/16 23:43:46 tsutsui Exp $"); 44 45 #include <sys/param.h> 46 #include <sys/device.h> 47 #include <sys/errno.h> 48 #include <sys/ioctl.h> 49 #include <sys/malloc.h> 50 #include <sys/socket.h> 51 #include <sys/syslog.h> 52 #include <sys/systm.h> 53 54 #include <net/if.h> 55 #include <net/if_media.h> 56 #include <net/if_ether.h> 57 58 #include <machine/bus.h> 59 #include <machine/viareg.h> 60 61 #include <dev/ic/dp8390reg.h> 62 #include <dev/ic/dp8390var.h> 63 #include <mac68k/nubus/nubus.h> 64 #include <mac68k/dev/if_aevar.h> 65 #include <mac68k/dev/if_aereg.h> 66 67 static int ae_nubus_match(device_t, cfdata_t, void *); 68 static void ae_nubus_attach(device_t, device_t, void *); 69 static int ae_nb_card_vendor(bus_space_tag_t, bus_space_handle_t, 70 struct nubus_attach_args *); 71 static int ae_nb_get_enaddr(bus_space_tag_t, bus_space_handle_t, 72 struct nubus_attach_args *, u_int8_t *); 73 #ifdef DEBUG 74 static void ae_nb_watchdog(struct ifnet *); 75 #endif 76 77 void ae_nubus_intr(void *); 78 79 CFATTACH_DECL_NEW(ae_nubus, sizeof(struct dp8390_softc), 80 ae_nubus_match, ae_nubus_attach, NULL, NULL); 81 82 static int 83 ae_nubus_match(device_t parent, cfdata_t cf, void *aux) 84 { 85 struct nubus_attach_args *na = aux; 86 bus_space_handle_t bsh; 87 int rv; 88 89 if (bus_space_map(na->na_tag, NUBUS_SLOT2PA(na->slot), NBMEMSIZE, 90 0, &bsh)) 91 return (0); 92 93 rv = 0; 94 95 if (na->category == NUBUS_CATEGORY_NETWORK && 96 na->type == NUBUS_TYPE_ETHERNET) { 97 switch (ae_nb_card_vendor(na->na_tag, bsh, na)) { 98 case DP8390_VENDOR_APPLE: 99 case DP8390_VENDOR_ASANTE: 100 case DP8390_VENDOR_FARALLON: 101 case DP8390_VENDOR_INTERLAN: 102 case DP8390_VENDOR_KINETICS: 103 case DP8390_VENDOR_CABLETRON: 104 rv = 1; 105 break; 106 case DP8390_VENDOR_DAYNA: 107 rv = UNSUPP; 108 break; 109 default: 110 break; 111 } 112 } 113 114 bus_space_unmap(na->na_tag, bsh, NBMEMSIZE); 115 116 return rv; 117 } 118 119 /* 120 * Install interface into kernel networking data structures 121 */ 122 static void 123 ae_nubus_attach(device_t parent, device_t self, void *aux) 124 { 125 struct dp8390_softc *sc = device_private(self); 126 struct nubus_attach_args *na = aux; 127 #ifdef DEBUG 128 struct ifnet *ifp = &sc->sc_ec.ec_if; 129 #endif 130 bus_space_tag_t bst; 131 bus_space_handle_t bsh; 132 int i, success; 133 const char *cardtype; 134 135 sc->sc_dev = self; 136 bst = na->na_tag; 137 if (bus_space_map(bst, NUBUS_SLOT2PA(na->slot), NBMEMSIZE, 138 0, &bsh)) { 139 aprint_error(": can't map memory space\n"); 140 return; 141 } 142 143 sc->sc_regt = sc->sc_buft = bst; 144 sc->sc_flags = device_cfdata(self)->cf_flags; 145 146 cardtype = nubus_get_card_name(bst, bsh, na->fmt); 147 148 sc->is790 = 0; 149 150 sc->mem_start = 0; 151 sc->mem_size = 0; 152 153 success = 0; 154 155 switch (ae_nb_card_vendor(bst, bsh, na)) { 156 case DP8390_VENDOR_APPLE: /* Apple-compatible cards */ 157 case DP8390_VENDOR_ASANTE: 158 /* Map register offsets */ 159 for (i = 0; i < 16; i++) /* reverse order, longword aligned */ 160 sc->sc_reg_map[i] = (15 - i) << 2; 161 162 sc->dcr_reg = (ED_DCR_FT1 | ED_DCR_WTS | ED_DCR_LS); 163 if (bus_space_subregion(bst, bsh, 164 AE_REG_OFFSET, AE_REG_SIZE, &sc->sc_regh)) { 165 aprint_error(": failed to map register space\n"); 166 break; 167 } 168 if ((sc->mem_size = ae_size_card_memory(bst, bsh, 169 AE_DATA_OFFSET)) == 0) { 170 aprint_error(": failed to determine size of RAM.\n"); 171 break; 172 } 173 if (bus_space_subregion(bst, bsh, 174 AE_DATA_OFFSET, sc->mem_size, &sc->sc_bufh)) { 175 aprint_error(": failed to map register space\n"); 176 break; 177 } 178 #ifdef AE_OLD_GET_ENADDR 179 /* Get station address from on-board ROM */ 180 for (i = 0; i < ETHER_ADDR_LEN; ++i) 181 sc->sc_enaddr[i] = 182 bus_space_read_1(bst, bsh, (AE_ROM_OFFSET + i * 2)); 183 #else 184 if (ae_nb_get_enaddr(bst, bsh, na, sc->sc_enaddr)) { 185 aprint_error(": can't find MAC address\n"); 186 break; 187 } 188 #endif 189 190 success = 1; 191 break; 192 193 case DP8390_VENDOR_DAYNA: 194 /* Map register offsets */ 195 for (i = 0; i < 16; i++) /* normal order, longword aligned */ 196 sc->sc_reg_map[i] = i << 2; 197 198 sc->dcr_reg = (ED_DCR_FT1 | ED_DCR_WTS | ED_DCR_LS); 199 if (bus_space_subregion(bst, bsh, 200 DP_REG_OFFSET, AE_REG_SIZE, &sc->sc_regh)) { 201 aprint_error(": failed to map register space\n"); 202 break; 203 } 204 sc->mem_size = 8192; 205 if (bus_space_subregion(bst, bsh, 206 DP_DATA_OFFSET, sc->mem_size, &sc->sc_bufh)) { 207 aprint_error(": failed to map register space\n"); 208 break; 209 } 210 #ifdef AE_OLD_GET_ENADDR 211 /* Get station address from on-board ROM */ 212 for (i = 0; i < ETHER_ADDR_LEN; ++i) 213 sc->sc_enaddr[i] = 214 bus_space_read_1(bst, bsh, (DP_ROM_OFFSET + i * 2)); 215 #else 216 if (ae_nb_get_enaddr(bst, bsh, na, sc->sc_enaddr)) { 217 aprint_error(": can't find MAC address\n"); 218 break; 219 } 220 #endif 221 222 aprint_error(": unsupported Dayna hardware\n"); 223 break; 224 225 case DP8390_VENDOR_FARALLON: 226 /* Map register offsets */ 227 for (i = 0; i < 16; i++) /* reverse order, longword aligned */ 228 sc->sc_reg_map[i] = (15 - i) << 2; 229 230 sc->dcr_reg = (ED_DCR_FT1 | ED_DCR_WTS | ED_DCR_LS); 231 if (bus_space_subregion(bst, bsh, 232 AE_REG_OFFSET, AE_REG_SIZE, &sc->sc_regh)) { 233 aprint_error(": failed to map register space\n"); 234 break; 235 } 236 if ((sc->mem_size = ae_size_card_memory(bst, bsh, 237 AE_DATA_OFFSET)) == 0) { 238 aprint_error(": failed to determine size of RAM.\n"); 239 break; 240 } 241 if (bus_space_subregion(bst, bsh, 242 AE_DATA_OFFSET, sc->mem_size, &sc->sc_bufh)) { 243 aprint_error(": failed to map register space\n"); 244 break; 245 } 246 #ifdef AE_OLD_GET_ENADDR 247 /* Get station address from on-board ROM */ 248 for (i = 0; i < ETHER_ADDR_LEN; ++i) 249 sc->sc_enaddr[i] = 250 bus_space_read_1(bst, bsh, (FE_ROM_OFFSET + i)); 251 #else 252 if (ae_nb_get_enaddr(bst, bsh, na, sc->sc_enaddr)) { 253 aprint_error(": can't find MAC address\n"); 254 break; 255 } 256 #endif 257 258 success = 1; 259 break; 260 261 case DP8390_VENDOR_INTERLAN: 262 /* Map register offsets */ 263 for (i = 0; i < 16; i++) /* normal order, longword aligned */ 264 sc->sc_reg_map[i] = i << 2; 265 266 sc->dcr_reg = (ED_DCR_FT1 | ED_DCR_WTS | ED_DCR_LS); 267 if (bus_space_subregion(bst, bsh, 268 GC_REG_OFFSET, AE_REG_SIZE, &sc->sc_regh)) { 269 aprint_error(": failed to map register space\n"); 270 break; 271 } 272 if ((sc->mem_size = ae_size_card_memory(bst, bsh, 273 GC_DATA_OFFSET)) == 0) { 274 aprint_error(": failed to determine size of RAM.\n"); 275 break; 276 } 277 if (bus_space_subregion(bst, bsh, 278 GC_DATA_OFFSET, sc->mem_size, &sc->sc_bufh)) { 279 aprint_error(": failed to map register space\n"); 280 break; 281 } 282 283 /* reset the NIC chip */ 284 bus_space_write_1(bst, bsh, GC_RESET_OFFSET, 0); 285 286 if (ae_nb_get_enaddr(bst, bsh, na, sc->sc_enaddr)) { 287 /* Fall back to snarf directly from ROM. Ick. */ 288 for (i = 0; i < ETHER_ADDR_LEN; ++i) 289 sc->sc_enaddr[i] = 290 bus_space_read_1(bst, bsh, 291 (GC_ROM_OFFSET + i * 4)); 292 } 293 294 success = 1; 295 break; 296 297 case DP8390_VENDOR_KINETICS: 298 /* Map register offsets */ 299 for (i = 0; i < 16; i++) /* normal order, longword aligned */ 300 sc->sc_reg_map[i] = i << 2; 301 302 if (bus_space_subregion(bst, bsh, 303 KE_REG_OFFSET, AE_REG_SIZE, &sc->sc_regh)) { 304 aprint_error(": failed to map register space\n"); 305 break; 306 } 307 if ((sc->mem_size = ae_size_card_memory(bst, bsh, 308 KE_DATA_OFFSET)) == 0) { 309 aprint_error(": failed to determine size of RAM.\n"); 310 break; 311 } 312 if (bus_space_subregion(bst, bsh, 313 KE_DATA_OFFSET, sc->mem_size, &sc->sc_bufh)) { 314 aprint_error(": failed to map register space\n"); 315 break; 316 } 317 if (ae_nb_get_enaddr(bst, bsh, na, sc->sc_enaddr)) { 318 aprint_error(": can't find MAC address\n"); 319 break; 320 } 321 322 success = 1; 323 break; 324 325 case DP8390_VENDOR_CABLETRON: 326 /* Map register offsets */ 327 for (i = 0; i < 16; i++) 328 sc->sc_reg_map[i] = i << 1 ; /* normal order, word aligned */ 329 sc->dcr_reg = (ED_DCR_FT1 | ED_DCR_WTS | ED_DCR_LS); 330 if (bus_space_subregion(bst, bsh, 331 CT_REG_OFFSET, AE_REG_SIZE, &sc->sc_regh)) { 332 aprint_error(": failed to map register space\n"); 333 break; 334 } 335 if ((sc->mem_size = ae_size_card_memory(bst, bsh, 336 CT_DATA_OFFSET)) == 0) { 337 aprint_error(": failed to determine size of RAM.\n"); 338 break; 339 } 340 if (bus_space_subregion(bst, bsh, 341 CT_DATA_OFFSET, sc->mem_size, &sc->sc_bufh)) { 342 aprint_error(": failed to map register space\n"); 343 break; 344 } 345 if (ae_nb_get_enaddr(bst, bsh, na, sc->sc_enaddr)) { 346 aprint_error(": can't find MAC address\n"); 347 break; 348 } 349 success = 1; 350 break; 351 default: 352 break; 353 } 354 355 if (!success) { 356 bus_space_unmap(bst, bsh, NBMEMSIZE); 357 return; 358 } 359 360 /* 361 * Override test_mem and write_mbuf functions; other defaults 362 * already work properly. 363 */ 364 sc->test_mem = ae_test_mem; 365 sc->write_mbuf = ae_write_mbuf; 366 #ifdef DEBUG 367 ifp->if_watchdog = ae_nb_watchdog; /* Override watchdog */ 368 #endif 369 sc->sc_media_init = dp8390_media_init; 370 371 /* Interface is always enabled. */ 372 sc->sc_enabled = 1; 373 374 aprint_normal(": %s, %dKB memory\n", cardtype, sc->mem_size / 1024); 375 376 if (dp8390_config(sc)) { 377 bus_space_unmap(bst, bsh, NBMEMSIZE); 378 return; 379 } 380 381 /* make sure interrupts are vectored to us */ 382 add_nubus_intr(na->slot, ae_nubus_intr, sc); 383 } 384 385 void 386 ae_nubus_intr(void *arg) 387 { 388 struct dp8390_softc *sc = arg; 389 390 (void)dp8390_intr(sc); 391 } 392 393 static int 394 ae_nb_card_vendor(bus_space_tag_t bst, bus_space_handle_t bsh, 395 struct nubus_attach_args *na) 396 { 397 int vendor; 398 399 switch (na->drsw) { 400 case NUBUS_DRSW_3COM: 401 switch (na->drhw) { 402 case NUBUS_DRHW_APPLE_SN: 403 case NUBUS_DRHW_APPLE_SNT: 404 vendor = DP8390_VENDOR_UNKNOWN; 405 break; 406 default: 407 vendor = DP8390_VENDOR_APPLE; 408 break; 409 } 410 break; 411 case NUBUS_DRSW_APPLE: 412 if (na->drhw == NUBUS_DRHW_ASANTE_LC) { 413 vendor = DP8390_VENDOR_UNKNOWN; 414 break; 415 } 416 /* FALLTHROUGH */ 417 case NUBUS_DRSW_DAYNA2: 418 case NUBUS_DRSW_TECHWORKS: 419 case NUBUS_DRSW_TFLLAN: 420 if (na->drhw == NUBUS_DRHW_CABLETRON) { 421 vendor = DP8390_VENDOR_CABLETRON; 422 } else { 423 vendor = DP8390_VENDOR_APPLE; 424 } 425 break; 426 case NUBUS_DRSW_ASANTE: 427 vendor = DP8390_VENDOR_ASANTE; 428 break; 429 case NUBUS_DRSW_FARALLON: 430 vendor = DP8390_VENDOR_FARALLON; 431 break; 432 case NUBUS_DRSW_GATOR: 433 switch (na->drhw) { 434 default: 435 case NUBUS_DRHW_INTERLAN: 436 vendor = DP8390_VENDOR_INTERLAN; 437 break; 438 case NUBUS_DRHW_KINETICS: 439 if (strncmp(nubus_get_card_name(bst, bsh, na->fmt), 440 "EtherPort", 9) == 0) 441 vendor = DP8390_VENDOR_KINETICS; 442 else 443 vendor = DP8390_VENDOR_DAYNA; 444 break; 445 } 446 break; 447 default: 448 vendor = DP8390_VENDOR_UNKNOWN; 449 } 450 return vendor; 451 } 452 453 static int 454 ae_nb_get_enaddr(bus_space_tag_t bst, bus_space_handle_t bsh, 455 struct nubus_attach_args *na, u_int8_t *ep) 456 { 457 nubus_dir dir; 458 nubus_dirent dirent; 459 int rv; 460 461 /* 462 * XXX - note hardwired resource IDs here; these are assumed to 463 * be used by all cards, but should be fixed when we find out 464 * more about Ethernet card resources. 465 */ 466 nubus_get_main_dir(na->fmt, &dir); 467 switch (ae_nb_card_vendor(bst, bsh, na)) { 468 case DP8390_VENDOR_APPLE: 469 if (na->drsw == NUBUS_DRSW_TFLLAN) { /* TFL LAN E410/E420 */ 470 rv = nubus_find_rsrc(bst, bsh, na->fmt, 471 &dir, 0x08, &dirent); 472 break; 473 } 474 /*FALLTHROUGH*/ 475 default: 476 rv = nubus_find_rsrc(bst, bsh, na->fmt, &dir, 0x80, &dirent); 477 break; 478 } 479 if (rv <= 0) 480 return 1; 481 nubus_get_dir_from_rsrc(na->fmt, &dirent, &dir); 482 if (nubus_find_rsrc(bst, bsh, na->fmt, &dir, 0x80, &dirent) <= 0) 483 return 1; 484 if (nubus_get_ind_data(bst, bsh, 485 na->fmt, &dirent, ep, ETHER_ADDR_LEN) <= 0) 486 return 1; 487 488 return 0; 489 } 490 491 #ifdef DEBUG 492 static void 493 ae_nb_watchdog(struct ifnet *ifp) 494 { 495 struct dp8390_softc *sc = ifp->if_softc; 496 497 /* 498 * This is a kludge! The via code seems to miss slot interrupts 499 * sometimes. This kludges around that by calling the handler 500 * by hand if the watchdog is activated. -- XXX (akb) 501 */ 502 (*via2itab[1])((void *)1); 503 504 log(LOG_ERR, "%s: device timeout\n", device_xname(sc->sc_dev)); 505 ++ifp->if_oerrors; 506 507 dp8390_reset(sc); 508 } 509 #endif 510