text: /*	OpenBSD: lxtphy.c,v 1.5 2000/08/26 20:04:17 nate Exp 	*/
  /*	NetBSD: lxtphy.c,v 1.19 2000/02/02 23:34:57 thorpej Exp 	*/
  
  /*-
   * Copyright (c) 1998, 1999 The NetBSD Foundation, Inc.
   * All rights reserved.
   *
   * This code is derived from software contributed to The NetBSD Foundation
   * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
   * NASA Ames Research Center.
   *
   * Redistribution and use in source and binary forms, with or without
   * modification, are permitted provided that the following conditions
   * are met:
   * 1. Redistributions of source code must retain the above copyright
   *    notice, this list of conditions and the following disclaimer.
   * 2. Redistributions in binary form must reproduce the above copyright
   *    notice, this list of conditions and the following disclaimer in the
   *    documentation and/or other materials provided with the distribution.
   *
   * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
   * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
   * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
   * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
   * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
   * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
   * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
   * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
   * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
   * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
   * POSSIBILITY OF SUCH DAMAGE.
   */
  
  /*-
   * Copyright (c) 1997 Manuel Bouyer.  All rights reserved.
   *
   * Redistribution and use in source and binary forms, with or without
   * modification, are permitted provided that the following conditions
   * are met:
   * 1. Redistributions of source code must retain the above copyright
   *    notice, this list of conditions and the following disclaimer.
   * 2. Redistributions in binary form must reproduce the above copyright
   *    notice, this list of conditions and the following disclaimer in the
   *    documentation and/or other materials provided with the distribution.
   *
   * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
   * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
   * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
   * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
   * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
   * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
   * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
   * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
   * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
   * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
   */
  
  #include <sys/cdefs.h>
  __FBSDID("$FreeBSD: releng/9.3/sys/dev/mii/lxtphy.c 229093 2011-12-31 14:12:12Z hselasky $");
  
  /*
   * driver for Level One's LXT-970 ethernet 10/100 PHY
   * datasheet from www.level1.com
   */
  
  #include <sys/param.h>
  #include <sys/systm.h>
  #include <sys/kernel.h>
  #include <sys/socket.h>
  #include <sys/errno.h>
  #include <sys/module.h>
  #include <sys/bus.h>
  
  #include <net/if.h>
  #include <net/if_media.h>
  
  #include <dev/mii/mii.h>
  #include <dev/mii/miivar.h>
  #include "miidevs.h"
  
  #include <dev/mii/lxtphyreg.h>
  
  #include "miibus_if.h"
  
  static int lxtphy_probe(device_t);
  static int lxtphy_attach(device_t);
  
  static device_method_t lxtphy_methods[] = {
  	/* device interface */
  	DEVMETHOD(device_probe,		lxtphy_probe),
  	DEVMETHOD(device_attach,	lxtphy_attach),
  	DEVMETHOD(device_detach,	mii_phy_detach),
  	DEVMETHOD(device_shutdown,	bus_generic_shutdown),
  	DEVMETHOD_END
  };
  
  static devclass_t lxtphy_devclass;
  
  static driver_t lxtphy_driver = {
  	"lxtphy",
  	lxtphy_methods,
  	sizeof(struct mii_softc)
  };
  
  DRIVER_MODULE(lxtphy, miibus, lxtphy_driver, lxtphy_devclass, 0, 0);
  
  static int	lxtphy_service(struct mii_softc *, struct mii_data *, int);
  static void	lxtphy_status(struct mii_softc *);
  static void	lxtphy_reset(struct mii_softc *);
  static void	lxtphy_set_tp(struct mii_softc *);
  static void	lxtphy_set_fx(struct mii_softc *);
  
  static const struct mii_phydesc lxtphys[] = {
  	MII_PHY_DESC(xxLEVEL1, LXT970),
  	MII_PHY_END
  };
  
  static const struct mii_phy_funcs lxtphy_funcs = {
  	lxtphy_service,
  	lxtphy_status,
  	lxtphy_reset
  };
  
  static int
  lxtphy_probe(device_t dev)
  {
  
  	return (mii_phy_dev_probe(dev, lxtphys, BUS_PROBE_DEFAULT));
  }
  
  static int
  lxtphy_attach(device_t dev)
  {
  	struct mii_softc *sc;
  
  	sc = device_get_softc(dev);
  
  	mii_phy_dev_attach(dev, MIIF_NOMANPAUSE, &lxtphy_funcs, 0);
  
  	PHY_RESET(sc);
  
  	sc->mii_capabilities = PHY_READ(sc, MII_BMSR) & sc->mii_capmask;
  	device_printf(dev, " ");
  
  #define	ADD(m, c)	ifmedia_add(&sc->mii_pdata->mii_media, (m), (c), NULL)
  	ADD(IFM_MAKEWORD(IFM_ETHER, IFM_100_FX, 0, sc->mii_inst),
  	    MII_MEDIA_100_TX);
  	printf("100baseFX, ");
  	ADD(IFM_MAKEWORD(IFM_ETHER, IFM_100_FX, IFM_FDX, sc->mii_inst),
  	    MII_MEDIA_100_TX_FDX);
  	printf("100baseFX-FDX, ");
  #undef ADD
  
  	mii_phy_add_media(sc);
  	printf("\n");
  
  	MIIBUS_MEDIAINIT(sc->mii_dev);
  	return (0);
  }
  
  static int
  lxtphy_service(struct mii_softc *sc, struct mii_data *mii, int cmd)
  {
  	struct ifmedia_entry *ife = mii->mii_media.ifm_cur;
  
  	switch (cmd) {
  	case MII_POLLSTAT:
  		break;
  
  	case MII_MEDIACHG:
  		/*
  		 * If the interface is not up, don't do anything.
  		 */
  		if ((mii->mii_ifp->if_flags & IFF_UP) == 0)
  			break;
  
  		if (IFM_SUBTYPE(ife->ifm_media) == IFM_100_FX)
  			lxtphy_set_fx(sc);
  		else
  			lxtphy_set_tp(sc);
  
  		mii_phy_setmedia(sc);
  		break;
  
  	case MII_TICK:
  		if (mii_phy_tick(sc) == EJUSTRETURN)
  			return (0);
  		break;
  	}
  
  	/* Update the media status. */
  	PHY_STATUS(sc);
  
  	/* Callback if something changed. */
  	mii_phy_update(sc, cmd);
  	return (0);
  }
  
  static void
  lxtphy_status(struct mii_softc *sc)
  {
  	struct mii_data *mii = sc->mii_pdata;
  	struct ifmedia_entry *ife = mii->mii_media.ifm_cur;
  	int bmcr, bmsr, csr;
  
  	mii->mii_media_status = IFM_AVALID;
  	mii->mii_media_active = IFM_ETHER;
  
  	/*
  	 * Get link status from the CSR; we need to read the CSR
  	 * for media type anyhow, and the link status in the CSR
  	 * doens't latch, so fewer register reads are required.
  	 */
  	csr = PHY_READ(sc, MII_LXTPHY_CSR);
  	if (csr & CSR_LINK)
  		mii->mii_media_status |= IFM_ACTIVE;
  
  	bmcr = PHY_READ(sc, MII_BMCR);
  	if (bmcr & BMCR_ISO) {
  		mii->mii_media_active |= IFM_NONE;
  		mii->mii_media_status = 0;
  		return;
  	}
  
  	if (bmcr & BMCR_LOOP)
  		mii->mii_media_active |= IFM_LOOP;
  
  	if (bmcr & BMCR_AUTOEN) {
  		bmsr = PHY_READ(sc, MII_BMSR) | PHY_READ(sc, MII_BMSR);
  		if ((bmsr & BMSR_ACOMP) == 0) {
  			/* Erg, still trying, I guess... */
  			mii->mii_media_active |= IFM_NONE;
  			return;
  		}
  		if (csr & CSR_SPEED)
  			mii->mii_media_active |= IFM_100_TX;
  		else
  			mii->mii_media_active |= IFM_10_T;
  		if (csr & CSR_DUPLEX)
  			mii->mii_media_active |=
  			    IFM_FDX | mii_phy_flowstatus(sc);
  		else
  			mii->mii_media_active |= IFM_HDX;
  	} else
  		mii->mii_media_active = ife->ifm_media;
  }
  
  static void
  lxtphy_reset(struct mii_softc *sc)
  {
  
  	mii_phy_reset(sc);
  	PHY_WRITE(sc, MII_LXTPHY_IER,
  	    PHY_READ(sc, MII_LXTPHY_IER) & ~IER_INTEN);
  }
  
  static void
  lxtphy_set_tp(struct mii_softc *sc)
  {
  	int cfg;
  
  	cfg = PHY_READ(sc, MII_LXTPHY_CONFIG);
  	cfg &= ~CONFIG_100BASEFX;
  	PHY_WRITE(sc, MII_LXTPHY_CONFIG, cfg);
  }
  
  static void
  lxtphy_set_fx(struct mii_softc *sc)
  {
  	int cfg;
  
  	cfg = PHY_READ(sc, MII_LXTPHY_CONFIG);
  	cfg |= CONFIG_100BASEFX;
  	PHY_WRITE(sc, MII_LXTPHY_CONFIG, cfg);
  }
  