/*      $NetBSD: rtl80x9.c,v 1.19 2023/12/31 03:19:22 isaki Exp $       */

/*-
* Copyright (c) 1998 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.
*/

#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: rtl80x9.c,v 1.19 2023/12/31 03:19:22 isaki Exp $");

#include <sys/param.h>
#include <sys/systm.h>
#include <sys/mbuf.h>
#include <sys/syslog.h>
#include <sys/socket.h>
#include <sys/device.h>

#include <net/if.h>
#include <net/if_ether.h>
#include <net/if_media.h>

#include <sys/bus.h>
#include <sys/intr.h>

#include <dev/ic/dp8390reg.h>
#include <dev/ic/dp8390var.h>

#include <dev/ic/ne2000reg.h>
#include <dev/ic/ne2000var.h>

#include <dev/ic/rtl80x9reg.h>
#include <dev/ic/rtl80x9var.h>

int
rtl80x9_mediachange(struct dp8390_softc *dsc)
{

       /*
        * Current media is already set up.  Just reset the interface
        * to let the new value take hold.  The new media will be
        * set up in ne_pci_rtl8029_init_card() called via dp8390_init().
        */
       dp8390_reset(dsc);
       return 0;
}

void
rtl80x9_mediastatus(struct dp8390_softc *sc, struct ifmediareq *ifmr)
{
       struct ifnet *ifp = &sc->sc_ec.ec_if;
       uint8_t cr_proto = sc->cr_proto |
           ((ifp->if_flags & IFF_RUNNING) ? ED_CR_STA : ED_CR_STP);

       /*
        * Sigh, can detect which media is being used, but can't
        * detect if we have link or not.
        */

       /* Set NIC to page 3 registers. */
       NIC_PUT(sc->sc_regt, sc->sc_regh, ED_P0_CR, cr_proto | ED_CR_PAGE_3);

       if (NIC_GET(sc->sc_regt, sc->sc_regh, NERTL_RTL3_CONFIG0) &
           RTL3_CONFIG0_BNC)
               ifmr->ifm_active = IFM_ETHER | IFM_10_2;
       else {
               ifmr->ifm_active = IFM_ETHER | IFM_10_T;
               if (NIC_GET(sc->sc_regt, sc->sc_regh, NERTL_RTL3_CONFIG3) &
                   RTL3_CONFIG3_FUDUP)
                       ifmr->ifm_active |= IFM_FDX;
               else
                       ifmr->ifm_active |= IFM_HDX;
       }

       /* Set NIC to page 0 registers. */
       NIC_PUT(sc->sc_regt, sc->sc_regh, ED_P0_CR, cr_proto | ED_CR_PAGE_0);
}

void
rtl80x9_init_card(struct dp8390_softc *sc)
{
       struct ifmedia *ifm = &sc->sc_media;
       struct ifnet *ifp = &sc->sc_ec.ec_if;
       uint8_t cr_proto = sc->cr_proto |
           ((ifp->if_flags & IFF_RUNNING) ? ED_CR_STA : ED_CR_STP);
       uint8_t reg;

       /* Set NIC to page 3 registers. */
       NIC_PUT(sc->sc_regt, sc->sc_regh, ED_P0_CR, cr_proto | ED_CR_PAGE_3);

       /* Write enable config1-3. */
       NIC_PUT(sc->sc_regt, sc->sc_regh, NERTL_RTL3_EECR,
           RTL3_EECR_EEM1 | RTL3_EECR_EEM0);

       /* First, set basic media type. */
       reg = NIC_GET(sc->sc_regt, sc->sc_regh, NERTL_RTL3_CONFIG2);
       reg &= ~(RTL3_CONFIG2_PL1 | RTL3_CONFIG2_PL0);
       switch (IFM_SUBTYPE(ifm->ifm_cur->ifm_media)) {
       case IFM_AUTO:
               /* Nothing to do; both bits clear == auto-detect. */
               break;

       case IFM_10_T:
               /*
                * According to docs, this should be:
                * reg |= RTL3_CONFIG2_PL0;
                * but this doesn't work, so make it the same as AUTO.
                */
               break;

       case IFM_10_2:
               reg |= RTL3_CONFIG2_PL1 | RTL3_CONFIG2_PL0;
               break;
       }
       NIC_PUT(sc->sc_regt, sc->sc_regh, NERTL_RTL3_CONFIG2, reg);

       /* Now, set duplex mode. */
       reg = NIC_GET(sc->sc_regt, sc->sc_regh, NERTL_RTL3_CONFIG3);
       if (ifm->ifm_cur->ifm_media & IFM_FDX)
               reg |= RTL3_CONFIG3_FUDUP;
       else
               reg &= ~RTL3_CONFIG3_FUDUP;
       NIC_PUT(sc->sc_regt, sc->sc_regh, NERTL_RTL3_CONFIG3, reg);

       /* Write disable config1-3 */
       NIC_PUT(sc->sc_regt, sc->sc_regh, NERTL_RTL3_EECR, 0);

       /* Set NIC to page 0 registers. */
       NIC_PUT(sc->sc_regt, sc->sc_regh, ED_P0_CR, cr_proto | ED_CR_PAGE_0);
}

void
rtl80x9_media_init(struct dp8390_softc *sc)
{
       static int rtl80x9_media[] = {
               IFM_ETHER | IFM_AUTO,
               IFM_ETHER | IFM_10_T,
               IFM_ETHER | IFM_10_T | IFM_FDX,
               IFM_ETHER | IFM_10_2,
       };
       static const int rtl80x9_nmedia = __arraycount(rtl80x9_media);

       int i, defmedia;
       uint8_t conf2, conf3;

       aprint_normal_dev(sc->sc_dev,
           "10base2, 10baseT, 10baseT-FDX, auto, default ");

       bus_space_write_1(sc->sc_regt, sc->sc_regh, ED_P0_CR,
           sc->cr_proto | ED_CR_PAGE_3);

       conf2 = bus_space_read_1(sc->sc_regt, sc->sc_regh, NERTL_RTL3_CONFIG2);
       conf3 = bus_space_read_1(sc->sc_regt, sc->sc_regh, NERTL_RTL3_CONFIG3);
       printf("[0x%02x 0x%02x] ", conf2, conf3);

       conf2 &= RTL3_CONFIG2_PL1 | RTL3_CONFIG2_PL0;

       switch (conf2) {
       default:
               defmedia = IFM_ETHER | IFM_AUTO;
               printf("auto\n");
               break;

       case RTL3_CONFIG2_PL1 | RTL3_CONFIG2_PL0:
       case RTL3_CONFIG2_PL1:  /* XXX rtl docs sys 10base5, but chip cant do */
               defmedia = IFM_ETHER | IFM_10_2;
               printf("10base2\n");
               break;

       case RTL3_CONFIG2_PL0:
               if (conf3 & RTL3_CONFIG3_FUDUP) {
                       defmedia = IFM_ETHER | IFM_10_T | IFM_FDX;
                       printf("10baseT-FDX\n");
               } else {
                       defmedia = IFM_ETHER | IFM_10_T;
                       printf("10baseT\n");
               }
               break;
       }

       bus_space_write_1(sc->sc_regt, sc->sc_regh, ED_P0_CR,
           sc->cr_proto | ED_CR_PAGE_0);

       ifmedia_init(&sc->sc_media, 0, dp8390_mediachange, dp8390_mediastatus);
       for (i = 0; i < rtl80x9_nmedia; i++)
               ifmedia_add(&sc->sc_media, rtl80x9_media[i], 0, NULL);
       ifmedia_set(&sc->sc_media, defmedia);
}