/*-
 * Copyright (c) 2012 Semihalf.
 * 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 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 AUTHOR 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/param.h>
#include <sys/systm.h>
#include <sys/kernel.h>
#include <sys/bus.h>
#include <sys/module.h>
#include <sys/rman.h>
#include <sys/socket.h>

#include <machine/bus.h>

#include <powerpc/mpc85xx/mpc85xx.h>

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

#include <dev/mii/mii.h>
#include <dev/mii/miivar.h>

#include <dev/ofw/ofw_bus.h>
#include <dev/ofw/ofw_bus_subr.h>
#include <dev/ofw/openfirm.h>

#include "miibus_if.h"

#include "dpaa_eth.h"
#include "if_dtsec.h"
#include "fman.h"


static int      dtsec_fdt_probe(device_t dev);
static int      dtsec_fdt_attach(device_t dev);

static device_method_t dtsec_methods[] = {
        /* Device interface */
        DEVMETHOD(device_probe,         dtsec_fdt_probe),
        DEVMETHOD(device_attach,        dtsec_fdt_attach),
        DEVMETHOD(device_detach,        dtsec_detach),

        DEVMETHOD(device_shutdown,      dtsec_shutdown),
        DEVMETHOD(device_suspend,       dtsec_suspend),
        DEVMETHOD(device_resume,        dtsec_resume),

        /* Bus interface */
        DEVMETHOD(bus_print_child,      bus_generic_print_child),
        DEVMETHOD(bus_driver_added,     bus_generic_driver_added),

        /* MII interface */
        DEVMETHOD(miibus_readreg,       dtsec_miibus_readreg),
        DEVMETHOD(miibus_writereg,      dtsec_miibus_writereg),
        DEVMETHOD(miibus_statchg,       dtsec_miibus_statchg),

        DEVMETHOD_END
};

static driver_t dtsec_driver = {
        "dtsec",
        dtsec_methods,
        sizeof(struct dtsec_softc),
};

DRIVER_MODULE(dtsec, fman, dtsec_driver, 0, 0);
DRIVER_MODULE(miibus, dtsec, miibus_driver, 0, 0);
MODULE_DEPEND(dtsec, ether, 1, 1, 1);
MODULE_DEPEND(dtsec, miibus, 1, 1, 1);

static int
dtsec_fdt_probe(device_t dev)
{

        if (!ofw_bus_status_okay(dev))
                return (ENXIO);

        if (!ofw_bus_is_compatible(dev, "fsl,fman-dtsec") &&
            !ofw_bus_is_compatible(dev, "fsl,fman-xgec"))
                return (ENXIO);

        device_set_desc(dev, "Freescale Data Path Triple Speed Ethernet "
            "Controller");

        return (BUS_PROBE_DEFAULT);
}

static int
dtsec_fdt_attach(device_t dev)
{
        struct dtsec_softc *sc;
        device_t phy_dev;
        phandle_t enet_node, phy_node;
        phandle_t fman_rxtx_node[2];
        char phy_type[6];
        pcell_t fman_tx_cell, mac_id;
        int rid;

        sc = device_get_softc(dev);
        enet_node = ofw_bus_get_node(dev);

        if (OF_getprop(enet_node, "local-mac-address",
            (void *)sc->sc_base.sc_mac_addr, 6) == -1) {
                device_printf(dev,
                    "Could not load local-mac-addr property from DTS\n");
                return (ENXIO);
        }

        /* Get link speed */
        if (ofw_bus_is_compatible(dev, "fsl,fman-dtsec") != 0)
                sc->sc_eth_dev_type = ETH_DTSEC;
        else if (ofw_bus_is_compatible(dev, "fsl,fman-xgec") != 0)
                sc->sc_eth_dev_type = ETH_10GSEC;
        else
                return (ENXIO);

        /* Get PHY address */
        if (OF_getprop(enet_node, "tbi-handle", (void *)&phy_node,
            sizeof(phy_node)) <= 0)
                return (ENXIO);

        phy_node = OF_node_from_xref(phy_node);

        if (OF_getprop(phy_node, "reg", (void *)&sc->sc_base.sc_phy_addr,
            sizeof(sc->sc_base.sc_phy_addr)) <= 0)
                return (ENXIO);

        phy_dev = OF_device_from_xref(OF_parent(phy_node));

        if (phy_dev == NULL) {
                device_printf(dev, "No PHY found.\n");
                return (ENXIO);
        }

        sc->sc_base.sc_mdio = phy_dev;

        /* Get MAC memory offset in SoC */
        rid = 0;
        sc->sc_base.sc_mem = bus_alloc_resource_any(dev, SYS_RES_MEMORY, &rid, RF_ACTIVE);
        if (sc->sc_base.sc_mem == NULL)
                return (ENXIO);

        /* Get PHY connection type */
        if (OF_getprop(enet_node, "phy-connection-type", (void *)phy_type,
            sizeof(phy_type)) <= 0)
                return (ENXIO);

        if (OF_getencprop(enet_node, "cell-index",
            (void *)&mac_id, sizeof(mac_id)) <= 0)
                return (ENXIO);
        sc->sc_base.sc_eth_id = mac_id;

        /* Get RX/TX port handles */
        if (OF_getprop(enet_node, "fsl,fman-ports", (void *)fman_rxtx_node,
            sizeof(fman_rxtx_node)) <= 0)
                return (ENXIO);

        if (fman_rxtx_node[0] == 0)
                return (ENXIO);

        if (fman_rxtx_node[1] == 0)
                return (ENXIO);

        sc->sc_base.sc_rx_port = OF_device_from_xref(fman_rxtx_node[0]);
        sc->sc_base.sc_tx_port = OF_device_from_xref(fman_rxtx_node[1]);

        if (sc->sc_base.sc_rx_port == NULL || sc->sc_base.sc_tx_port == NULL)
                return (ENXIO);

        if (OF_getprop(fman_rxtx_node[1], "cell-index", &fman_tx_cell,
            sizeof(fman_tx_cell)) <= 0)
                return (ENXIO);
        /* Get QMan channel */
        sc->sc_base.sc_port_tx_qman_chan = fman_qman_channel_id(device_get_parent(dev),
            fman_tx_cell);

        return (dtsec_attach(dev));
}