// SPDX-License-Identifier: (GPL-2.0-or-later OR BSD-3-Clause)
/*
 * Copyright (c) 2014-2025, Advanced Micro Devices, Inc.
 * Copyright (c) 2014, Synopsys, Inc.
 * All rights reserved
 */

#include <linux/module.h>
#include <linux/device.h>
#include <linux/platform_device.h>
#include <linux/spinlock.h>
#include <linux/netdevice.h>
#include <linux/etherdevice.h>
#include <linux/io.h>
#include <linux/of.h>
#include <linux/of_net.h>
#include <linux/of_platform.h>
#include <linux/clk.h>
#include <linux/property.h>
#include <linux/acpi.h>
#include <linux/mdio.h>

#include "xgbe.h"
#include "xgbe-common.h"

#ifdef CONFIG_ACPI
static int xgbe_acpi_support(struct xgbe_prv_data *pdata)
{
        struct device *dev = pdata->dev;
        u32 property;
        int ret;

        /* Obtain the system clock setting */
        ret = device_property_read_u32(dev, XGBE_ACPI_DMA_FREQ, &property);
        if (ret) {
                dev_err(dev, "unable to obtain %s property\n",
                        XGBE_ACPI_DMA_FREQ);
                return ret;
        }
        pdata->sysclk_rate = property;

        /* Obtain the PTP clock setting */
        ret = device_property_read_u32(dev, XGBE_ACPI_PTP_FREQ, &property);
        if (ret) {
                dev_err(dev, "unable to obtain %s property\n",
                        XGBE_ACPI_PTP_FREQ);
                return ret;
        }
        pdata->ptpclk_rate = property;

        return 0;
}
#else   /* CONFIG_ACPI */
static int xgbe_acpi_support(struct xgbe_prv_data *pdata)
{
        return -EINVAL;
}
#endif  /* CONFIG_ACPI */

#ifdef CONFIG_OF
static int xgbe_of_support(struct xgbe_prv_data *pdata)
{
        struct device *dev = pdata->dev;

        /* Obtain the system clock setting */
        pdata->sysclk = devm_clk_get(dev, XGBE_DMA_CLOCK);
        if (IS_ERR(pdata->sysclk)) {
                dev_err(dev, "dma devm_clk_get failed\n");
                return PTR_ERR(pdata->sysclk);
        }
        pdata->sysclk_rate = clk_get_rate(pdata->sysclk);

        /* Obtain the PTP clock setting */
        pdata->ptpclk = devm_clk_get(dev, XGBE_PTP_CLOCK);
        if (IS_ERR(pdata->ptpclk)) {
                dev_err(dev, "ptp devm_clk_get failed\n");
                return PTR_ERR(pdata->ptpclk);
        }
        pdata->ptpclk_rate = clk_get_rate(pdata->ptpclk);

        return 0;
}

static struct platform_device *xgbe_of_get_phy_pdev(struct xgbe_prv_data *pdata)
{
        struct device *dev = pdata->dev;
        struct device_node *phy_node;
        struct platform_device *phy_pdev;

        phy_node = of_parse_phandle(dev->of_node, "phy-handle", 0);
        if (phy_node) {
                /* Old style device tree:
                 *   The XGBE and PHY resources are separate
                 */
                phy_pdev = of_find_device_by_node(phy_node);
                of_node_put(phy_node);
        } else {
                /* New style device tree:
                 *   The XGBE and PHY resources are grouped together with
                 *   the PHY resources listed last
                 */
                get_device(dev);
                phy_pdev = pdata->platdev;
        }

        return phy_pdev;
}
#else   /* CONFIG_OF */
static int xgbe_of_support(struct xgbe_prv_data *pdata)
{
        return -EINVAL;
}

static struct platform_device *xgbe_of_get_phy_pdev(struct xgbe_prv_data *pdata)
{
        return NULL;
}
#endif  /* CONFIG_OF */

static unsigned int xgbe_resource_count(struct platform_device *pdev,
                                        unsigned int type)
{
        unsigned int count;
        int i;

        for (i = 0, count = 0; i < pdev->num_resources; i++) {
                struct resource *res = &pdev->resource[i];

                if (type == resource_type(res))
                        count++;
        }

        return count;
}

static struct platform_device *xgbe_get_phy_pdev(struct xgbe_prv_data *pdata)
{
        struct platform_device *phy_pdev;

        if (pdata->use_acpi) {
                get_device(pdata->dev);
                phy_pdev = pdata->platdev;
        } else {
                phy_pdev = xgbe_of_get_phy_pdev(pdata);
        }

        return phy_pdev;
}

static int xgbe_platform_probe(struct platform_device *pdev)
{
        struct xgbe_prv_data *pdata;
        struct device *dev = &pdev->dev;
        struct platform_device *phy_pdev;
        const char *phy_mode;
        unsigned int phy_memnum, phy_irqnum;
        unsigned int dma_irqnum, dma_irqend;
        enum dev_dma_attr attr;
        int ret;

        pdata = xgbe_alloc_pdata(dev);
        if (IS_ERR(pdata)) {
                ret = PTR_ERR(pdata);
                goto err_alloc;
        }

        pdata->platdev = pdev;
        pdata->adev = ACPI_COMPANION(dev);
        platform_set_drvdata(pdev, pdata);

        /* Check if we should use ACPI or DT */
        pdata->use_acpi = dev->of_node ? 0 : 1;

        /* Get the version data */
        pdata->vdata = (struct xgbe_version_data *)device_get_match_data(dev);

        phy_pdev = xgbe_get_phy_pdev(pdata);
        if (!phy_pdev) {
                dev_err(dev, "unable to obtain phy device\n");
                ret = -EINVAL;
                goto err_phydev;
        }
        pdata->phy_platdev = phy_pdev;
        pdata->phy_dev = &phy_pdev->dev;

        if (pdev == phy_pdev) {
                /* New style device tree or ACPI:
                 *   The XGBE and PHY resources are grouped together with
                 *   the PHY resources listed last
                 */
                phy_memnum = xgbe_resource_count(pdev, IORESOURCE_MEM) - 3;
                phy_irqnum = platform_irq_count(pdev) - 1;
                dma_irqnum = 1;
                dma_irqend = phy_irqnum;
        } else {
                /* Old style device tree:
                 *   The XGBE and PHY resources are separate
                 */
                phy_memnum = 0;
                phy_irqnum = 0;
                dma_irqnum = 1;
                dma_irqend = platform_irq_count(pdev);
        }

        /* Obtain the mmio areas for the device */
        pdata->xgmac_regs = devm_platform_ioremap_resource(pdev, 0);
        if (IS_ERR(pdata->xgmac_regs)) {
                dev_err(dev, "xgmac ioremap failed\n");
                ret = PTR_ERR(pdata->xgmac_regs);
                goto err_io;
        }
        if (netif_msg_probe(pdata))
                dev_dbg(dev, "xgmac_regs = %p\n", pdata->xgmac_regs);

        pdata->xpcs_regs = devm_platform_ioremap_resource(pdev, 1);
        if (IS_ERR(pdata->xpcs_regs)) {
                dev_err(dev, "xpcs ioremap failed\n");
                ret = PTR_ERR(pdata->xpcs_regs);
                goto err_io;
        }
        if (netif_msg_probe(pdata))
                dev_dbg(dev, "xpcs_regs  = %p\n", pdata->xpcs_regs);

        pdata->rxtx_regs = devm_platform_ioremap_resource(phy_pdev,
                                                          phy_memnum++);
        if (IS_ERR(pdata->rxtx_regs)) {
                dev_err(dev, "rxtx ioremap failed\n");
                ret = PTR_ERR(pdata->rxtx_regs);
                goto err_io;
        }
        if (netif_msg_probe(pdata))
                dev_dbg(dev, "rxtx_regs  = %p\n", pdata->rxtx_regs);

        pdata->sir0_regs = devm_platform_ioremap_resource(phy_pdev,
                                                          phy_memnum++);
        if (IS_ERR(pdata->sir0_regs)) {
                dev_err(dev, "sir0 ioremap failed\n");
                ret = PTR_ERR(pdata->sir0_regs);
                goto err_io;
        }
        if (netif_msg_probe(pdata))
                dev_dbg(dev, "sir0_regs  = %p\n", pdata->sir0_regs);

        pdata->sir1_regs = devm_platform_ioremap_resource(phy_pdev,
                                                          phy_memnum++);
        if (IS_ERR(pdata->sir1_regs)) {
                dev_err(dev, "sir1 ioremap failed\n");
                ret = PTR_ERR(pdata->sir1_regs);
                goto err_io;
        }
        if (netif_msg_probe(pdata))
                dev_dbg(dev, "sir1_regs  = %p\n", pdata->sir1_regs);

        /* Retrieve the MAC address */
        ret = device_get_mac_address(dev, pdata->mac_addr);
        if (ret) {
                dev_err(dev, "invalid MAC address property\n");
                goto err_io;
        }

        /* Retrieve the PHY mode - it must be "xgmii" */
        ret = device_property_read_string(dev, XGBE_PHY_MODE_PROPERTY,
                                          &phy_mode);
        if (ret || strcmp(phy_mode, phy_modes(PHY_INTERFACE_MODE_XGMII))) {
                dev_err(dev, "invalid %s property\n", XGBE_PHY_MODE_PROPERTY);
                if (!ret)
                        ret = -EINVAL;
                goto err_io;
        }
        pdata->phy_mode = PHY_INTERFACE_MODE_XGMII;

        /* Check for per channel interrupt support */
        if (device_property_present(dev, XGBE_DMA_IRQS_PROPERTY)) {
                pdata->per_channel_irq = 1;
                pdata->channel_irq_mode = XGBE_IRQ_MODE_EDGE;
        }

        /* Obtain device settings unique to ACPI/OF */
        if (pdata->use_acpi)
                ret = xgbe_acpi_support(pdata);
        else
                ret = xgbe_of_support(pdata);
        if (ret)
                goto err_io;

        /* Set the DMA coherency values */
        attr = device_get_dma_attr(dev);
        if (attr == DEV_DMA_NOT_SUPPORTED) {
                dev_err(dev, "DMA is not supported");
                ret = -ENODEV;
                goto err_io;
        }
        pdata->coherent = (attr == DEV_DMA_COHERENT);
        if (pdata->coherent) {
                pdata->arcr = XGBE_DMA_OS_ARCR;
                pdata->awcr = XGBE_DMA_OS_AWCR;
        } else {
                pdata->arcr = XGBE_DMA_SYS_ARCR;
                pdata->awcr = XGBE_DMA_SYS_AWCR;
        }

        /* Set the maximum fifo amounts */
        pdata->tx_max_fifo_size = pdata->vdata->tx_max_fifo_size;
        pdata->rx_max_fifo_size = pdata->vdata->rx_max_fifo_size;

        /* Set the hardware channel and queue counts */
        xgbe_set_counts(pdata);

        /* Always have XGMAC and XPCS (auto-negotiation) interrupts */
        pdata->irq_count = 2;

        /* Get the device interrupt */
        ret = platform_get_irq(pdev, 0);
        if (ret < 0)
                goto err_io;
        pdata->dev_irq = ret;

        /* Get the per channel DMA interrupts */
        if (pdata->per_channel_irq) {
                unsigned int i, max = ARRAY_SIZE(pdata->channel_irq);

                for (i = 0; (i < max) && (dma_irqnum < dma_irqend); i++) {
                        ret = platform_get_irq(pdata->platdev, dma_irqnum++);
                        if (ret < 0)
                                goto err_io;

                        pdata->channel_irq[i] = ret;
                }

                pdata->channel_irq_count = max;

                pdata->irq_count += max;
        }

        /* Get the auto-negotiation interrupt */
        ret = platform_get_irq(phy_pdev, phy_irqnum++);
        if (ret < 0)
                goto err_io;
        pdata->an_irq = ret;

        /* Configure the netdev resource */
        ret = xgbe_config_netdev(pdata);
        if (ret)
                goto err_io;

        netdev_notice(pdata->netdev, "net device enabled\n");

        return 0;

err_io:
        platform_device_put(phy_pdev);

err_phydev:
        xgbe_free_pdata(pdata);

err_alloc:
        dev_notice(dev, "net device not enabled\n");

        return ret;
}

static void xgbe_platform_remove(struct platform_device *pdev)
{
        struct xgbe_prv_data *pdata = platform_get_drvdata(pdev);

        xgbe_deconfig_netdev(pdata);

        platform_device_put(pdata->phy_platdev);

        xgbe_free_pdata(pdata);
}

#ifdef CONFIG_PM_SLEEP
static int xgbe_platform_suspend(struct device *dev)
{
        struct xgbe_prv_data *pdata = dev_get_drvdata(dev);
        struct net_device *netdev = pdata->netdev;
        int ret = 0;

        DBGPR("-->xgbe_suspend\n");

        if (netif_running(netdev))
                ret = xgbe_powerdown(netdev);

        pdata->lpm_ctrl = XMDIO_READ(pdata, MDIO_MMD_PCS, MDIO_CTRL1);
        pdata->lpm_ctrl |= MDIO_CTRL1_LPOWER;
        XMDIO_WRITE(pdata, MDIO_MMD_PCS, MDIO_CTRL1, pdata->lpm_ctrl);

        DBGPR("<--xgbe_suspend\n");

        return ret;
}

static int xgbe_platform_resume(struct device *dev)
{
        struct xgbe_prv_data *pdata = dev_get_drvdata(dev);
        struct net_device *netdev = pdata->netdev;
        int ret = 0;

        DBGPR("-->xgbe_resume\n");

        pdata->lpm_ctrl &= ~MDIO_CTRL1_LPOWER;
        XMDIO_WRITE(pdata, MDIO_MMD_PCS, MDIO_CTRL1, pdata->lpm_ctrl);

        if (netif_running(netdev)) {
                ret = xgbe_powerup(netdev);

                /* Schedule a restart in case the link or phy state changed
                 * while we were powered down.
                 */
                schedule_work(&pdata->restart_work);
        }

        DBGPR("<--xgbe_resume\n");

        return ret;
}
#endif /* CONFIG_PM_SLEEP */

static const struct xgbe_version_data xgbe_v1 = {
        .init_function_ptrs_phy_impl    = xgbe_init_function_ptrs_phy_v1,
        .xpcs_access                    = XGBE_XPCS_ACCESS_V1,
        .tx_max_fifo_size               = 81920,
        .rx_max_fifo_size               = 81920,
        .tx_tstamp_workaround           = 1,
};

static const struct acpi_device_id xgbe_acpi_match[] = {
        { .id = "AMDI8001",
          .driver_data = (kernel_ulong_t)&xgbe_v1 },
        {},
};

MODULE_DEVICE_TABLE(acpi, xgbe_acpi_match);

static const struct of_device_id xgbe_of_match[] = {
        { .compatible = "amd,xgbe-seattle-v1a",
          .data = &xgbe_v1 },
        {},
};

MODULE_DEVICE_TABLE(of, xgbe_of_match);

static SIMPLE_DEV_PM_OPS(xgbe_platform_pm_ops,
                         xgbe_platform_suspend, xgbe_platform_resume);

static struct platform_driver xgbe_driver = {
        .driver = {
                .name = XGBE_DRV_NAME,
                .acpi_match_table = xgbe_acpi_match,
                .of_match_table = xgbe_of_match,
                .pm = &xgbe_platform_pm_ops,
        },
        .probe = xgbe_platform_probe,
        .remove = xgbe_platform_remove,
};

int xgbe_platform_init(void)
{
        return platform_driver_register(&xgbe_driver);
}

void xgbe_platform_exit(void)
{
        platform_driver_unregister(&xgbe_driver);
}