/*
 * Copyright 2018 Advanced Micro Devices, Inc.
 *
 * Permission is hereby granted, free of charge, to any person obtaining a
 * copy of this software and associated documentation files (the "Software"),
 * to deal in the Software without restriction, including without limitation
 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
 * and/or sell copies of the Software, and to permit persons to whom the
 * Software is furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
 * THE COPYRIGHT HOLDER(S) OR AUTHOR(S) BE LIABLE FOR ANY CLAIM, DAMAGES OR
 * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
 * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
 * OTHER DEALINGS IN THE SOFTWARE.
 *
 * Authors: AMD
 *
 */

#include <linux/slab.h>

#include "reg_helper.h"
#include "core_types.h"
#include "clk_mgr_internal.h"
#include "rv1_clk_mgr.h"
#include "dce100/dce_clk_mgr.h"
#include "dce112/dce112_clk_mgr.h"
#include "rv1_clk_mgr_vbios_smu.h"
#include "rv1_clk_mgr_clk.h"

void rv1_init_clocks(struct clk_mgr *clk_mgr)
{
        memset(&(clk_mgr->clks), 0, sizeof(struct dc_clocks));
}

static int rv1_determine_dppclk_threshold(struct clk_mgr_internal *clk_mgr, struct dc_clocks *new_clocks)
{
        bool request_dpp_div = new_clocks->dispclk_khz > new_clocks->dppclk_khz;
        bool dispclk_increase = new_clocks->dispclk_khz > clk_mgr->base.clks.dispclk_khz;
        int disp_clk_threshold = new_clocks->max_supported_dppclk_khz;
        bool cur_dpp_div = clk_mgr->base.clks.dispclk_khz > clk_mgr->base.clks.dppclk_khz;

        /* increase clock, looking for div is 0 for current, request div is 1*/
        if (dispclk_increase) {
                /* already divided by 2, no need to reach target clk with 2 steps*/
                if (cur_dpp_div)
                        return new_clocks->dispclk_khz;

                /* request disp clk is lower than maximum supported dpp clk,
                 * no need to reach target clk with two steps.
                 */
                if (new_clocks->dispclk_khz <= disp_clk_threshold)
                        return new_clocks->dispclk_khz;

                /* target dpp clk not request divided by 2, still within threshold */
                if (!request_dpp_div)
                        return new_clocks->dispclk_khz;

        } else {
                /* decrease clock, looking for current dppclk divided by 2,
                 * request dppclk not divided by 2.
                 */

                /* current dpp clk not divided by 2, no need to ramp*/
                if (!cur_dpp_div)
                        return new_clocks->dispclk_khz;

                /* current disp clk is lower than current maximum dpp clk,
                 * no need to ramp
                 */
                if (clk_mgr->base.clks.dispclk_khz <= disp_clk_threshold)
                        return new_clocks->dispclk_khz;

                /* request dpp clk need to be divided by 2 */
                if (request_dpp_div)
                        return new_clocks->dispclk_khz;
        }

        return disp_clk_threshold;
}

static void ramp_up_dispclk_with_dpp(struct clk_mgr_internal *clk_mgr, struct dc *dc, struct dc_clocks *new_clocks)
{
        int i;
        int dispclk_to_dpp_threshold = rv1_determine_dppclk_threshold(clk_mgr, new_clocks);
        bool request_dpp_div = new_clocks->dispclk_khz > new_clocks->dppclk_khz;

        /* set disp clk to dpp clk threshold */

        clk_mgr->funcs->set_dispclk(clk_mgr, dispclk_to_dpp_threshold);
        clk_mgr->funcs->set_dprefclk(clk_mgr);


        /* update request dpp clk division option */
        for (i = 0; i < dc->res_pool->pipe_count; i++) {
                struct pipe_ctx *pipe_ctx = &dc->current_state->res_ctx.pipe_ctx[i];

                if (!pipe_ctx->plane_state)
                        continue;

                pipe_ctx->plane_res.dpp->funcs->dpp_dppclk_control(
                                pipe_ctx->plane_res.dpp,
                                request_dpp_div,
                                true);
        }

        /* If target clk not same as dppclk threshold, set to target clock */
        if (dispclk_to_dpp_threshold != new_clocks->dispclk_khz) {
                clk_mgr->funcs->set_dispclk(clk_mgr, new_clocks->dispclk_khz);
                clk_mgr->funcs->set_dprefclk(clk_mgr);
        }


        clk_mgr->base.clks.dispclk_khz = new_clocks->dispclk_khz;
        clk_mgr->base.clks.dppclk_khz = new_clocks->dppclk_khz;
        clk_mgr->base.clks.max_supported_dppclk_khz = new_clocks->max_supported_dppclk_khz;
}

static void rv1_update_clocks(struct clk_mgr *clk_mgr_base,
                        struct dc_state *context,
                        bool safe_to_lower)
{
        struct clk_mgr_internal *clk_mgr = TO_CLK_MGR_INTERNAL(clk_mgr_base);
        struct dc *dc = clk_mgr_base->ctx->dc;
        struct dc_debug_options *debug = &dc->debug;
        struct dc_clocks *new_clocks = &context->bw_ctx.bw.dcn.clk;
        struct pp_smu_funcs_rv *pp_smu = NULL;
        bool send_request_to_increase = false;
        bool send_request_to_lower = false;
        int display_count;

        bool enter_display_off = false;

        ASSERT(clk_mgr->pp_smu);

        if (dc->work_arounds.skip_clock_update)
                return;

        pp_smu = &clk_mgr->pp_smu->rv_funcs;

        display_count = clk_mgr_helper_get_active_display_cnt(dc, context);

        if (display_count == 0)
                enter_display_off = true;

        if (enter_display_off == safe_to_lower) {
                /*
                 * Notify SMU active displays
                 * if function pointer not set up, this message is
                 * sent as part of pplib_apply_display_requirements.
                 */
                if (pp_smu->set_display_count)
                        pp_smu->set_display_count(&pp_smu->pp_smu, display_count);
        }

        if (new_clocks->dispclk_khz > clk_mgr_base->clks.dispclk_khz
                        || new_clocks->phyclk_khz > clk_mgr_base->clks.phyclk_khz
                        || new_clocks->fclk_khz > clk_mgr_base->clks.fclk_khz
                        || new_clocks->dcfclk_khz > clk_mgr_base->clks.dcfclk_khz)
                send_request_to_increase = true;

        if (should_set_clock(safe_to_lower, new_clocks->phyclk_khz, clk_mgr_base->clks.phyclk_khz)) {
                clk_mgr_base->clks.phyclk_khz = new_clocks->phyclk_khz;
                send_request_to_lower = true;
        }

        // F Clock
        if (debug->force_fclk_khz != 0)
                new_clocks->fclk_khz = debug->force_fclk_khz;

        if (should_set_clock(safe_to_lower, new_clocks->fclk_khz, clk_mgr_base->clks.fclk_khz)) {
                clk_mgr_base->clks.fclk_khz = new_clocks->fclk_khz;
                send_request_to_lower = true;
        }

        //DCF Clock
        if (should_set_clock(safe_to_lower, new_clocks->dcfclk_khz, clk_mgr_base->clks.dcfclk_khz)) {
                clk_mgr_base->clks.dcfclk_khz = new_clocks->dcfclk_khz;
                send_request_to_lower = true;
        }

        if (should_set_clock(safe_to_lower,
                        new_clocks->dcfclk_deep_sleep_khz, clk_mgr_base->clks.dcfclk_deep_sleep_khz)) {
                clk_mgr_base->clks.dcfclk_deep_sleep_khz = new_clocks->dcfclk_deep_sleep_khz;
                send_request_to_lower = true;
        }

        /* make sure dcf clk is before dpp clk to
         * make sure we have enough voltage to run dpp clk
         */
        if (send_request_to_increase) {
                /*use dcfclk to request voltage*/
                if (pp_smu->set_hard_min_fclk_by_freq &&
                                pp_smu->set_hard_min_dcfclk_by_freq &&
                                pp_smu->set_min_deep_sleep_dcfclk) {
                        pp_smu->set_hard_min_fclk_by_freq(&pp_smu->pp_smu, new_clocks->fclk_khz / 1000);
                        pp_smu->set_hard_min_dcfclk_by_freq(&pp_smu->pp_smu, new_clocks->dcfclk_khz / 1000);
                        pp_smu->set_min_deep_sleep_dcfclk(&pp_smu->pp_smu, (new_clocks->dcfclk_deep_sleep_khz + 999) / 1000);
                }
        }

        /* dcn1 dppclk is tied to dispclk */
        /* program dispclk on = as a w/a for sleep resume clock ramping issues */
        if (should_set_clock(safe_to_lower, new_clocks->dispclk_khz, clk_mgr_base->clks.dispclk_khz)
                        || new_clocks->dispclk_khz == clk_mgr_base->clks.dispclk_khz) {
                ramp_up_dispclk_with_dpp(clk_mgr, dc, new_clocks);
                clk_mgr_base->clks.dispclk_khz = new_clocks->dispclk_khz;
                send_request_to_lower = true;
        }

        if (!send_request_to_increase && send_request_to_lower) {
                /*use dcfclk to request voltage*/
                if (pp_smu->set_hard_min_fclk_by_freq &&
                                pp_smu->set_hard_min_dcfclk_by_freq &&
                                pp_smu->set_min_deep_sleep_dcfclk) {
                        pp_smu->set_hard_min_fclk_by_freq(&pp_smu->pp_smu, new_clocks->fclk_khz / 1000);
                        pp_smu->set_hard_min_dcfclk_by_freq(&pp_smu->pp_smu, new_clocks->dcfclk_khz / 1000);
                        pp_smu->set_min_deep_sleep_dcfclk(&pp_smu->pp_smu, (new_clocks->dcfclk_deep_sleep_khz + 999) / 1000);
                }
        }
}

static void rv1_enable_pme_wa(struct clk_mgr *clk_mgr_base)
{
        struct clk_mgr_internal *clk_mgr = TO_CLK_MGR_INTERNAL(clk_mgr_base);
        struct pp_smu_funcs_rv *pp_smu = NULL;

        if (clk_mgr->pp_smu) {
                pp_smu = &clk_mgr->pp_smu->rv_funcs;

                if (pp_smu->set_pme_wa_enable)
                        pp_smu->set_pme_wa_enable(&pp_smu->pp_smu);
        }
}

static struct clk_mgr_funcs rv1_clk_funcs = {
        .init_clocks = rv1_init_clocks,
        .get_dp_ref_clk_frequency = dce12_get_dp_ref_freq_khz,
        .update_clocks = rv1_update_clocks,
        .enable_pme_wa = rv1_enable_pme_wa,
};

static struct clk_mgr_internal_funcs rv1_clk_internal_funcs = {
        .set_dispclk = rv1_vbios_smu_set_dispclk,
        .set_dprefclk = dce112_set_dprefclk
};

void rv1_clk_mgr_construct(struct dc_context *ctx, struct clk_mgr_internal *clk_mgr, struct pp_smu_funcs *pp_smu)
{
        struct dc_debug_options *debug = &ctx->dc->debug;
        struct dc_bios *bp = ctx->dc_bios;

        clk_mgr->base.ctx = ctx;
        clk_mgr->pp_smu = pp_smu;
        clk_mgr->base.funcs = &rv1_clk_funcs;
        clk_mgr->funcs = &rv1_clk_internal_funcs;

        clk_mgr->dfs_bypass_disp_clk = 0;

        clk_mgr->dprefclk_ss_percentage = 0;
        clk_mgr->dprefclk_ss_divider = 1000;
        clk_mgr->ss_on_dprefclk = false;
        clk_mgr->base.dprefclk_khz = 600000;

        if (bp->integrated_info)
                clk_mgr->base.dentist_vco_freq_khz = bp->integrated_info->dentist_vco_freq;
        if (bp->fw_info_valid && clk_mgr->base.dentist_vco_freq_khz == 0) {
                clk_mgr->base.dentist_vco_freq_khz = bp->fw_info.smu_gpu_pll_output_freq;
                if (clk_mgr->base.dentist_vco_freq_khz == 0)
                        clk_mgr->base.dentist_vco_freq_khz = 3600000;
        }

        if (!debug->disable_dfs_bypass && bp->integrated_info)
                if (bp->integrated_info->gpu_cap_info & DFS_BYPASS_ENABLE)
                        clk_mgr->dfs_bypass_enabled = true;

        dce_clock_read_ss_info(clk_mgr);
}