// SPDX-License-Identifier: GPL-2.0-only
/*
 * omap_device implementation
 *
 * Copyright (C) 2009-2010 Nokia Corporation
 * Paul Walmsley, Kevin Hilman
 *
 * Developed in collaboration with (alphabetical order): Benoit
 * Cousson, Thara Gopinath, Tony Lindgren, Rajendra Nayak, Vikram
 * Pandita, Sakari Poussa, Anand Sawant, Santosh Shilimkar, Richard
 * Woodruff
 *
 * This code provides a consistent interface for OMAP device drivers
 * to control power management and interconnect properties of their
 * devices.
 *
 * In the medium- to long-term, this code should be implemented as a
 * proper omap_bus/omap_device in Linux, no more platform_data func
 * pointers
 */
#undef DEBUG

#include <linux/kernel.h>
#include <linux/platform_device.h>
#include <linux/slab.h>
#include <linux/err.h>
#include <linux/io.h>
#include <linux/clk.h>
#include <linux/clkdev.h>
#include <linux/pm_domain.h>
#include <linux/pm_runtime.h>
#include <linux/of.h>
#include <linux/of_address.h>
#include <linux/of_irq.h>
#include <linux/notifier.h>

#include "common.h"
#include "soc.h"
#include "omap_device.h"
#include "omap_hwmod.h"

static struct omap_device *omap_device_alloc(struct platform_device *pdev,
                                struct omap_hwmod **ohs, int oh_cnt);
static void omap_device_delete(struct omap_device *od);
static struct dev_pm_domain omap_device_fail_pm_domain;
static struct dev_pm_domain omap_device_pm_domain;

/* Private functions */

static void _add_clkdev(struct omap_device *od, const char *clk_alias,
                       const char *clk_name)
{
        struct clk *r;
        int rc;

        if (!clk_alias || !clk_name)
                return;

        dev_dbg(&od->pdev->dev, "Creating %s -> %s\n", clk_alias, clk_name);

        r = clk_get_sys(dev_name(&od->pdev->dev), clk_alias);
        if (!IS_ERR(r)) {
                dev_dbg(&od->pdev->dev,
                         "alias %s already exists\n", clk_alias);
                clk_put(r);
                return;
        }

        r = clk_get_sys(NULL, clk_name);

        if (IS_ERR(r)) {
                struct of_phandle_args clkspec;

                clkspec.np = of_find_node_by_name(NULL, clk_name);

                r = of_clk_get_from_provider(&clkspec);

                rc = clk_register_clkdev(r, clk_alias,
                                         dev_name(&od->pdev->dev));
        } else {
                rc = clk_add_alias(clk_alias, dev_name(&od->pdev->dev),
                                   clk_name, NULL);
        }

        if (rc) {
                if (rc == -ENODEV || rc == -ENOMEM)
                        dev_err(&od->pdev->dev,
                                "clkdev_alloc for %s failed\n", clk_alias);
                else
                        dev_err(&od->pdev->dev,
                                "clk_get for %s failed\n", clk_name);
        }
}

/**
 * _add_hwmod_clocks_clkdev - Add clkdev entry for hwmod optional clocks
 * and main clock
 * @od: struct omap_device *od
 * @oh: struct omap_hwmod *oh
 *
 * For the main clock and every optional clock present per hwmod per
 * omap_device, this function adds an entry in the clkdev table of the
 * form <dev-id=dev_name, con-id=role> if it does not exist already.
 *
 * This allows drivers to get a pointer to its optional clocks based on its role
 * by calling clk_get(<dev*>, <role>).
 * In the case of the main clock, a "fck" alias is used.
 *
 * No return value.
 */
static void _add_hwmod_clocks_clkdev(struct omap_device *od,
                                     struct omap_hwmod *oh)
{
        int i;

        _add_clkdev(od, "fck", oh->main_clk);

        for (i = 0; i < oh->opt_clks_cnt; i++)
                _add_clkdev(od, oh->opt_clks[i].role, oh->opt_clks[i].clk);
}


/**
 * omap_device_build_from_dt - build an omap_device with multiple hwmods
 * @pdev: The platform device to update.
 *
 * Function for building an omap_device already registered from device-tree
 *
 * Returns 0 or PTR_ERR() on error.
 */
static int omap_device_build_from_dt(struct platform_device *pdev)
{
        struct omap_hwmod **hwmods;
        struct omap_device *od;
        struct omap_hwmod *oh;
        struct device_node *node = pdev->dev.of_node;
        struct resource res;
        const char *oh_name;
        int oh_cnt, i, ret = 0;
        bool device_active = false, skip_pm_domain = false;

        oh_cnt = of_property_count_strings(node, "ti,hwmods");
        if (oh_cnt <= 0) {
                dev_dbg(&pdev->dev, "No 'hwmods' to build omap_device\n");
                return -ENODEV;
        }

        /* SDMA still needs special handling for omap_device_build() */
        ret = of_property_read_string_index(node, "ti,hwmods", 0, &oh_name);
        if (!ret && (!strncmp("dma_system", oh_name, 10) ||
                     !strncmp("dma", oh_name, 3)))
                skip_pm_domain = true;

        /* Use ti-sysc driver instead of omap_device? */
        if (!skip_pm_domain &&
            !omap_hwmod_parse_module_range(NULL, node, &res))
                return -ENODEV;

        hwmods = kzalloc_objs(struct omap_hwmod *, oh_cnt);
        if (!hwmods) {
                ret = -ENOMEM;
                goto odbfd_exit;
        }

        for (i = 0; i < oh_cnt; i++) {
                of_property_read_string_index(node, "ti,hwmods", i, &oh_name);
                oh = omap_hwmod_lookup(oh_name);
                if (!oh) {
                        dev_err(&pdev->dev, "Cannot lookup hwmod '%s'\n",
                                oh_name);
                        ret = -EINVAL;
                        goto odbfd_exit1;
                }
                hwmods[i] = oh;
                if (oh->flags & HWMOD_INIT_NO_IDLE)
                        device_active = true;
        }

        od = omap_device_alloc(pdev, hwmods, oh_cnt);
        if (IS_ERR(od)) {
                dev_err(&pdev->dev, "Cannot allocate omap_device for :%s\n",
                        oh_name);
                ret = PTR_ERR(od);
                goto odbfd_exit1;
        }

        /* Fix up missing resource names */
        for (i = 0; i < pdev->num_resources; i++) {
                struct resource *r = &pdev->resource[i];

                if (r->name == NULL)
                        r->name = dev_name(&pdev->dev);
        }

        if (!skip_pm_domain) {
                dev_pm_domain_set(&pdev->dev, &omap_device_pm_domain);
                if (device_active) {
                        omap_device_enable(pdev);
                        pm_runtime_set_active(&pdev->dev);
                }
        }

odbfd_exit1:
        kfree(hwmods);
odbfd_exit:
        /* if data/we are at fault.. load up a fail handler */
        if (ret)
                dev_pm_domain_set(&pdev->dev, &omap_device_fail_pm_domain);

        return ret;
}

static int _omap_device_notifier_call(struct notifier_block *nb,
                                      unsigned long event, void *dev)
{
        struct platform_device *pdev = to_platform_device(dev);
        struct omap_device *od;
        int err;

        switch (event) {
        case BUS_NOTIFY_REMOVED_DEVICE:
                if (pdev->archdata.od)
                        omap_device_delete(pdev->archdata.od);
                break;
        case BUS_NOTIFY_UNBOUND_DRIVER:
                od = to_omap_device(pdev);
                if (od && (od->_state == OMAP_DEVICE_STATE_ENABLED)) {
                        dev_info(dev, "enabled after unload, idling\n");
                        err = omap_device_idle(pdev);
                        if (err)
                                dev_err(dev, "failed to idle\n");
                }
                break;
        case BUS_NOTIFY_BIND_DRIVER:
                od = to_omap_device(pdev);
                if (od) {
                        od->_driver_status = BUS_NOTIFY_BIND_DRIVER;
                        if (od->_state == OMAP_DEVICE_STATE_ENABLED &&
                            pm_runtime_status_suspended(dev)) {
                                pm_runtime_set_active(dev);
                        }
                }
                break;
        case BUS_NOTIFY_ADD_DEVICE:
                if (pdev->dev.of_node)
                        omap_device_build_from_dt(pdev);
                fallthrough;
        default:
                od = to_omap_device(pdev);
                if (od)
                        od->_driver_status = event;
        }

        return NOTIFY_DONE;
}

/**
 * _omap_device_enable_hwmods - call omap_hwmod_enable() on all hwmods
 * @od: struct omap_device *od
 *
 * Enable all underlying hwmods.  Returns 0.
 */
static int _omap_device_enable_hwmods(struct omap_device *od)
{
        int ret = 0;
        int i;

        for (i = 0; i < od->hwmods_cnt; i++)
                ret |= omap_hwmod_enable(od->hwmods[i]);

        return ret;
}

/**
 * _omap_device_idle_hwmods - call omap_hwmod_idle() on all hwmods
 * @od: struct omap_device *od
 *
 * Idle all underlying hwmods.  Returns 0.
 */
static int _omap_device_idle_hwmods(struct omap_device *od)
{
        int ret = 0;
        int i;

        for (i = 0; i < od->hwmods_cnt; i++)
                ret |= omap_hwmod_idle(od->hwmods[i]);

        return ret;
}

/* Public functions for use by core code */

/**
 * omap_device_alloc - allocate an omap_device
 * @pdev: platform_device that will be included in this omap_device
 * @ohs: ptr to the omap_hwmod for this omap_device
 * @oh_cnt: the size of the ohs list
 *
 * Convenience function for allocating an omap_device structure and filling
 * hwmods, and resources.
 *
 * Returns an struct omap_device pointer or ERR_PTR() on error;
 */
static struct omap_device *omap_device_alloc(struct platform_device *pdev,
                                        struct omap_hwmod **ohs, int oh_cnt)
{
        int ret = -ENOMEM;
        struct omap_device *od;
        int i;
        struct omap_hwmod **hwmods;

        od = kzalloc_obj(struct omap_device);
        if (!od)
                goto oda_exit1;

        od->hwmods_cnt = oh_cnt;

        hwmods = kmemdup_array(ohs, oh_cnt, sizeof(*hwmods), GFP_KERNEL);
        if (!hwmods)
                goto oda_exit2;

        od->hwmods = hwmods;
        od->pdev = pdev;
        pdev->archdata.od = od;

        for (i = 0; i < oh_cnt; i++) {
                hwmods[i]->od = od;
                _add_hwmod_clocks_clkdev(od, hwmods[i]);
        }

        return od;

oda_exit2:
        kfree(od);
oda_exit1:
        dev_err(&pdev->dev, "omap_device: build failed (%d)\n", ret);

        return ERR_PTR(ret);
}

static void omap_device_delete(struct omap_device *od)
{
        if (!od)
                return;

        od->pdev->archdata.od = NULL;
        kfree(od->hwmods);
        kfree(od);
}

#ifdef CONFIG_PM
static int _od_runtime_suspend(struct device *dev)
{
        struct platform_device *pdev = to_platform_device(dev);
        int ret;

        ret = pm_generic_runtime_suspend(dev);
        if (ret)
                return ret;

        return omap_device_idle(pdev);
}

static int _od_runtime_resume(struct device *dev)
{
        struct platform_device *pdev = to_platform_device(dev);
        int ret;

        ret = omap_device_enable(pdev);
        if (ret) {
                dev_err(dev, "use pm_runtime_put_sync_suspend() in driver?\n");
                return ret;
        }

        return pm_generic_runtime_resume(dev);
}

static int _od_fail_runtime_suspend(struct device *dev)
{
        dev_warn(dev, "%s: FIXME: missing hwmod/omap_dev info\n", __func__);
        return -ENODEV;
}

static int _od_fail_runtime_resume(struct device *dev)
{
        dev_warn(dev, "%s: FIXME: missing hwmod/omap_dev info\n", __func__);
        return -ENODEV;
}

#endif

#ifdef CONFIG_SUSPEND
static int _od_suspend_noirq(struct device *dev)
{
        struct platform_device *pdev = to_platform_device(dev);
        struct omap_device *od = to_omap_device(pdev);
        int ret;

        /* Don't attempt late suspend on a driver that is not bound */
        if (od->_driver_status != BUS_NOTIFY_BOUND_DRIVER)
                return 0;

        ret = pm_generic_suspend_noirq(dev);

        if (!ret && !pm_runtime_status_suspended(dev)) {
                if (pm_generic_runtime_suspend(dev) == 0) {
                        omap_device_idle(pdev);
                        od->flags |= OMAP_DEVICE_SUSPENDED;
                }
        }

        return ret;
}

static int _od_resume_noirq(struct device *dev)
{
        struct platform_device *pdev = to_platform_device(dev);
        struct omap_device *od = to_omap_device(pdev);

        if (od->flags & OMAP_DEVICE_SUSPENDED) {
                od->flags &= ~OMAP_DEVICE_SUSPENDED;
                omap_device_enable(pdev);
                pm_generic_runtime_resume(dev);
        }

        return pm_generic_resume_noirq(dev);
}
#else
#define _od_suspend_noirq NULL
#define _od_resume_noirq NULL
#endif

static struct dev_pm_domain omap_device_fail_pm_domain = {
        .ops = {
                SET_RUNTIME_PM_OPS(_od_fail_runtime_suspend,
                                   _od_fail_runtime_resume, NULL)
        }
};

static struct dev_pm_domain omap_device_pm_domain = {
        .ops = {
                SET_RUNTIME_PM_OPS(_od_runtime_suspend, _od_runtime_resume,
                                   NULL)
                USE_PLATFORM_PM_SLEEP_OPS
                SET_NOIRQ_SYSTEM_SLEEP_PM_OPS(_od_suspend_noirq,
                                              _od_resume_noirq)
        }
};

/* Public functions for use by device drivers through struct platform_data */

/**
 * omap_device_enable - fully activate an omap_device
 * @pdev: the platform device to activate
 *
 * Do whatever is necessary for the hwmods underlying omap_device @od
 * to be accessible and ready to operate.  This generally involves
 * enabling clocks, setting SYSCONFIG registers; and in the future may
 * involve remuxing pins.  Device drivers should call this function
 * indirectly via pm_runtime_get*().  Returns -EINVAL if called when
 * the omap_device is already enabled, or passes along the return
 * value of _omap_device_enable_hwmods().
 */
int omap_device_enable(struct platform_device *pdev)
{
        int ret;
        struct omap_device *od;

        od = to_omap_device(pdev);

        if (od->_state == OMAP_DEVICE_STATE_ENABLED) {
                dev_warn(&pdev->dev,
                         "omap_device: %s() called from invalid state %d\n",
                         __func__, od->_state);
                return -EINVAL;
        }

        ret = _omap_device_enable_hwmods(od);

        if (ret == 0)
                od->_state = OMAP_DEVICE_STATE_ENABLED;

        return ret;
}

/**
 * omap_device_idle - idle an omap_device
 * @pdev: The platform_device (omap_device) to idle
 *
 * Idle omap_device @od.  Device drivers call this function indirectly
 * via pm_runtime_put*().  Returns -EINVAL if the omap_device is not
 * currently enabled, or passes along the return value of
 * _omap_device_idle_hwmods().
 */
int omap_device_idle(struct platform_device *pdev)
{
        int ret;
        struct omap_device *od;

        od = to_omap_device(pdev);

        if (od->_state != OMAP_DEVICE_STATE_ENABLED) {
                dev_warn(&pdev->dev,
                         "omap_device: %s() called from invalid state %d\n",
                         __func__, od->_state);
                return -EINVAL;
        }

        ret = _omap_device_idle_hwmods(od);

        if (ret == 0)
                od->_state = OMAP_DEVICE_STATE_IDLE;

        return ret;
}

/**
 * omap_device_assert_hardreset - set a device's hardreset line
 * @pdev: struct platform_device * to reset
 * @name: const char * name of the reset line
 *
 * Set the hardreset line identified by @name on the IP blocks
 * associated with the hwmods backing the platform_device @pdev.  All
 * of the hwmods associated with @pdev must have the same hardreset
 * line linked to them for this to work.  Passes along the return value
 * of omap_hwmod_assert_hardreset() in the event of any failure, or
 * returns 0 upon success.
 */
int omap_device_assert_hardreset(struct platform_device *pdev, const char *name)
{
        struct omap_device *od = to_omap_device(pdev);
        int ret = 0;
        int i;

        for (i = 0; i < od->hwmods_cnt; i++) {
                ret = omap_hwmod_assert_hardreset(od->hwmods[i], name);
                if (ret)
                        break;
        }

        return ret;
}

/**
 * omap_device_deassert_hardreset - release a device's hardreset line
 * @pdev: struct platform_device * to reset
 * @name: const char * name of the reset line
 *
 * Release the hardreset line identified by @name on the IP blocks
 * associated with the hwmods backing the platform_device @pdev.  All
 * of the hwmods associated with @pdev must have the same hardreset
 * line linked to them for this to work.  Passes along the return
 * value of omap_hwmod_deassert_hardreset() in the event of any
 * failure, or returns 0 upon success.
 */
int omap_device_deassert_hardreset(struct platform_device *pdev,
                                   const char *name)
{
        struct omap_device *od = to_omap_device(pdev);
        int ret = 0;
        int i;

        for (i = 0; i < od->hwmods_cnt; i++) {
                ret = omap_hwmod_deassert_hardreset(od->hwmods[i], name);
                if (ret)
                        break;
        }

        return ret;
}

static struct notifier_block platform_nb = {
        .notifier_call = _omap_device_notifier_call,
};

static int __init omap_device_init(void)
{
        bus_register_notifier(&platform_bus_type, &platform_nb);
        return 0;
}
omap_postcore_initcall(omap_device_init);

/**
 * omap_device_late_idle - idle devices without drivers
 * @dev: struct device * associated with omap_device
 * @data: unused
 *
 * Check the driver bound status of this device, and idle it
 * if there is no driver attached.
 */
static int __init omap_device_late_idle(struct device *dev, void *data)
{
        struct platform_device *pdev = to_platform_device(dev);
        struct omap_device *od = to_omap_device(pdev);
        int i;

        if (!od)
                return 0;

        /*
         * If omap_device state is enabled, but has no driver bound,
         * idle it.
         */

        /*
         * Some devices (like memory controllers) are always kept
         * enabled, and should not be idled even with no drivers.
         */
        for (i = 0; i < od->hwmods_cnt; i++)
                if (od->hwmods[i]->flags & HWMOD_INIT_NO_IDLE)
                        return 0;

        if (od->_driver_status != BUS_NOTIFY_BOUND_DRIVER &&
            od->_driver_status != BUS_NOTIFY_BIND_DRIVER) {
                if (od->_state == OMAP_DEVICE_STATE_ENABLED) {
                        dev_warn(dev, "%s: enabled but no driver.  Idling\n",
                                 __func__);
                        omap_device_idle(pdev);
                }
        }

        return 0;
}

static int __init omap_device_late_init(void)
{
        bus_for_each_dev(&platform_bus_type, NULL, NULL, omap_device_late_idle);

        return 0;
}
omap_late_initcall_sync(omap_device_late_init);