1 /* $OpenBSD: rgephy.c,v 1.12 2006/06/27 05:36:58 brad Exp $ */ 2 3 /* 4 * Copyright (c) 2003 5 * Bill Paul <wpaul@windriver.com>. 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 Bill Paul. 18 * 4. Neither the name of the author nor the names of any co-contributors 19 * may be used to endorse or promote products derived from this software 20 * without specific prior written permission. 21 * 22 * THIS SOFTWARE IS PROVIDED BY Bill Paul AND CONTRIBUTORS ``AS IS'' AND 23 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 25 * ARE DISCLAIMED. IN NO EVENT SHALL Bill Paul OR THE VOICES IN HIS HEAD 26 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 27 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 28 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 29 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 30 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 31 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF 32 * THE POSSIBILITY OF SUCH DAMAGE. 33 * 34 * $FreeBSD: src/sys/dev/mii/rgephy.c,v 1.7 2005/09/30 19:39:27 imp Exp $ 35 */ 36 37 /* 38 * Driver for the RealTek 8211B/8169S/8110S internal 10/100/1000 PHY. 39 */ 40 41 #include <sys/param.h> 42 #include <sys/systm.h> 43 #include <sys/kernel.h> 44 #include <sys/module.h> 45 #include <sys/socket.h> 46 #include <sys/bus.h> 47 48 #include <machine/clock.h> 49 50 #include <net/if.h> 51 #include <net/if_arp.h> 52 #include <net/if_media.h> 53 54 #include <dev/netif/mii_layer/mii.h> 55 #include <dev/netif/mii_layer/miivar.h> 56 #include <dev/netif/mii_layer/miidevs.h> 57 58 #include <dev/netif/re/if_rereg.h> 59 #include <dev/netif/mii_layer/rgephyreg.h> 60 61 #include "miibus_if.h" 62 63 static int rgephy_probe(device_t); 64 static int rgephy_attach(device_t); 65 66 static device_method_t rgephy_methods[] = { 67 /* device interface */ 68 DEVMETHOD(device_probe, rgephy_probe), 69 DEVMETHOD(device_attach, rgephy_attach), 70 DEVMETHOD(device_detach, ukphy_detach), 71 DEVMETHOD(device_shutdown, bus_generic_shutdown), 72 { 0, 0 } 73 }; 74 75 static const struct mii_phydesc rgephys[] = { 76 MII_PHYDESC(REALTEK2, RTL8169S), 77 MII_PHYDESC(xxREALTEK, RTL8169S), 78 MII_PHYDESC_NULL 79 }; 80 81 static devclass_t rgephy_devclass; 82 83 static driver_t rgephy_driver = { 84 "rgephy", 85 rgephy_methods, 86 sizeof(struct mii_softc) 87 }; 88 89 DRIVER_MODULE(rgephy, miibus, rgephy_driver, rgephy_devclass, NULL, NULL); 90 91 static int rgephy_service(struct mii_softc *, struct mii_data *, int); 92 static void rgephy_status(struct mii_softc *); 93 static int rgephy_mii_phy_auto(struct mii_softc *); 94 static void rgephy_reset(struct mii_softc *); 95 static void rgephy_loop(struct mii_softc *); 96 static void rgephy_load_dspcode(struct mii_softc *); 97 98 static int 99 rgephy_probe(device_t dev) 100 { 101 struct mii_attach_args *ma = device_get_ivars(dev); 102 const struct mii_phydesc *mpd; 103 104 mpd = mii_phy_match(ma, rgephys); 105 if (mpd != NULL) { 106 device_set_desc(dev, mpd->mpd_name); 107 if (bootverbose) 108 device_printf(dev, "rev: %d\n", MII_REV(ma->mii_id2)); 109 return (0); 110 } 111 return(ENXIO); 112 } 113 114 static int 115 rgephy_attach(device_t dev) 116 { 117 struct mii_softc *sc; 118 struct mii_attach_args *ma; 119 struct mii_data *mii; 120 121 sc = device_get_softc(dev); 122 ma = device_get_ivars(dev); 123 mii_softc_init(sc, ma); 124 sc->mii_dev = device_get_parent(dev); 125 126 mii = device_get_softc(sc->mii_dev); 127 LIST_INSERT_HEAD(&mii->mii_phys, sc, mii_list); 128 129 sc->mii_inst = mii->mii_instance; 130 sc->mii_service = rgephy_service; 131 sc->mii_reset = rgephy_reset; 132 sc->mii_pdata = mii; 133 134 sc->mii_flags |= MIIF_NOISOLATE; 135 mii->mii_instance++; 136 137 rgephy_reset(sc); 138 139 sc->mii_capabilities = PHY_READ(sc, MII_BMSR) & ma->mii_capmask; 140 if (sc->mii_capabilities & BMSR_EXTSTAT) 141 sc->mii_extcapabilities = PHY_READ(sc, MII_EXTSR); 142 143 device_printf(dev, " "); 144 if ((sc->mii_capabilities & BMSR_MEDIAMASK) == 0 && 145 (sc->mii_extcapabilities & EXTSR_MEDIAMASK) == 0) 146 kprintf("no media present"); 147 else 148 mii_phy_add_media(sc); 149 kprintf("\n"); 150 151 MIIBUS_MEDIAINIT(sc->mii_dev); 152 return(0); 153 } 154 155 static int 156 rgephy_service(struct mii_softc *sc, struct mii_data *mii, int cmd) 157 { 158 struct ifmedia_entry *ife = mii->mii_media.ifm_cur; 159 int reg, speed, gig; 160 uint16_t id2; 161 162 switch (cmd) { 163 case MII_POLLSTAT: 164 /* 165 * If we're not polling our PHY instance, just return. 166 */ 167 if (IFM_INST(ife->ifm_media) != sc->mii_inst) 168 return (0); 169 break; 170 171 case MII_MEDIACHG: 172 /* 173 * If the media indicates a different PHY instance, 174 * isolate ourselves. 175 */ 176 if (IFM_INST(ife->ifm_media) != sc->mii_inst) { 177 reg = PHY_READ(sc, MII_BMCR); 178 PHY_WRITE(sc, MII_BMCR, reg | BMCR_ISO); 179 return (0); 180 } 181 182 /* 183 * If the interface is not up, don't do anything. 184 */ 185 if ((mii->mii_ifp->if_flags & IFF_UP) == 0) 186 break; 187 188 rgephy_reset(sc); /* XXX hardware bug work-around */ 189 190 switch (IFM_SUBTYPE(ife->ifm_media)) { 191 case IFM_AUTO: 192 #ifdef foo 193 /* 194 * If we're already in auto mode, just return. 195 */ 196 if (PHY_READ(sc, RGEPHY_MII_BMCR) & RGEPHY_BMCR_AUTOEN) 197 return (0); 198 #endif 199 rgephy_mii_phy_auto(sc); 200 break; 201 case IFM_1000_T: 202 speed = RGEPHY_S1000; 203 goto setit; 204 case IFM_100_TX: 205 speed = RGEPHY_S100; 206 goto setit; 207 case IFM_10_T: 208 speed = RGEPHY_S10; 209 setit: 210 rgephy_loop(sc); 211 if ((ife->ifm_media & IFM_GMASK) == IFM_FDX) { 212 speed |= RGEPHY_BMCR_FDX; 213 gig = RGEPHY_1000CTL_AFD; 214 } else { 215 gig = RGEPHY_1000CTL_AHD; 216 } 217 218 PHY_WRITE(sc, RGEPHY_MII_1000CTL, 0); 219 PHY_WRITE(sc, RGEPHY_MII_BMCR, speed); 220 PHY_WRITE(sc, RGEPHY_MII_ANAR, RGEPHY_SEL_TYPE); 221 222 if (IFM_SUBTYPE(ife->ifm_media) != IFM_1000_T) 223 break; 224 225 PHY_WRITE(sc, RGEPHY_MII_1000CTL, gig); 226 PHY_WRITE(sc, RGEPHY_MII_BMCR, 227 speed|RGEPHY_BMCR_AUTOEN|RGEPHY_BMCR_STARTNEG); 228 229 /* 230 * When settning the link manually, one side must 231 * be the master and the other the slave. However 232 * ifmedia doesn't give us a good way to specify 233 * this, so we fake it by using one of the LINK 234 * flags. If LINK0 is set, we program the PHY to 235 * be a master, otherwise it's a slave. 236 */ 237 if ((mii->mii_ifp->if_flags & IFF_LINK0)) { 238 PHY_WRITE(sc, RGEPHY_MII_1000CTL, 239 gig|RGEPHY_1000CTL_MSE|RGEPHY_1000CTL_MSC); 240 } else { 241 PHY_WRITE(sc, RGEPHY_MII_1000CTL, 242 gig|RGEPHY_1000CTL_MSE); 243 } 244 break; 245 #ifdef foo 246 case IFM_NONE: 247 PHY_WRITE(sc, MII_BMCR, BMCR_ISO|BMCR_PDOWN); 248 break; 249 #endif 250 case IFM_100_T4: 251 default: 252 return (EINVAL); 253 } 254 break; 255 256 case MII_TICK: 257 /* 258 * If we're not currently selected, just return. 259 */ 260 if (IFM_INST(ife->ifm_media) != sc->mii_inst) 261 return (0); 262 263 /* 264 * Is the interface even up? 265 */ 266 if ((mii->mii_ifp->if_flags & IFF_UP) == 0) 267 return (0); 268 269 /* 270 * Only used for autonegotiation. 271 */ 272 if (IFM_SUBTYPE(ife->ifm_media) != IFM_AUTO) 273 break; 274 275 /* 276 * Check to see if we have link. If we do, we don't 277 * need to restart the autonegotiation process. 278 * 279 * XXX Read the BMSR twice in case it's latched? 280 */ 281 id2 = PHY_READ(sc, MII_PHYIDR2); 282 283 if (MII_REV(id2) < 2) { 284 reg = PHY_READ(sc, RE_GMEDIASTAT); 285 if (reg & RE_GMEDIASTAT_LINK) { 286 sc->mii_ticks = 0; 287 break; 288 } 289 } else { 290 reg = PHY_READ(sc, RGEPHY_SR); 291 if (reg & RGEPHY_SR_LINK) { 292 sc->mii_ticks = 0; 293 break; 294 } 295 } 296 297 /* 298 * Only retry autonegotiation every mii_anegticks seconds. 299 */ 300 if (++sc->mii_ticks <= sc->mii_anegticks) 301 break; 302 303 sc->mii_ticks = 0; 304 305 /* 306 * Although rgephy_mii_phy_auto() always returns EJUSTRETURN, 307 * we should not rely on that. 308 */ 309 if (rgephy_mii_phy_auto(sc) == EJUSTRETURN) 310 return (0); 311 break; 312 } 313 314 /* Update the media status. */ 315 rgephy_status(sc); 316 317 /* 318 * Callback if something changed. Note that we need to poke 319 * the DSP on the RealTek PHYs if the media changes. 320 */ 321 if (sc->mii_media_active != mii->mii_media_active || 322 sc->mii_media_status != mii->mii_media_status || 323 cmd == MII_MEDIACHG) 324 rgephy_load_dspcode(sc); 325 mii_phy_update(sc, cmd); 326 return (0); 327 } 328 329 static void 330 rgephy_status(struct mii_softc *sc) 331 { 332 struct mii_data *mii = sc->mii_pdata; 333 int bmsr, bmcr; 334 uint16_t id2; 335 336 mii->mii_media_status = IFM_AVALID; 337 mii->mii_media_active = IFM_ETHER; 338 339 id2 = PHY_READ(sc, MII_PHYIDR2); 340 341 if (MII_REV(id2) < 2) { 342 bmsr = PHY_READ(sc, RE_GMEDIASTAT); 343 if (bmsr & RE_GMEDIASTAT_LINK) 344 mii->mii_media_status |= IFM_ACTIVE; 345 } else { 346 bmsr = PHY_READ(sc, RGEPHY_SR); 347 if (bmsr & RGEPHY_SR_LINK) 348 mii->mii_media_status |= IFM_ACTIVE; 349 } 350 351 bmsr = PHY_READ(sc, RGEPHY_MII_BMSR); 352 353 bmcr = PHY_READ(sc, RGEPHY_MII_BMCR); 354 355 if (bmcr & RGEPHY_BMCR_LOOP) 356 mii->mii_media_active |= IFM_LOOP; 357 358 if (bmcr & RGEPHY_BMCR_AUTOEN) { 359 if ((bmsr & RGEPHY_BMSR_ACOMP) == 0) { 360 /* Erg, still trying, I guess... */ 361 mii->mii_media_active |= IFM_NONE; 362 return; 363 } 364 } 365 366 if (MII_REV(id2) < 2) { 367 bmsr = PHY_READ(sc, RE_GMEDIASTAT); 368 if (bmsr & RE_GMEDIASTAT_1000MBPS) 369 mii->mii_media_active |= IFM_1000_T; 370 else if (bmsr & RE_GMEDIASTAT_100MBPS) 371 mii->mii_media_active |= IFM_100_TX; 372 else if (bmsr & RE_GMEDIASTAT_10MBPS) 373 mii->mii_media_active |= IFM_10_T; 374 else 375 mii->mii_media_active |= IFM_NONE; 376 if (bmsr & RE_GMEDIASTAT_FDX) 377 mii->mii_media_active |= IFM_FDX; 378 } else { 379 bmsr = PHY_READ(sc, RGEPHY_SR); 380 if (RGEPHY_SR_SPEED(bmsr) == 2) 381 mii->mii_media_active |= IFM_1000_T; 382 else if (RGEPHY_SR_SPEED(bmsr) == 1) 383 mii->mii_media_active |= IFM_100_TX; 384 else if (RGEPHY_SR_SPEED(bmsr) == 0) 385 mii->mii_media_active |= IFM_10_T; 386 else 387 mii->mii_media_active |= IFM_NONE; 388 if (bmsr & RGEPHY_SR_FDX) 389 mii->mii_media_active |= IFM_FDX; 390 } 391 } 392 393 static int 394 rgephy_mii_phy_auto(struct mii_softc *sc) 395 { 396 uint16_t id2; 397 398 id2 = PHY_READ(sc, MII_PHYIDR2); 399 if (MII_REV(id2) < 2) { 400 rgephy_loop(sc); 401 rgephy_reset(sc); 402 } 403 404 PHY_WRITE(sc, RGEPHY_MII_ANAR, 405 BMSR_MEDIA_TO_ANAR(sc->mii_capabilities) | ANAR_CSMA); 406 DELAY(1000); 407 PHY_WRITE(sc, RGEPHY_MII_1000CTL, 408 RGEPHY_1000CTL_AHD | RGEPHY_1000CTL_AFD); 409 DELAY(1000); 410 PHY_WRITE(sc, RGEPHY_MII_BMCR, 411 RGEPHY_BMCR_AUTOEN | RGEPHY_BMCR_STARTNEG); 412 DELAY(100); 413 414 return (EJUSTRETURN); 415 } 416 417 static void 418 rgephy_loop(struct mii_softc *sc) 419 { 420 uint32_t bmsr; 421 int i; 422 uint16_t id2; 423 424 id2 = PHY_READ(sc, MII_PHYIDR2); 425 if (MII_REV(id2) < 2) { 426 PHY_WRITE(sc, RGEPHY_MII_BMCR, RGEPHY_BMCR_PDOWN); 427 DELAY(1000); 428 } 429 430 for (i = 0; i < 15000; i++) { 431 bmsr = PHY_READ(sc, RGEPHY_MII_BMSR); 432 if (!(bmsr & RGEPHY_BMSR_LINK)) { 433 #if 0 434 device_printf(sc->mii_dev, "looped %d\n", i); 435 #endif 436 break; 437 } 438 DELAY(10); 439 } 440 } 441 442 #define PHY_SETBIT(x, y, z) \ 443 PHY_WRITE(x, y, (PHY_READ(x, y) | (z))) 444 #define PHY_CLRBIT(x, y, z) \ 445 PHY_WRITE(x, y, (PHY_READ(x, y) & ~(z))) 446 447 /* 448 * Initialize RealTek PHY per the datasheet. The DSP in the PHYs of 449 * existing revisions of the 8169S/8110S chips need to be tuned in 450 * order to reliably negotiate a 1000Mbps link. This is only needed 451 * for rev 0 and rev 1 of the PHY. Later versions work without 452 * any fixups. 453 */ 454 static void 455 rgephy_load_dspcode(struct mii_softc *sc) 456 { 457 int val; 458 459 if (sc->mii_rev > 1) 460 return; 461 462 PHY_WRITE(sc, 31, 0x0001); 463 PHY_WRITE(sc, 21, 0x1000); 464 PHY_WRITE(sc, 24, 0x65C7); 465 PHY_CLRBIT(sc, 4, 0x0800); 466 val = PHY_READ(sc, 4) & 0xFFF; 467 PHY_WRITE(sc, 4, val); 468 PHY_WRITE(sc, 3, 0x00A1); 469 PHY_WRITE(sc, 2, 0x0008); 470 PHY_WRITE(sc, 1, 0x1020); 471 PHY_WRITE(sc, 0, 0x1000); 472 PHY_SETBIT(sc, 4, 0x0800); 473 PHY_CLRBIT(sc, 4, 0x0800); 474 val = (PHY_READ(sc, 4) & 0xFFF) | 0x7000; 475 PHY_WRITE(sc, 4, val); 476 PHY_WRITE(sc, 3, 0xFF41); 477 PHY_WRITE(sc, 2, 0xDE60); 478 PHY_WRITE(sc, 1, 0x0140); 479 PHY_WRITE(sc, 0, 0x0077); 480 val = (PHY_READ(sc, 4) & 0xFFF) | 0xA000; 481 PHY_WRITE(sc, 4, val); 482 PHY_WRITE(sc, 3, 0xDF01); 483 PHY_WRITE(sc, 2, 0xDF20); 484 PHY_WRITE(sc, 1, 0xFF95); 485 PHY_WRITE(sc, 0, 0xFA00); 486 val = (PHY_READ(sc, 4) & 0xFFF) | 0xB000; 487 PHY_WRITE(sc, 4, val); 488 PHY_WRITE(sc, 3, 0xFF41); 489 PHY_WRITE(sc, 2, 0xDE20); 490 PHY_WRITE(sc, 1, 0x0140); 491 PHY_WRITE(sc, 0, 0x00BB); 492 val = (PHY_READ(sc, 4) & 0xFFF) | 0xF000; 493 PHY_WRITE(sc, 4, val); 494 PHY_WRITE(sc, 3, 0xDF01); 495 PHY_WRITE(sc, 2, 0xDF20); 496 PHY_WRITE(sc, 1, 0xFF95); 497 PHY_WRITE(sc, 0, 0xBF00); 498 PHY_SETBIT(sc, 4, 0x0800); 499 PHY_CLRBIT(sc, 4, 0x0800); 500 PHY_WRITE(sc, 31, 0x0000); 501 502 DELAY(40); 503 } 504 505 static void 506 rgephy_reset(struct mii_softc *sc) 507 { 508 uint16_t id2; 509 510 mii_phy_reset(sc); 511 512 id2 = PHY_READ(sc, MII_PHYIDR2); 513 if (MII_REV(id2) < 2) { 514 DELAY(1000); 515 PHY_WRITE(sc, RGEPHY_MII_BMCR, RGEPHY_BMCR_AUTOEN); 516 DELAY(1000); 517 } 518 rgephy_load_dspcode(sc); 519 } 520