// SPDX-License-Identifier: GPL-2.0
/* Marvell OcteonTX CPT driver
 *
 * Copyright (C) 2019 Marvell International Ltd.
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License version 2 as
 * published by the Free Software Foundation.
 */

#include "otx_cpt_common.h"
#include "otx_cptpf.h"

static char *get_mbox_opcode_str(int msg_opcode)
{
        char *str = "Unknown";

        switch (msg_opcode) {
        case OTX_CPT_MSG_VF_UP:
                str = "UP";
                break;

        case OTX_CPT_MSG_VF_DOWN:
                str = "DOWN";
                break;

        case OTX_CPT_MSG_READY:
                str = "READY";
                break;

        case OTX_CPT_MSG_QLEN:
                str = "QLEN";
                break;

        case OTX_CPT_MSG_QBIND_GRP:
                str = "QBIND_GRP";
                break;

        case OTX_CPT_MSG_VQ_PRIORITY:
                str = "VQ_PRIORITY";
                break;

        case OTX_CPT_MSG_PF_TYPE:
                str = "PF_TYPE";
                break;

        case OTX_CPT_MSG_ACK:
                str = "ACK";
                break;

        case OTX_CPT_MSG_NACK:
                str = "NACK";
                break;
        }

        return str;
}

static void dump_mbox_msg(struct otx_cpt_mbox *mbox_msg, int vf_id)
{
        char raw_data_str[OTX_CPT_MAX_MBOX_DATA_STR_SIZE];

        hex_dump_to_buffer(mbox_msg, sizeof(struct otx_cpt_mbox), 16, 8,
                           raw_data_str, OTX_CPT_MAX_MBOX_DATA_STR_SIZE, false);
        if (vf_id >= 0)
                pr_debug("MBOX opcode %s received from VF%d raw_data %s\n",
                         get_mbox_opcode_str(mbox_msg->msg), vf_id,
                         raw_data_str);
        else
                pr_debug("MBOX opcode %s received from PF raw_data %s\n",
                         get_mbox_opcode_str(mbox_msg->msg), raw_data_str);
}

static void otx_cpt_send_msg_to_vf(struct otx_cpt_device *cpt, int vf,
                                   struct otx_cpt_mbox *mbx)
{
        /* Writing mbox(0) causes interrupt */
        writeq(mbx->data, cpt->reg_base + OTX_CPT_PF_VFX_MBOXX(vf, 1));
        writeq(mbx->msg, cpt->reg_base + OTX_CPT_PF_VFX_MBOXX(vf, 0));
}

/*
 * ACKs VF's mailbox message
 * @vf: VF to which ACK to be sent
 */
static void otx_cpt_mbox_send_ack(struct otx_cpt_device *cpt, int vf,
                              struct otx_cpt_mbox *mbx)
{
        mbx->data = 0ull;
        mbx->msg = OTX_CPT_MSG_ACK;
        otx_cpt_send_msg_to_vf(cpt, vf, mbx);
}

/* NACKs VF's mailbox message that PF is not able to complete the action */
static void otx_cptpf_mbox_send_nack(struct otx_cpt_device *cpt, int vf,
                                     struct otx_cpt_mbox *mbx)
{
        mbx->data = 0ull;
        mbx->msg = OTX_CPT_MSG_NACK;
        otx_cpt_send_msg_to_vf(cpt, vf, mbx);
}

static void otx_cpt_clear_mbox_intr(struct otx_cpt_device *cpt, u32 vf)
{
        /* W1C for the VF */
        writeq(1ull << vf, cpt->reg_base + OTX_CPT_PF_MBOX_INTX(0));
}

/*
 * Configure QLEN/Chunk sizes for VF
 */
static void otx_cpt_cfg_qlen_for_vf(struct otx_cpt_device *cpt, int vf,
                                    u32 size)
{
        union otx_cptx_pf_qx_ctl pf_qx_ctl;

        pf_qx_ctl.u = readq(cpt->reg_base + OTX_CPT_PF_QX_CTL(vf));
        pf_qx_ctl.s.size = size;
        pf_qx_ctl.s.cont_err = true;
        writeq(pf_qx_ctl.u, cpt->reg_base + OTX_CPT_PF_QX_CTL(vf));
}

/*
 * Configure VQ priority
 */
static void otx_cpt_cfg_vq_priority(struct otx_cpt_device *cpt, int vf, u32 pri)
{
        union otx_cptx_pf_qx_ctl pf_qx_ctl;

        pf_qx_ctl.u = readq(cpt->reg_base + OTX_CPT_PF_QX_CTL(vf));
        pf_qx_ctl.s.pri = pri;
        writeq(pf_qx_ctl.u, cpt->reg_base + OTX_CPT_PF_QX_CTL(vf));
}

static int otx_cpt_bind_vq_to_grp(struct otx_cpt_device *cpt, u8 q, u8 grp)
{
        struct device *dev = &cpt->pdev->dev;
        struct otx_cpt_eng_grp_info *eng_grp;
        union otx_cptx_pf_qx_ctl pf_qx_ctl;
        struct otx_cpt_ucode *ucode;

        if (q >= cpt->max_vfs) {
                dev_err(dev, "Requested queue %d is > than maximum avail %d\n",
                        q, cpt->max_vfs);
                return -EINVAL;
        }

        if (grp >= OTX_CPT_MAX_ENGINE_GROUPS) {
                dev_err(dev, "Requested group %d is > than maximum avail %d\n",
                        grp, OTX_CPT_MAX_ENGINE_GROUPS);
                return -EINVAL;
        }

        eng_grp = &cpt->eng_grps.grp[grp];
        if (!eng_grp->is_enabled) {
                dev_err(dev, "Requested engine group %d is disabled\n", grp);
                return -EINVAL;
        }

        pf_qx_ctl.u = readq(cpt->reg_base + OTX_CPT_PF_QX_CTL(q));
        pf_qx_ctl.s.grp = grp;
        writeq(pf_qx_ctl.u, cpt->reg_base + OTX_CPT_PF_QX_CTL(q));

        if (eng_grp->mirror.is_ena)
                ucode = &eng_grp->g->grp[eng_grp->mirror.idx].ucode[0];
        else
                ucode = &eng_grp->ucode[0];

        if (otx_cpt_uc_supports_eng_type(ucode, OTX_CPT_SE_TYPES))
                return OTX_CPT_SE_TYPES;
        else if (otx_cpt_uc_supports_eng_type(ucode, OTX_CPT_AE_TYPES))
                return OTX_CPT_AE_TYPES;
        else
                return BAD_OTX_CPTVF_TYPE;
}

/* Interrupt handler to handle mailbox messages from VFs */
static void otx_cpt_handle_mbox_intr(struct otx_cpt_device *cpt, int vf)
{
        int vftype = 0;
        struct otx_cpt_mbox mbx = {};
        struct device *dev = &cpt->pdev->dev;
        /*
         * MBOX[0] contains msg
         * MBOX[1] contains data
         */
        mbx.msg  = readq(cpt->reg_base + OTX_CPT_PF_VFX_MBOXX(vf, 0));
        mbx.data = readq(cpt->reg_base + OTX_CPT_PF_VFX_MBOXX(vf, 1));

        dump_mbox_msg(&mbx, vf);

        switch (mbx.msg) {
        case OTX_CPT_MSG_VF_UP:
                mbx.msg  = OTX_CPT_MSG_VF_UP;
                mbx.data = cpt->vfs_enabled;
                otx_cpt_send_msg_to_vf(cpt, vf, &mbx);
                break;
        case OTX_CPT_MSG_READY:
                mbx.msg  = OTX_CPT_MSG_READY;
                mbx.data = vf;
                otx_cpt_send_msg_to_vf(cpt, vf, &mbx);
                break;
        case OTX_CPT_MSG_VF_DOWN:
                /* First msg in VF teardown sequence */
                otx_cpt_mbox_send_ack(cpt, vf, &mbx);
                break;
        case OTX_CPT_MSG_QLEN:
                otx_cpt_cfg_qlen_for_vf(cpt, vf, mbx.data);
                otx_cpt_mbox_send_ack(cpt, vf, &mbx);
                break;
        case OTX_CPT_MSG_QBIND_GRP:
                vftype = otx_cpt_bind_vq_to_grp(cpt, vf, (u8)mbx.data);
                if ((vftype != OTX_CPT_AE_TYPES) &&
                    (vftype != OTX_CPT_SE_TYPES)) {
                        dev_err(dev, "VF%d binding to eng group %llu failed\n",
                                vf, mbx.data);
                        otx_cptpf_mbox_send_nack(cpt, vf, &mbx);
                } else {
                        mbx.msg = OTX_CPT_MSG_QBIND_GRP;
                        mbx.data = vftype;
                        otx_cpt_send_msg_to_vf(cpt, vf, &mbx);
                }
                break;
        case OTX_CPT_MSG_PF_TYPE:
                mbx.msg = OTX_CPT_MSG_PF_TYPE;
                mbx.data = cpt->pf_type;
                otx_cpt_send_msg_to_vf(cpt, vf, &mbx);
                break;
        case OTX_CPT_MSG_VQ_PRIORITY:
                otx_cpt_cfg_vq_priority(cpt, vf, mbx.data);
                otx_cpt_mbox_send_ack(cpt, vf, &mbx);
                break;
        default:
                dev_err(&cpt->pdev->dev, "Invalid msg from VF%d, msg 0x%llx\n",
                        vf, mbx.msg);
                break;
        }
}

void otx_cpt_mbox_intr_handler (struct otx_cpt_device *cpt, int mbx)
{
        u64 intr;
        u8  vf;

        intr = readq(cpt->reg_base + OTX_CPT_PF_MBOX_INTX(0));
        pr_debug("PF interrupt mbox%d mask 0x%llx\n", mbx, intr);
        for (vf = 0; vf < cpt->max_vfs; vf++) {
                if (intr & (1ULL << vf)) {
                        otx_cpt_handle_mbox_intr(cpt, vf);
                        otx_cpt_clear_mbox_intr(cpt, vf);
                }
        }
}