1 /* $NetBSD: if_gem_pci.c,v 1.36 2009/07/27 18:10:53 dyoung Exp $ */ 2 3 /* 4 * 5 * Copyright (C) 2001 Eduardo Horvath. 6 * All rights reserved. 7 * 8 * 9 * Redistribution and use in source and binary forms, with or without 10 * modification, are permitted provided that the following conditions 11 * are met: 12 * 1. Redistributions of source code must retain the above copyright 13 * notice, this list of conditions and the following disclaimer. 14 * 2. Redistributions in binary form must reproduce the above copyright 15 * notice, this list of conditions and the following disclaimer in the 16 * documentation and/or other materials provided with the distribution. 17 * 18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND 19 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 21 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE 22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 24 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 25 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 26 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 27 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 28 * SUCH DAMAGE. 29 * 30 */ 31 32 /* 33 * PCI bindings for Apple GMAC, Sun ERI and Sun GEM Ethernet controllers 34 */ 35 36 #include <sys/cdefs.h> 37 __KERNEL_RCSID(0, "$NetBSD: if_gem_pci.c,v 1.36 2009/07/27 18:10:53 dyoung Exp $"); 38 39 #include <sys/param.h> 40 #include <sys/systm.h> 41 #include <sys/malloc.h> 42 #include <sys/kernel.h> 43 #include <sys/socket.h> 44 #include <sys/errno.h> 45 #include <sys/device.h> 46 47 #include <machine/endian.h> 48 49 #include <uvm/uvm_extern.h> 50 51 #include <net/if.h> 52 #include <net/if_dl.h> 53 #include <net/if_media.h> 54 #include <net/if_ether.h> 55 56 #if NBPFILTER > 0 57 #include <net/bpf.h> 58 #endif 59 60 #include <sys/bus.h> 61 #include <sys/intr.h> 62 63 #include <dev/mii/mii.h> 64 #include <dev/mii/miivar.h> 65 #include <dev/mii/mii_bitbang.h> 66 67 #include <dev/ic/gemreg.h> 68 #include <dev/ic/gemvar.h> 69 70 #include <dev/pci/pcivar.h> 71 #include <dev/pci/pcireg.h> 72 #include <dev/pci/pcidevs.h> 73 74 /* XXX Should use Properties when that's fleshed out. */ 75 #ifdef macppc 76 #include <dev/ofw/openfirm.h> 77 #endif /* macppc */ 78 #ifdef __sparc__ 79 #include <machine/promlib.h> 80 #endif 81 82 #ifndef GEM_USE_LOCAL_MAC_ADDRESS 83 #if defined (macppc) || defined (__sparc__) 84 #define GEM_USE_LOCAL_MAC_ADDRESS 0 /* use system-wide address */ 85 #else 86 #define GEM_USE_LOCAL_MAC_ADDRESS 1 87 #endif 88 #endif 89 90 91 struct gem_pci_softc { 92 struct gem_softc gsc_gem; /* GEM device */ 93 void *gsc_ih; 94 pci_chipset_tag_t gsc_pc; 95 pci_intr_handle_t gsc_handle; 96 }; 97 98 static bool gem_pci_estintr(struct gem_pci_softc *); 99 static bool gem_pci_suspend(device_t PMF_FN_PROTO); 100 static bool gem_pci_resume(device_t PMF_FN_PROTO); 101 static int gem_pci_detach(device_t, int); 102 103 int gem_pci_match(device_t, cfdata_t, void *); 104 void gem_pci_attach(device_t, device_t, void *); 105 106 CFATTACH_DECL3_NEW(gem_pci, sizeof(struct gem_pci_softc), 107 gem_pci_match, gem_pci_attach, gem_pci_detach, NULL, NULL, NULL, 108 DVF_DETACH_SHUTDOWN); 109 110 /* 111 * Attach routines need to be split out to different bus-specific files. 112 */ 113 114 int 115 gem_pci_match(device_t parent, cfdata_t cf, void *aux) 116 { 117 struct pci_attach_args *pa = aux; 118 119 if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_SUN && 120 (PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_SUN_ERINETWORK || 121 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_SUN_GEMNETWORK)) 122 return (1); 123 124 if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_APPLE && 125 (PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_GMAC || 126 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_GMAC2 || 127 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_GMAC3 || 128 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_SHASTA_GMAC || 129 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_K2_GMAC || 130 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_SHASTA_GMAC || 131 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_INTREPID2_GMAC)) 132 return (1); 133 134 135 return (0); 136 } 137 138 #if GEM_USE_LOCAL_MAC_ADDRESS 139 static inline int 140 gempromvalid(u_int8_t* buf) 141 { 142 return buf[0] == 0x18 && buf[1] == 0x00 && /* structure length */ 143 buf[2] == 0x00 && /* revision */ 144 (buf[3] == 0x00 || /* hme */ 145 buf[3] == 0x80) && /* qfe */ 146 buf[4] == PCI_SUBCLASS_NETWORK_ETHERNET && /* subclass code */ 147 buf[5] == PCI_CLASS_NETWORK; /* class code */ 148 } 149 150 static inline int 151 isshared_pins(u_int8_t* buf) 152 { 153 return buf[0] == 's' && buf[1] == 'h' && buf[2] == 'a' && 154 buf[3] == 'r' && buf[4] == 'e' && buf[5] == 'd' && 155 buf[6] == '-' && buf[7] == 'p' && buf[8] == 'i' && 156 buf[9] == 'n' && buf[10] == 's'; 157 } 158 #endif 159 160 static inline int 161 isserdes(u_int8_t* buf) 162 { 163 return buf[0] == 's' && buf[1] == 'e' && buf[2] == 'r' && 164 buf[3] == 'd' && buf[4] == 'e' && buf[5] == 's'; 165 } 166 167 void 168 gem_pci_attach(device_t parent, device_t self, void *aux) 169 { 170 struct pci_attach_args *pa = aux; 171 struct gem_pci_softc *gsc = device_private(self); 172 struct gem_softc *sc = &gsc->gsc_gem; 173 char devinfo[256]; 174 uint8_t enaddr[ETHER_ADDR_LEN]; 175 #if GEM_USE_LOCAL_MAC_ADDRESS 176 u_int8_t *enp; 177 bus_space_handle_t romh; 178 u_int8_t buf[0x0800]; 179 int dataoff, vpdoff, serdes; 180 #if GEM_USE_LOCAL_MAC_ADDRESS || defined(GEM_DEBUG) 181 int i; 182 #endif 183 #ifdef GEM_DEBUG 184 int j; 185 #endif 186 struct pci_vpd *vpd; 187 static const u_int8_t promhdr[] = { 0x55, 0xaa }; 188 #define PROMHDR_PTR_DATA 0x18 189 static const u_int8_t promdat[] = { 190 0x50, 0x43, 0x49, 0x52, /* "PCIR" */ 191 PCI_VENDOR_SUN & 0xff, PCI_VENDOR_SUN >> 8, 192 PCI_PRODUCT_SUN_GEMNETWORK & 0xff, 193 PCI_PRODUCT_SUN_GEMNETWORK >> 8 194 }; 195 #define PROMDATA_PTR_VPD 0x08 196 #define PROMDATA_DATA2 0x0a 197 #endif /* GEM_USE_LOCAL_MAC_ADDRESS */ 198 199 aprint_naive(": Ethernet controller\n"); 200 201 sc->sc_dev = self; 202 pci_devinfo(pa->pa_id, pa->pa_class, 0, devinfo, sizeof(devinfo)); 203 sc->sc_chiprev = PCI_REVISION(pa->pa_class); 204 aprint_normal(": %s (rev. 0x%02x)\n", devinfo, sc->sc_chiprev); 205 206 /* 207 * Some Sun GEMs/ERIs do have their intpin register bogusly set to 0, 208 * although it should be 1. correct that. 209 */ 210 if (pa->pa_intrpin == 0) 211 pa->pa_intrpin = 1; 212 213 sc->sc_variant = GEM_UNKNOWN; 214 215 sc->sc_dmatag = pa->pa_dmat; 216 217 sc->sc_flags |= GEM_PCI; 218 219 if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_SUN) { 220 if (PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_SUN_GEMNETWORK) 221 sc->sc_variant = GEM_SUN_GEM; 222 if (PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_SUN_ERINETWORK) 223 sc->sc_variant = GEM_SUN_ERI; 224 } else if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_APPLE) { 225 if (PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_GMAC || 226 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_GMAC2 || 227 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_GMAC3 || 228 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_SHASTA_GMAC || 229 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_INTREPID2_GMAC) 230 sc->sc_variant = GEM_APPLE_GMAC; 231 if (PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_K2_GMAC) 232 sc->sc_variant = GEM_APPLE_K2_GMAC; 233 } 234 235 if (sc->sc_variant == GEM_UNKNOWN) { 236 aprint_error_dev(sc->sc_dev, "unknown adaptor\n"); 237 return; 238 } 239 240 #define PCI_GEM_BASEADDR (PCI_MAPREG_START + 0x00) 241 242 /* XXX Need to check for a 64-bit mem BAR? */ 243 if (pci_mapreg_map(pa, PCI_GEM_BASEADDR, 244 PCI_MAPREG_TYPE_MEM | PCI_MAPREG_MEM_TYPE_32BIT, 0, 245 &sc->sc_bustag, &sc->sc_h1, NULL, &sc->sc_size) != 0) 246 { 247 aprint_error_dev(sc->sc_dev, "unable to map device registers\n"); 248 return; 249 } 250 if (bus_space_subregion(sc->sc_bustag, sc->sc_h1, 251 GEM_PCI_BANK2_OFFSET, GEM_PCI_BANK2_SIZE, &sc->sc_h2)) { 252 aprint_error_dev(sc->sc_dev, "unable to create bank 2 subregion\n"); 253 return; 254 } 255 256 #if GEM_USE_LOCAL_MAC_ADDRESS 257 /* 258 * Dig out VPD (vital product data) and acquire Ethernet address. 259 * The VPD of gem resides in the PCI PROM (PCI FCode). 260 */ 261 /* 262 * ``Writing FCode 3.x Programs'' (newer ones, dated 1997 and later) 263 * chapter 2 describes the data structure. 264 */ 265 266 enp = NULL; 267 268 if (sc->sc_variant == GEM_SUN_GEM && 269 (bus_space_subregion(sc->sc_bustag, sc->sc_h1, 270 GEM_PCI_ROM_OFFSET, GEM_PCI_ROM_SIZE, &romh)) == 0) { 271 272 /* read PCI Expansion PROM Header */ 273 bus_space_read_region_1(sc->sc_bustag, 274 romh, 0, buf, sizeof buf); 275 276 /* Check for "shared-pins = serdes" in FCode. */ 277 i = 0; 278 serdes = 0; 279 while (i < (sizeof buf) - sizeof "serdes") { 280 if (!serdes) { 281 if (isserdes(&buf[i])) 282 serdes = 1; 283 } else { 284 if (isshared_pins(&buf[i])) 285 serdes = 2; 286 } 287 if (serdes == 2) { 288 sc->sc_flags |= GEM_SERDES; 289 break; 290 } 291 i++; 292 } 293 #ifdef GEM_DEBUG 294 /* PROM dump */ 295 printf("%s: PROM dump (0x0000 to %04lx)\n", device_xname(sc->sc_dev), 296 (sizeof buf) - 1); 297 i = 0; 298 j = 0; 299 printf(" %04x ", i); 300 while (i < sizeof buf) { 301 printf("%02x ", buf[i]); 302 if (i && !(i % 8)) 303 printf(" "); 304 if (i && !(i % 16)) { 305 printf(" "); 306 while (j < i) { 307 if (buf[j] > 31 && buf[j] < 128) 308 printf("%c", buf[j]); 309 else 310 printf("."); 311 j++; 312 } 313 j = i; 314 printf("\n %04x ", i); 315 } 316 i++; 317 } 318 printf("\n"); 319 #endif 320 321 if (memcmp(buf, promhdr, sizeof promhdr) == 0 && 322 (dataoff = (buf[PROMHDR_PTR_DATA] | 323 (buf[PROMHDR_PTR_DATA + 1] << 8))) >= 0x1c) { 324 325 /* read PCI Expansion PROM Data */ 326 bus_space_read_region_1(sc->sc_bustag, romh, dataoff, 327 buf, 64); 328 if (memcmp(buf, promdat, sizeof promdat) == 0 && 329 gempromvalid(buf + PROMDATA_DATA2) && 330 (vpdoff = (buf[PROMDATA_PTR_VPD] | 331 (buf[PROMDATA_PTR_VPD + 1] << 8))) >= 0x1c) { 332 333 /* 334 * The VPD of gem is not in PCI 2.2 standard 335 * format. The length in the resource header 336 * is in big endian, and resources are not 337 * properly terminated (only one resource 338 * and no end tag). 339 */ 340 /* read PCI VPD */ 341 bus_space_read_region_1(sc->sc_bustag, romh, 342 vpdoff, buf, 64); 343 vpd = (void *)(buf + 3); 344 if (PCI_VPDRES_ISLARGE(buf[0]) && 345 PCI_VPDRES_LARGE_NAME(buf[0]) 346 == PCI_VPDRES_TYPE_VPD && 347 vpd->vpd_key0 == 0x4e /* N */ && 348 vpd->vpd_key1 == 0x41 /* A */ && 349 vpd->vpd_len == ETHER_ADDR_LEN) { 350 /* 351 * Ethernet address found 352 */ 353 enp = buf + 6; 354 } 355 } 356 } 357 } 358 359 if (enp) 360 memcpy(enaddr, enp, ETHER_ADDR_LEN); 361 else 362 #endif /* GEM_USE_LOCAL_MAC_ADDRESS */ 363 #ifdef __sparc__ 364 { 365 if (strcmp(prom_getpropstring(PCITAG_NODE(pa->pa_tag), 366 "shared-pins"), "serdes") == 0) 367 sc->sc_flags |= GEM_SERDES; 368 prom_getether(PCITAG_NODE(pa->pa_tag), enaddr); 369 } 370 #else 371 #ifdef macppc 372 { 373 int node; 374 char sp[6]; /* "serdes" */ 375 376 node = pcidev_to_ofdev(pa->pa_pc, pa->pa_tag); 377 if (node == 0) { 378 aprint_error_dev(sc->sc_dev, "unable to locate OpenFirmware node\n"); 379 return; 380 } 381 382 OF_getprop(node, "shared-pins", sp, sizeof(sp)); 383 if (isserdes(sp)) 384 sc->sc_flags |= GEM_SERDES; 385 OF_getprop(node, "local-mac-address", enaddr, sizeof(enaddr)); 386 } 387 #else 388 printf("%s: no Ethernet address found\n", device_xname(sc->sc_dev)); 389 #endif /* macppc */ 390 #endif /* __sparc__ */ 391 392 if (pci_intr_map(pa, &gsc->gsc_handle) != 0) { 393 aprint_error_dev(sc->sc_dev, "unable to map interrupt\n"); 394 return; 395 } 396 gsc->gsc_pc = pa->pa_pc; 397 gem_pci_estintr(gsc); 398 399 /* Finish off the attach. */ 400 gem_attach(sc, enaddr); 401 402 if (!pmf_device_register1(sc->sc_dev, gem_pci_suspend, gem_pci_resume, 403 gem_shutdown)) { 404 aprint_error_dev(sc->sc_dev, 405 "could not establish power handlers\n"); 406 } else 407 pmf_class_network_register(sc->sc_dev, &sc->sc_ethercom.ec_if); 408 } 409 410 static bool 411 gem_pci_suspend(device_t self PMF_FN_ARGS) 412 { 413 struct gem_pci_softc *gsc = device_private(self); 414 415 if (gsc->gsc_ih != NULL) { 416 pci_intr_disestablish(gsc->gsc_pc, gsc->gsc_ih); 417 gsc->gsc_ih = NULL; 418 } 419 420 return true; 421 } 422 423 static bool 424 gem_pci_estintr(struct gem_pci_softc *gsc) 425 { 426 struct gem_softc *sc = &gsc->gsc_gem; 427 const char *intrstr; 428 429 intrstr = pci_intr_string(gsc->gsc_pc, gsc->gsc_handle); 430 gsc->gsc_ih = pci_intr_establish(gsc->gsc_pc, gsc->gsc_handle, IPL_NET, 431 gem_intr, sc); 432 if (gsc->gsc_ih == NULL) { 433 aprint_error_dev(sc->sc_dev, "unable to establish interrupt"); 434 if (intrstr != NULL) 435 aprint_normal(" at %s", intrstr); 436 aprint_normal("\n"); 437 return false; 438 } 439 aprint_normal_dev(sc->sc_dev, "interrupting at %s\n", intrstr); 440 return true; 441 } 442 443 static bool 444 gem_pci_resume(device_t self PMF_FN_ARGS) 445 { 446 struct gem_pci_softc *gsc = device_private(self); 447 448 return gem_pci_estintr(gsc); 449 } 450 451 static int 452 gem_pci_detach(device_t self, int flags) 453 { 454 int rc; 455 struct gem_pci_softc *gsc = device_private(self); 456 struct gem_softc *sc = &gsc->gsc_gem; 457 458 switch (sc->sc_att_stage) { 459 case GEM_ATT_BACKEND_2: 460 pmf_device_deregister(self); 461 sc->sc_att_stage = GEM_ATT_FINISHED; 462 /*FALLTHROUGH*/ 463 default: 464 if ((rc = gem_detach(sc, flags)) != 0) 465 return rc; 466 /*FALLTHROUGH*/ 467 case GEM_ATT_BACKEND_1: 468 if (gsc->gsc_ih != NULL) 469 pci_intr_disestablish(gsc->gsc_pc, gsc->gsc_ih); 470 471 bus_space_unmap(sc->sc_bustag, sc->sc_h1, sc->sc_size); 472 /*FALLTHROUGH*/ 473 case GEM_ATT_BACKEND_0: 474 sc->sc_att_stage = GEM_ATT_BACKEND_0; 475 break; 476 } 477 return 0; 478 } 479