/* SPDX-License-Identifier: BSD-3-Clause
 *
 * Copyright(c) 2019-2020 Xilinx, Inc.
 * Copyright(c) 2012-2019 Solarflare Communications Inc.
 */

#include "efx.h"
#include "efx_impl.h"

#if EFSYS_OPT_SIENA && EFSYS_OPT_MCDI

#define SIENA_MCDI_PDU(_emip)                   \
        (((emip)->emi_port == 1)                \
        ? MC_SMEM_P0_PDU_OFST >> 2              \
        : MC_SMEM_P1_PDU_OFST >> 2)

#define SIENA_MCDI_DOORBELL(_emip)              \
        (((emip)->emi_port == 1)                \
        ? MC_SMEM_P0_DOORBELL_OFST >> 2         \
        : MC_SMEM_P1_DOORBELL_OFST >> 2)

#define SIENA_MCDI_STATUS(_emip)                \
        (((emip)->emi_port == 1)                \
        ? MC_SMEM_P0_STATUS_OFST >> 2           \
        : MC_SMEM_P1_STATUS_OFST >> 2)


                        void
siena_mcdi_send_request(
        __in                    efx_nic_t *enp,
        __in_bcount(hdr_len)    void *hdrp,
        __in                    size_t hdr_len,
        __in_bcount(sdu_len)    void *sdup,
        __in                    size_t sdu_len)
{
        efx_mcdi_iface_t *emip = &(enp->en_mcdi.em_emip);
        efx_dword_t dword;
        unsigned int pdur;
        unsigned int dbr;
        unsigned int pos;

        EFSYS_ASSERT(enp->en_family == EFX_FAMILY_SIENA);

        EFSYS_ASSERT(emip->emi_port == 1 || emip->emi_port == 2);
        pdur = SIENA_MCDI_PDU(emip);
        dbr = SIENA_MCDI_DOORBELL(emip);

        /* Write the header */
        EFSYS_ASSERT3U(hdr_len, ==, sizeof (efx_dword_t));
        dword = *(efx_dword_t *)hdrp;
        EFX_BAR_TBL_WRITED(enp, FR_CZ_MC_TREG_SMEM, pdur, &dword, B_TRUE);

        /* Write the payload */
        for (pos = 0; pos < sdu_len; pos += sizeof (efx_dword_t)) {
                dword = *(efx_dword_t *)((uint8_t *)sdup + pos);
                EFX_BAR_TBL_WRITED(enp, FR_CZ_MC_TREG_SMEM,
                    pdur + 1 + (pos >> 2), &dword, B_FALSE);
        }

        /* Ring the doorbell */
        EFX_POPULATE_DWORD_1(dword, EFX_DWORD_0, 0xd004be11);
        EFX_BAR_TBL_WRITED(enp, FR_CZ_MC_TREG_SMEM, dbr, &dword, B_FALSE);
}

                        efx_rc_t
siena_mcdi_poll_reboot(
        __in            efx_nic_t *enp)
{
#if 1
        /*
         * XXX Bug 25922, bug 26099: This function is not being used
         * properly.  Until its callers are fixed, it should always
         * return 0.
         */
        _NOTE(ARGUNUSED(enp))
        return (0);
#else
        efx_mcdi_iface_t *emip = &(enp->en_mcdi.em_emip);
        unsigned int rebootr;
        efx_dword_t dword;
        uint32_t value;

        EFSYS_ASSERT(enp->en_family == EFX_FAMILY_SIENA);
        EFSYS_ASSERT(emip->emi_port == 1 || emip->emi_port == 2);
        rebootr = SIENA_MCDI_STATUS(emip);

        EFX_BAR_TBL_READD(enp, FR_CZ_MC_TREG_SMEM, rebootr, &dword, B_FALSE);
        value = EFX_DWORD_FIELD(dword, EFX_DWORD_0);

        if (value == 0)
                return (0);

        EFX_ZERO_DWORD(dword);
        EFX_BAR_TBL_WRITED(enp, FR_CZ_MC_TREG_SMEM, rebootr, &dword, B_FALSE);

        if (value == MC_STATUS_DWORD_ASSERT)
                return (EINTR);
        else
                return (EIO);
#endif
}

extern  __checkReturn   boolean_t
siena_mcdi_poll_response(
        __in            efx_nic_t *enp)
{
        efx_mcdi_iface_t *emip = &(enp->en_mcdi.em_emip);
        efx_dword_t hdr;
        unsigned int pdur;

        EFSYS_ASSERT(emip->emi_port == 1 || emip->emi_port == 2);
        pdur = SIENA_MCDI_PDU(emip);

        EFX_BAR_TBL_READD(enp, FR_CZ_MC_TREG_SMEM, pdur, &hdr, B_FALSE);
        return (EFX_DWORD_FIELD(hdr, MCDI_HEADER_RESPONSE) ? B_TRUE : B_FALSE);
}

                        void
siena_mcdi_read_response(
        __in                    efx_nic_t *enp,
        __out_bcount(length)    void *bufferp,
        __in                    size_t offset,
        __in                    size_t length)
{
        efx_mcdi_iface_t *emip = &(enp->en_mcdi.em_emip);
        unsigned int pdur;
        unsigned int pos = 0;
        efx_dword_t data;
        size_t remaining = length;

        EFSYS_ASSERT(emip->emi_port == 1 || emip->emi_port == 2);
        pdur = SIENA_MCDI_PDU(emip);

        while (remaining > 0) {
                size_t chunk = MIN(remaining, sizeof (data));

                EFX_BAR_TBL_READD(enp, FR_CZ_MC_TREG_SMEM,
                    pdur + ((offset + pos) >> 2), &data, B_FALSE);
                memcpy((uint8_t *)bufferp + pos, &data, chunk);
                pos += chunk;
                remaining -= chunk;
        }
}

        __checkReturn   efx_rc_t
siena_mcdi_init(
        __in            efx_nic_t *enp,
        __in            const efx_mcdi_transport_t *mtp)
{
        efx_mcdi_iface_t *emip = &(enp->en_mcdi.em_emip);
        efx_oword_t oword;
        unsigned int portnum;
        efx_rc_t rc;

        _NOTE(ARGUNUSED(mtp))

        EFSYS_ASSERT(enp->en_family == EFX_FAMILY_SIENA);

        /* Determine the port number to use for MCDI */
        EFX_BAR_READO(enp, FR_AZ_CS_DEBUG_REG, &oword);
        portnum = EFX_OWORD_FIELD(oword, FRF_CZ_CS_PORT_NUM);

        if (portnum == 0) {
                /* Presumably booted from ROM; only MCDI port 1 will work */
                emip->emi_port = 1;
        } else if (portnum <= 2) {
                emip->emi_port = portnum;
        } else {
                rc = EINVAL;
                goto fail1;
        }

        /* Siena BootROM and firmware only support MCDIv1 */
        emip->emi_max_version = 1;

        /*
         * Wipe the atomic reboot status so subsequent MCDI requests succeed.
         * BOOT_STATUS is preserved so eno_nic_probe() can boot out of the
         * assertion handler.
         */
        (void) siena_mcdi_poll_reboot(enp);

        return (0);

fail1:
        EFSYS_PROBE1(fail1, efx_rc_t, rc);

        return (rc);
}

                        void
siena_mcdi_fini(
        __in            efx_nic_t *enp)
{
        _NOTE(ARGUNUSED(enp))
}

        __checkReturn   efx_rc_t
siena_mcdi_feature_supported(
        __in            efx_nic_t *enp,
        __in            efx_mcdi_feature_id_t id,
        __out           boolean_t *supportedp)
{
        efx_rc_t rc;

        EFSYS_ASSERT3U(enp->en_family, ==, EFX_FAMILY_SIENA);

        switch (id) {
        case EFX_MCDI_FEATURE_FW_UPDATE:
        case EFX_MCDI_FEATURE_LINK_CONTROL:
        case EFX_MCDI_FEATURE_MACADDR_CHANGE:
        case EFX_MCDI_FEATURE_MAC_SPOOFING:
                *supportedp = B_TRUE;
                break;
        default:
                rc = ENOTSUP;
                goto fail1;
        }

        return (0);

fail1:
        EFSYS_PROBE1(fail1, efx_rc_t, rc);

        return (rc);
}

/* Default timeout for MCDI command processing. */
#define SIENA_MCDI_CMD_TIMEOUT_US       (10 * 1000 * 1000)

                        void
siena_mcdi_get_timeout(
        __in            efx_nic_t *enp,
        __in            efx_mcdi_req_t *emrp,
        __out           uint32_t *timeoutp)
{
        _NOTE(ARGUNUSED(enp, emrp))

        *timeoutp = SIENA_MCDI_CMD_TIMEOUT_US;
}


#endif  /* EFSYS_OPT_SIENA && EFSYS_OPT_MCDI */