// SPDX-License-Identifier: GPL-2.0-only
/*
 * Copyright (C) 2021 Linaro Ltd
 * Author: Ulf Hansson <ulf.hansson@linaro.org>
 *
 * Copyright (C) 2014 Intel Corp, All Rights Reserved.
 * Author: Yi Sun <yi.y.sun@intel.com>
 *
 * Copyright (C) 2020 Genesys Logic, Inc.
 * Authors: Ben Chuang <ben.chuang@genesyslogic.com.tw>
 *
 * Copyright (C) 2020 Linaro Limited
 * Author: AKASHI Takahiro <takahiro.akashi@linaro.org>
 *
 * Copyright (C) 2022 Genesys Logic, Inc.
 * Authors: Jason Lai <jason.lai@genesyslogic.com.tw>
 *
 * Copyright (C) 2023 Genesys Logic, Inc.
 * Authors: Victor Shih <victor.shih@genesyslogic.com.tw>
 *
 * Support for SD UHS-II cards
 */
#include <linux/err.h>
#include <linux/pm_runtime.h>

#include <linux/mmc/host.h>
#include <linux/mmc/card.h>
#include <linux/mmc/mmc.h>
#include <linux/mmc/sd.h>
#include <linux/mmc/sd_uhs2.h>

#include "card.h"
#include "core.h"
#include "bus.h"
#include "sd.h"
#include "sd_ops.h"
#include "mmc_ops.h"

#define UHS2_WAIT_CFG_COMPLETE_PERIOD_US  (1 * 1000)
#define UHS2_WAIT_CFG_COMPLETE_TIMEOUT_MS 100

static const unsigned int sd_uhs2_freqs[] = { 52000000, 26000000 };

struct sd_uhs2_wait_active_state_data {
 struct mmc_host *host;
 struct mmc_command *cmd;
};

static int sd_uhs2_power_up(struct mmc_host *host)
{
 if (host->ios.power_mode == MMC_POWER_ON)
  return 0;

 host->ios.vdd = fls(host->ocr_avail) - 1;
 host->ios.clock = host->f_init;
 host->ios.timing = MMC_TIMING_UHS2_SPEED_A;
 host->ios.power_mode = MMC_POWER_ON;

 return host->ops->uhs2_control(host, UHS2_SET_IOS);
}

static int sd_uhs2_power_off(struct mmc_host *host)
{
 int err;

 if (host->ios.power_mode == MMC_POWER_OFF)
  return 0;

 host->ios.vdd = 0;
 host->ios.clock = 0;
 host->ios.power_mode = MMC_POWER_OFF;
 host->uhs2_sd_tran = false;

 err = host->ops->uhs2_control(host, UHS2_SET_IOS);
 if (err)
  return err;

 /* For consistency, let's restore the initial timing. */
 host->ios.timing = MMC_TIMING_LEGACY;
 return 0;
}

/*
 * Run the phy initialization sequence, which mainly relies on the UHS-II host
 * to check that we reach the expected electrical state, between the host and
 * the card.
 */
static int sd_uhs2_phy_init(struct mmc_host *host)
{
 int err;

 err = host->ops->uhs2_control(host, UHS2_PHY_INIT);
 if (err) {
  pr_debug("%s: failed to initial phy for UHS-II!\n",
    mmc_hostname(host));
 }

 return err;
}

/*
 * sd_uhs2_cmd_assemble() - build up UHS-II command packet which is embedded in
 *                          mmc_command structure
 * @cmd: MMC command to executed
 * @uhs2_cmd: UHS2 command corresponded to MMC command
 * @header: Header field of UHS-II command cxpacket
 * @arg: Argument field of UHS-II command packet
 * @payload: Payload field of UHS-II command packet
 * @plen: Payload length
 * @resp: Response buffer is allocated by caller and it is used to keep
 *              the response of CM-TRAN command. For SD-TRAN command, uhs2_resp
 *              should be null and SD-TRAN command response should be stored in
 *              resp of mmc_command.
 * @resp_len: Response buffer length
 *
 * The uhs2_command structure contains message packets which are transmited/
 * received on UHS-II bus. This function fills in the contents of uhs2_command
 * structure and embededs UHS2 command into mmc_command structure, which is used
 * in legacy SD operation functions.
 *
 */
static void sd_uhs2_cmd_assemble(struct mmc_command *cmd,
     struct uhs2_command *uhs2_cmd,
     u8 plen, u8 resp_len)
{
 uhs2_cmd->payload_len = plen * sizeof(u32);
 uhs2_cmd->packet_len = uhs2_cmd->payload_len + 4;

 cmd->uhs2_cmd = uhs2_cmd;
 cmd->uhs2_cmd->uhs2_resp_len = resp_len;
}

/*
 * Do the early initialization of the card, by sending the device init broadcast
 * command and wait for the process to be completed.
 */
static int sd_uhs2_dev_init(struct mmc_host *host)
{
 struct mmc_command cmd = {0};
 struct uhs2_command uhs2_cmd = {};
 u32 cnt;
 u32 dap, gap, resp_gap;
 u32 payload0;
 u8 gd = 0;
 int err;

 dap = host->uhs2_caps.dap;
 gap = host->uhs2_caps.gap;

 /*
  * Refer to UHS-II Addendum Version 1.02 Figure 6-21 to see DEVICE_INIT CCMD format.
  * Head:
  *      - Control Write(R/W=1) with 4-Byte payload(PLEN=01b).
  *      - IOADR = CMD_BASE + 002h
  * Payload:
  *      - bit [3:0]  : GAP(Group Allocated Power)
  *      - bit [7:4]  : GD(Group Descriptor)
  *      - bit [11]   : Complete Flag
  *      - bit [15:12]: DAP(Device Allocated Power)
 */
 uhs2_cmd.header = UHS2_NATIVE_PACKET | UHS2_PACKET_TYPE_CCMD;
 uhs2_cmd.arg = ((UHS2_DEV_CMD_DEVICE_INIT & 0xFF) << 8) |
        UHS2_NATIVE_CMD_WRITE |
        UHS2_NATIVE_CMD_PLEN_4B |
        (UHS2_DEV_CMD_DEVICE_INIT >> 8);

 /*
  * Refer to UHS-II Addendum Version 1.02 section 6.3.1.
  * Max. time from DEVICE_INIT CCMD EOP reception on Device
  * Rx to its SOP transmission on Device Tx(Tfwd_init_cmd) is
  * 1 second.
 */
 cmd.busy_timeout = 1000;

 /*
  * Refer to UHS-II Addendum Version 1.02 section 6.2.6.3.
  * Let's retry the DEVICE_INIT command no more than 30 times.
 */
 for (cnt = 0; cnt < 30; cnt++) {
  payload0 = ((dap & 0xF) << 12) |
       UHS2_DEV_INIT_COMPLETE_FLAG |
       ((gd & 0xF) << 4) |
       (gap & 0xF);
  uhs2_cmd.payload[0] = (__force __be32)payload0;

  sd_uhs2_cmd_assemble(&cmd, &uhs2_cmd, UHS2_DEV_INIT_PAYLOAD_LEN,
         UHS2_DEV_INIT_RESP_LEN);

  err = mmc_wait_for_cmd(host, &cmd, 0);

  if (err) {
   pr_err("%s: %s: UHS2 CMD send fail, err= 0x%x!\n",
          mmc_hostname(host), __func__, err);
   continue;
  }

  if (uhs2_cmd.uhs2_resp[3] != (UHS2_DEV_CMD_DEVICE_INIT & 0xFF)) {
   pr_err("%s: DEVICE_INIT response is wrong!\n",
          mmc_hostname(host));
   return -EIO;
  }

  if (uhs2_cmd.uhs2_resp[5] & 0x8) {
   host->uhs2_caps.group_desc = gd;
   return 0;
  }
  resp_gap = uhs2_cmd.uhs2_resp[4] & 0x0F;
  if (gap == resp_gap)
   gd++;
 }

 if (err) {
  pr_err("%s: %s: UHS2 CMD send fail, err= 0x%x!\n",
         mmc_hostname(host), __func__, err);
  return err;
 }

 return 0;
}

/*
 * Run the enumeration process by sending the enumerate command to the card.
 * Note that, we currently support only the point to point connection, which
 * means only one card can be attached per host/slot.
 */
static int sd_uhs2_enum(struct mmc_host *host, u32 *node_id)
{
 struct mmc_command cmd = {0};
 struct uhs2_command uhs2_cmd = {};
 u32 payload0;
 u8 id_f = 0xF, id_l = 0x0;
 int err;

 /*
  * Refer to UHS-II Addendum Version 1.02 Figure 6-28 to see ENUMERATE CCMD format.
  * Header:
  *      - Control Write(R/W=1) with 4-Byte payload(PLEN=01b).
  *      - IOADR = CMD_BASE + 003h
  * Payload:
  *      - bit [3:0]: ID_L(Last Node ID)
  *      - bit [7:4]: ID_F(First Node ID)
 */
 uhs2_cmd.header = UHS2_NATIVE_PACKET | UHS2_PACKET_TYPE_CCMD;
 uhs2_cmd.arg = ((UHS2_DEV_CMD_ENUMERATE & 0xFF) << 8) |
   UHS2_NATIVE_CMD_WRITE |
   UHS2_NATIVE_CMD_PLEN_4B |
   (UHS2_DEV_CMD_ENUMERATE >> 8);

 payload0 = (id_f << 4) | id_l;
 uhs2_cmd.payload[0] = cpu_to_be32(payload0);

 sd_uhs2_cmd_assemble(&cmd, &uhs2_cmd, UHS2_DEV_ENUM_PAYLOAD_LEN, UHS2_DEV_ENUM_RESP_LEN);

 err = mmc_wait_for_cmd(host, &cmd, 0);
 if (err) {
  pr_err("%s: %s: UHS2 CMD send fail, err= 0x%x!\n",
         mmc_hostname(host), __func__, err);
  return err;
 }

 if (uhs2_cmd.uhs2_resp[3] != (UHS2_DEV_CMD_ENUMERATE & 0xFF)) {
  pr_err("%s: ENUMERATE response is wrong!\n",
         mmc_hostname(host));
  return -EIO;
 }

 id_f = (uhs2_cmd.uhs2_resp[4] >> 4) & 0xF;
 id_l = uhs2_cmd.uhs2_resp[4] & 0xF;
 *node_id = id_f;

 return 0;
}

/*
 * Read the UHS-II configuration registers (CFG_REG) of the card, by sending it
 * commands and by parsing the responses. Store a copy of the relevant data in
 * card->uhs2_config.
 */
static int sd_uhs2_config_read(struct mmc_host *host, struct mmc_card *card)
{
 struct mmc_command cmd = {0};
 struct uhs2_command uhs2_cmd = {};
 u32 cap;
 int err;

 /*
  * Use Control Read CCMD to read Generic Capability from Configuration Register.
  * - Control Write(R/W=1) with 4-Byte payload(PLEN=01b).
  * - IOADR = Generic Capability Register(CFG_BASE + 000h)
 */
 uhs2_cmd.header = UHS2_NATIVE_PACKET | UHS2_PACKET_TYPE_CCMD | card->uhs2_config.node_id;
 uhs2_cmd.arg = ((UHS2_DEV_CONFIG_GEN_CAPS & 0xFF) << 8) |
   UHS2_NATIVE_CMD_READ |
   UHS2_NATIVE_CMD_PLEN_4B |
   (UHS2_DEV_CONFIG_GEN_CAPS >> 8);

 /*
  * There is no payload because per spec, there should be
  * no payload field for read CCMD.
  * Plen is set in arg. Per spec, plen for read CCMD
  * represents the len of read data which is assigned in payload
  * of following RES (p136).
 */
 sd_uhs2_cmd_assemble(&cmd, &uhs2_cmd, 0, 0);

 err = mmc_wait_for_cmd(host, &cmd, 0);
 if (err) {
  pr_err("%s: %s: UHS2 CMD send fail, err= 0x%x!\n",
         mmc_hostname(host), __func__, err);
  return err;
 }

 /*
  * Generic Capability Register:
  * bit [7:0]  : Reserved
  * bit [13:8] : Device-Specific Number of Lanes and Functionality
  *              bit 8: 2L-HD
  *              bit 9: 2D-1U FD
  *              bit 10: 1D-2U FD
  *              bit 11: 2D-2U FD
  *              Others: Reserved
  * bit [14]   : DADR Length
  *              0: 4 bytes
  *              1: Reserved
  * bit [23:16]: Application Type
  *              bit 16: 0=Non-SD memory, 1=SD memory
  *              bit 17: 0=Non-SDIO, 1=SDIO
  *              bit 18: 0=Card, 1=Embedded
  * bit [63:24]: Reserved
 */
 cap = cmd.resp[0];
 card->uhs2_config.n_lanes =
    (cap >> UHS2_DEV_CONFIG_N_LANES_POS) &
    UHS2_DEV_CONFIG_N_LANES_MASK;
 card->uhs2_config.dadr_len =
    (cap >> UHS2_DEV_CONFIG_DADR_POS) &
    UHS2_DEV_CONFIG_DADR_MASK;
 card->uhs2_config.app_type =
    (cap >> UHS2_DEV_CONFIG_APP_POS) &
    UHS2_DEV_CONFIG_APP_MASK;

 /*
  * Use Control Read CCMD to read PHY Capability from Configuration Register.
  * - Control Write(R/W=1) with 8-Byte payload(PLEN=10b).
  * - IOADR = PHY Capability Register(CFG_BASE + 002h)
 */
 uhs2_cmd.arg = ((UHS2_DEV_CONFIG_PHY_CAPS & 0xFF) << 8) |
   UHS2_NATIVE_CMD_READ |
   UHS2_NATIVE_CMD_PLEN_8B |
   (UHS2_DEV_CONFIG_PHY_CAPS >> 8);

 sd_uhs2_cmd_assemble(&cmd, &uhs2_cmd, 0, 0);

 err = mmc_wait_for_cmd(host, &cmd, 0);
 if (err) {
  pr_err("%s: %s: UHS2 CMD send fail, err= 0x%x!\n",
         mmc_hostname(host), __func__, err);
  return err;
 }

 /*
  * PHY Capability Register:
  * bit [3:0]  : PHY Minor Revision
  * bit [5:4]  : PHY Major Revision
  * bit [15]   : Support Hibernate Mode
  *              0: Not support Hibernate Mode
  *              1: Support Hibernate Mode
  * bit [31:16]: Reserved
  * bit [35:32]: Device-Specific N_LSS_SYN
  * bit [39:36]: Device-Specific N_LSS_DIR
  * bit [63:40]: Reserved
 */
 cap = cmd.resp[0];
 card->uhs2_config.phy_minor_rev =
    cap & UHS2_DEV_CONFIG_PHY_MINOR_MASK;
 card->uhs2_config.phy_major_rev =
    (cap >> UHS2_DEV_CONFIG_PHY_MAJOR_POS) &
     UHS2_DEV_CONFIG_PHY_MAJOR_MASK;
 card->uhs2_config.can_hibernate =
    (cap >> UHS2_DEV_CONFIG_CAN_HIBER_POS) &
     UHS2_DEV_CONFIG_CAN_HIBER_MASK;

 cap = cmd.resp[1];
 card->uhs2_config.n_lss_sync =
    cap & UHS2_DEV_CONFIG_N_LSS_SYN_MASK;
 card->uhs2_config.n_lss_dir =
    (cap >> UHS2_DEV_CONFIG_N_LSS_DIR_POS) &
    UHS2_DEV_CONFIG_N_LSS_DIR_MASK;
 if (card->uhs2_config.n_lss_sync == 0)
  card->uhs2_config.n_lss_sync = 16 << 2;
 else
  card->uhs2_config.n_lss_sync <<= 2;

 if (card->uhs2_config.n_lss_dir == 0)
  card->uhs2_config.n_lss_dir = 16 << 3;
 else
  card->uhs2_config.n_lss_dir <<= 3;

 /*
  * Use Control Read CCMD to read LINK/TRAN Capability from Configuration Register.
  * - Control Write(R/W=1) with 8-Byte payload(PLEN=10b).
  * - IOADR = LINK/TRAN Capability Register(CFG_BASE + 004h)
 */
 uhs2_cmd.arg = ((UHS2_DEV_CONFIG_LINK_TRAN_CAPS & 0xFF) << 8) |
   UHS2_NATIVE_CMD_READ |
   UHS2_NATIVE_CMD_PLEN_8B |
   (UHS2_DEV_CONFIG_LINK_TRAN_CAPS >> 8);

 sd_uhs2_cmd_assemble(&cmd, &uhs2_cmd, 0, 0);

 err = mmc_wait_for_cmd(host, &cmd, 0);
 if (err) {
  pr_err("%s: %s: UHS2 CMD send fail, err= 0x%x!\n",
         mmc_hostname(host), __func__, err);
  return err;
 }

 /*
  * LINK/TRAN Capability Register:
  * bit [3:0]  : LINK_TRAN Minor Revision
  * bit [5:4]  : LINK/TRAN Major Revision
  * bit [7:6]  : Reserved
  * bit [15:8] : Device-Specific N_FCU
  * bit [18:16]: Device Type
  *              001b=Host
  *              010b=Device
  *              011b=Reserved for CMD issuable Device
  * bit [19]   : Reserved
  * bit [31:20]: Device-Specific MAX_BLKLEN
  * bit [39:32]: Device-Specific N_DATA_GAP
  * bit [63:40]: Reserved
 */
 cap = cmd.resp[0];
 card->uhs2_config.link_minor_rev =
    cap & UHS2_DEV_CONFIG_LT_MINOR_MASK;
 card->uhs2_config.link_major_rev =
    (cap >> UHS2_DEV_CONFIG_LT_MAJOR_POS) &
    UHS2_DEV_CONFIG_LT_MAJOR_MASK;
 card->uhs2_config.n_fcu =
    (cap >> UHS2_DEV_CONFIG_N_FCU_POS) &
    UHS2_DEV_CONFIG_N_FCU_MASK;
 card->uhs2_config.dev_type =
    (cap >> UHS2_DEV_CONFIG_DEV_TYPE_POS) &
    UHS2_DEV_CONFIG_DEV_TYPE_MASK;
 card->uhs2_config.maxblk_len =
    (cap >> UHS2_DEV_CONFIG_MAX_BLK_LEN_POS) &
    UHS2_DEV_CONFIG_MAX_BLK_LEN_MASK;

 cap = cmd.resp[1];
 card->uhs2_config.n_data_gap =
    cap & UHS2_DEV_CONFIG_N_DATA_GAP_MASK;
 if (card->uhs2_config.n_fcu == 0)
  card->uhs2_config.n_fcu = 256;

 return 0;
}

/*
 * Based on the card's and host's UHS-II capabilities, let's update the
 * configuration of the card and the host. This may also include to move to a
 * greater speed range/mode. Depending on the updated configuration, we may need
 * to do a soft reset of the card via sending it a GO_DORMANT_STATE command.
 *
 * In the final step, let's check if the card signals "config completion", which
 * indicates that the card has moved from config state into active state.
 */
static int sd_uhs2_config_write(struct mmc_host *host, struct mmc_card *card)
{
 struct mmc_command cmd = {0};
 struct uhs2_command uhs2_cmd = {};
 u32 payload0, payload1;
 u8 nMinDataGap;
 int err;

 /*
  * Use Control Write CCMD to set Generic Setting in Configuration Register.
  * - Control Write(R/W=1) with 8-Byte payload(PLEN=10b).
  * - IOADR = Generic Setting Register(CFG_BASE + 008h)
  * - Payload = New contents to be written to Generic Setting Register
 */
 uhs2_cmd.header = UHS2_NATIVE_PACKET | UHS2_PACKET_TYPE_CCMD | card->uhs2_config.node_id;
 uhs2_cmd.arg = ((UHS2_DEV_CONFIG_GEN_SET & 0xFF) << 8) |
   UHS2_NATIVE_CMD_WRITE |
   UHS2_NATIVE_CMD_PLEN_8B |
   (UHS2_DEV_CONFIG_GEN_SET >> 8);

 /*
  * Most UHS-II cards only support FD and 2L-HD mode. Other lane numbers
  * defined in UHS-II addendem Ver1.01 are optional.
 */
 host->uhs2_caps.n_lanes_set = UHS2_DEV_CONFIG_GEN_SET_2L_FD_HD;
 card->uhs2_config.n_lanes_set = UHS2_DEV_CONFIG_GEN_SET_2L_FD_HD;

 payload0 = card->uhs2_config.n_lanes_set << UHS2_DEV_CONFIG_N_LANES_POS;
 payload1 = 0;
 uhs2_cmd.payload[0] = cpu_to_be32(payload0);
 uhs2_cmd.payload[1] = cpu_to_be32(payload1);

 /*
  * There is no payload because per spec, there should be
  * no payload field for read CCMD.
  * Plen is set in arg. Per spec, plen for read CCMD
  * represents the len of read data which is assigned in payload
  * of following RES (p136).
 */
 sd_uhs2_cmd_assemble(&cmd, &uhs2_cmd, UHS2_CFG_WRITE_PAYLOAD_LEN, 0);

 err = mmc_wait_for_cmd(host, &cmd, 0);
 if (err) {
  pr_err("%s: %s: UHS2 CMD send fail, err= 0x%x!\n",
         mmc_hostname(host), __func__, err);
  return err;
 }

 /*
  * Use Control Write CCMD to set PHY Setting in Configuration Register.
  * - Control Write(R/W=1) with 8-Byte payload(PLEN=10b).
  * - IOADR = PHY Setting Register(CFG_BASE + 00Ah)
  * - Payload = New contents to be written to PHY Setting Register
 */
 uhs2_cmd.arg = ((UHS2_DEV_CONFIG_PHY_SET & 0xFF) << 8) |
   UHS2_NATIVE_CMD_WRITE |
   UHS2_NATIVE_CMD_PLEN_8B |
   (UHS2_DEV_CONFIG_PHY_SET >> 8);

 if (host->uhs2_caps.speed_range == UHS2_DEV_CONFIG_PHY_SET_SPEED_B) {
  if (card->uhs2_config.n_lanes == UHS2_DEV_CONFIG_2L_HD_FD &&
      host->uhs2_caps.n_lanes == UHS2_DEV_CONFIG_2L_HD_FD) {
   /* Support HD */
   host->ios.timing = MMC_TIMING_UHS2_SPEED_B_HD;
   nMinDataGap = 1;
  } else {
   /* Only support 2L-FD so far */
   host->ios.timing = MMC_TIMING_UHS2_SPEED_B;
   nMinDataGap = 3;
  }
  card->uhs2_config.speed_range_set = UHS2_DEV_CONFIG_PHY_SET_SPEED_B;
 } else {
  if (card->uhs2_config.n_lanes == UHS2_DEV_CONFIG_2L_HD_FD &&
      host->uhs2_caps.n_lanes == UHS2_DEV_CONFIG_2L_HD_FD) {
   /* Support HD */
   host->ios.timing = MMC_TIMING_UHS2_SPEED_A_HD;
   nMinDataGap = 1;
  } else {
   /* Only support 2L-FD so far */
   host->ios.timing = MMC_TIMING_UHS2_SPEED_A;
   nMinDataGap = 3;
  }
  card->uhs2_config.speed_range_set = UHS2_DEV_CONFIG_PHY_SET_SPEED_A;
 }

 payload0 = card->uhs2_config.speed_range_set << UHS2_DEV_CONFIG_PHY_SET_SPEED_POS;

 card->uhs2_config.n_lss_sync_set = (max(card->uhs2_config.n_lss_sync,
      host->uhs2_caps.n_lss_sync) >> 2) &
        UHS2_DEV_CONFIG_N_LSS_SYN_MASK;
 host->uhs2_caps.n_lss_sync_set = card->uhs2_config.n_lss_sync_set;

 card->uhs2_config.n_lss_dir_set = (max(card->uhs2_config.n_lss_dir,
            host->uhs2_caps.n_lss_dir) >> 3) &
       UHS2_DEV_CONFIG_N_LSS_DIR_MASK;
 host->uhs2_caps.n_lss_dir_set = card->uhs2_config.n_lss_dir_set;

 payload1 = (card->uhs2_config.n_lss_dir_set << UHS2_DEV_CONFIG_N_LSS_DIR_POS) |
     card->uhs2_config.n_lss_sync_set;
 uhs2_cmd.payload[0] = cpu_to_be32(payload0);
 uhs2_cmd.payload[1] = cpu_to_be32(payload1);

 memset(uhs2_cmd.uhs2_resp, 0, sizeof(uhs2_cmd.uhs2_resp));

 sd_uhs2_cmd_assemble(&cmd, &uhs2_cmd, UHS2_CFG_WRITE_PAYLOAD_LEN,
        UHS2_CFG_WRITE_PHY_SET_RESP_LEN);

 err = mmc_wait_for_cmd(host, &cmd, 0);
 if (err) {
  pr_err("%s: %s: UHS2 CMD send fail, err= 0x%x!\n",
         mmc_hostname(host), __func__, err);
  return err;
 }

 if ((uhs2_cmd.uhs2_resp[2] & 0x80)) {
  pr_err("%s: %s: UHS2 CMD not accepted, resp= 0x%x!\n",
         mmc_hostname(host), __func__, uhs2_cmd.uhs2_resp[2]);
  return -EIO;
 }

 /*
  * Use Control Write CCMD to set LINK/TRAN Setting in Configuration Register.
  * - Control Write(R/W=1) with 8-Byte payload(PLEN=10b).
  * - IOADR = LINK/TRAN Setting Register(CFG_BASE + 00Ch)
  * - Payload = New contents to be written to LINK/TRAN Setting Register
 */
 uhs2_cmd.arg = ((UHS2_DEV_CONFIG_LINK_TRAN_SET & 0xFF) << 8) |
   UHS2_NATIVE_CMD_WRITE |
   UHS2_NATIVE_CMD_PLEN_8B |
   (UHS2_DEV_CONFIG_LINK_TRAN_SET >> 8);

 if (card->uhs2_config.app_type == UHS2_DEV_CONFIG_APP_SD_MEM)
  card->uhs2_config.maxblk_len_set = UHS2_DEV_CONFIG_LT_SET_MAX_BLK_LEN;
 else
  card->uhs2_config.maxblk_len_set = min(card->uhs2_config.maxblk_len,
             host->uhs2_caps.maxblk_len);
 host->uhs2_caps.maxblk_len_set = card->uhs2_config.maxblk_len_set;

 card->uhs2_config.n_fcu_set = min(card->uhs2_config.n_fcu, host->uhs2_caps.n_fcu);
 host->uhs2_caps.n_fcu_set = card->uhs2_config.n_fcu_set;

 card->uhs2_config.n_data_gap_set = max(nMinDataGap, card->uhs2_config.n_data_gap);
 host->uhs2_caps.n_data_gap_set = card->uhs2_config.n_data_gap_set;

 host->uhs2_caps.max_retry_set = 3;
 card->uhs2_config.max_retry_set = host->uhs2_caps.max_retry_set;

 payload0 = (card->uhs2_config.maxblk_len_set << UHS2_DEV_CONFIG_MAX_BLK_LEN_POS) |
     (card->uhs2_config.max_retry_set << UHS2_DEV_CONFIG_LT_SET_MAX_RETRY_POS) |
     (card->uhs2_config.n_fcu_set << UHS2_DEV_CONFIG_N_FCU_POS);
 payload1 = card->uhs2_config.n_data_gap_set;
 uhs2_cmd.payload[0] = cpu_to_be32(payload0);
 uhs2_cmd.payload[1] = cpu_to_be32(payload1);

 sd_uhs2_cmd_assemble(&cmd, &uhs2_cmd, UHS2_CFG_WRITE_PAYLOAD_LEN, 0);

 err = mmc_wait_for_cmd(host, &cmd, 0);
 if (err) {
  pr_err("%s: %s: UHS2 CMD send fail, err= 0x%x!\n",
         mmc_hostname(host), __func__, err);
  return err;
 }

 /*
  * Use Control Write CCMD to set Config Completion(payload bit 63) in Generic Setting
  * Register.
  * Header:
  *      - Control Write(R/W=1) with 8-Byte payload(PLEN=10b).
  *      - IOADR = PGeneric Setting Register(CFG_BASE + 008h)
  * Payload:
  *      - bit [63]: Config Completion
  *
  * DLSM transits to Active state immediately when Config Completion is set to 1.
 */
 uhs2_cmd.arg = ((UHS2_DEV_CONFIG_GEN_SET & 0xFF) << 8) |
   UHS2_NATIVE_CMD_WRITE |
   UHS2_NATIVE_CMD_PLEN_8B |
   (UHS2_DEV_CONFIG_GEN_SET >> 8);

 payload0 = 0;
 payload1 = UHS2_DEV_CONFIG_GEN_SET_CFG_COMPLETE;
 uhs2_cmd.payload[0] = cpu_to_be32(payload0);
 uhs2_cmd.payload[1] = cpu_to_be32(payload1);

 memset(uhs2_cmd.uhs2_resp, 0, sizeof(uhs2_cmd.uhs2_resp));
 sd_uhs2_cmd_assemble(&cmd, &uhs2_cmd, UHS2_CFG_WRITE_PAYLOAD_LEN,
        UHS2_CFG_WRITE_GENERIC_SET_RESP_LEN);

 err = mmc_wait_for_cmd(host, &cmd, 0);
 if (err) {
  pr_err("%s: %s: UHS2 CMD send fail, err= 0x%x!\n",
         mmc_hostname(host), __func__, err);
  return err;
 }

 /* Set host Config Setting registers */
 err = host->ops->uhs2_control(host, UHS2_SET_CONFIG);
 if (err) {
  pr_err("%s: %s: UHS2 SET_CONFIG fail!\n", mmc_hostname(host), __func__);
  return err;
 }

 return 0;
}

static int sd_uhs2_go_dormant(struct mmc_host *host, u32 node_id)
{
 struct mmc_command cmd = {0};
 struct uhs2_command uhs2_cmd = {};
 int err;

 /* Disable Normal INT */
 err = host->ops->uhs2_control(host, UHS2_DISABLE_INT);
 if (err) {
  pr_err("%s: %s: UHS2 DISABLE_INT fail!\n",
         mmc_hostname(host), __func__);
  return err;
 }

 /*
  * Refer to UHS-II Addendum Version 1.02 Figure 6-17 to see GO_DORMANT_STATE CCMD format.
  * Header:
  *      - Control Write(R/W=1) with 4-Byte payload(PLEN=01b).
  *      - IOADR = CMD_BASE + 001h
  * Payload:
  *      - bit [7]: HBR(Entry to Hibernate Mode)
  *                 1: Host intends to enter Hibernate mode during Dormant state.
  *                 The default setting is 0 because hibernate is currently not supported.
 */
 uhs2_cmd.header = UHS2_NATIVE_PACKET | UHS2_PACKET_TYPE_CCMD | node_id;
 uhs2_cmd.arg = ((UHS2_DEV_CMD_GO_DORMANT_STATE & 0xFF) << 8) |
   UHS2_NATIVE_CMD_WRITE |
   UHS2_NATIVE_CMD_PLEN_4B |
   (UHS2_DEV_CMD_GO_DORMANT_STATE >> 8);

 sd_uhs2_cmd_assemble(&cmd, &uhs2_cmd, UHS2_GO_DORMANT_PAYLOAD_LEN, 0);

 err = mmc_wait_for_cmd(host, &cmd, 0);
 if (err) {
  pr_err("%s: %s: UHS2 CMD send fail, err= 0x%x!\n",
         mmc_hostname(host), __func__, err);
  return err;
 }

 /* Check Dormant State in Present */
 err = host->ops->uhs2_control(host, UHS2_CHECK_DORMANT);
 if (err)
  return err;

 /* Disable UHS2 card clock */
 err = host->ops->uhs2_control(host, UHS2_DISABLE_CLK);
 if (err)
  return err;

 /* Restore sd clock */
 mmc_delay(5);
 err = host->ops->uhs2_control(host, UHS2_ENABLE_CLK);
 if (err)
  return err;

 /* Enable Normal INT */
 err = host->ops->uhs2_control(host, UHS2_ENABLE_INT);
 if (err)
  return err;

 /* Detect UHS2 */
 err = host->ops->uhs2_control(host, UHS2_PHY_INIT);
 if (err)
  return err;

 return 0;
}

static int sd_uhs2_wait_active_state_cb(void *cb_data, bool *busy)
{
 struct sd_uhs2_wait_active_state_data *data = cb_data;
 struct mmc_host *host = data->host;
 struct mmc_command *cmd = data->cmd;
 int err;

 err = mmc_wait_for_cmd(host, cmd, 0);
 if (err)
  return err;

 if (cmd->resp[1] & UHS2_DEV_CONFIG_GEN_SET_CFG_COMPLETE)
  *busy = false;
 else
  *busy = true;

 return 0;
}

static int sd_uhs2_go_dormant_state(struct mmc_host *host, u32 node_id)
{
 struct mmc_command cmd = {0};
 struct uhs2_command uhs2_cmd = {};
 int err;
 struct sd_uhs2_wait_active_state_data cb_data = {
  .host = host,
  .cmd = &cmd
 };

 err = sd_uhs2_go_dormant(host, node_id);
 if (err) {
  pr_err("%s: %s: UHS2 GO_DORMANT_STATE fail, err= 0x%x!\n",
         mmc_hostname(host), __func__, err);
  return err;
 }

 /*
  * Use Control Read CCMD to check Config Completion(bit 63) in Generic Setting Register.
  * - Control Read(R/W=0) with 8-Byte payload(PLEN=10b).
  * - IOADR = Generic Setting Register(CFG_BASE + 008h)
  *
  * When UHS-II card been switched to new speed mode, it will set Config Completion to 1.
 */
 uhs2_cmd.header = UHS2_NATIVE_PACKET | UHS2_PACKET_TYPE_CCMD | node_id;
 uhs2_cmd.arg = ((UHS2_DEV_CONFIG_GEN_SET & 0xFF) << 8) |
   UHS2_NATIVE_CMD_READ |
   UHS2_NATIVE_CMD_PLEN_8B |
   (UHS2_DEV_CONFIG_GEN_SET >> 8);

 sd_uhs2_cmd_assemble(&cmd, &uhs2_cmd, 0, 0);
 err = __mmc_poll_for_busy(host, UHS2_WAIT_CFG_COMPLETE_PERIOD_US,
      UHS2_WAIT_CFG_COMPLETE_TIMEOUT_MS,
      &sd_uhs2_wait_active_state_cb, &cb_data);
 if (err) {
  pr_err("%s: %s: Not switch to Active in 100 ms\n", mmc_hostname(host), __func__);
  return err;
 }

 return 0;
}

/*
 * Allocate the data structure for the mmc_card and run the UHS-II specific
 * initialization sequence.
 */
static int sd_uhs2_init_card(struct mmc_host *host, struct mmc_card *oldcard)
{
 struct mmc_card *card;
 u32 node_id = 0;
 int err;

 err = sd_uhs2_dev_init(host);
 if (err)
  return err;

 err = sd_uhs2_enum(host, &node_id);
 if (err)
  return err;

 if (oldcard) {
  card = oldcard;
 } else {
  card = mmc_alloc_card(host, &sd_type);
  if (IS_ERR(card))
   return PTR_ERR(card);
 }

 card->uhs2_config.node_id = node_id;
 card->type = MMC_TYPE_SD;

 err = sd_uhs2_config_read(host, card);
 if (err)
  goto err;

 err = sd_uhs2_config_write(host, card);
 if (err)
  goto err;

 /* If change speed to Range B, need to GO_DORMANT_STATE */
 if (host->ios.timing == MMC_TIMING_UHS2_SPEED_B ||
     host->ios.timing == MMC_TIMING_UHS2_SPEED_B_HD) {
  err = sd_uhs2_go_dormant_state(host, node_id);
  if (err)
   goto err;
 }

 host->uhs2_sd_tran = true;
 host->card = card;
 return 0;

err:
 if (!oldcard)
  mmc_remove_card(card);
 return err;
}

/*
 * Initialize the UHS-II card through the SD-TRAN transport layer. This enables
 * commands/requests to be backwards compatible through the legacy SD protocol.
 * UHS-II cards has a specific power limit specified for VDD1/VDD2, that should
 * be set through a legacy CMD6. Note that, the power limit that becomes set,
 * survives a soft reset through the GO_DORMANT_STATE command.
 */
static int sd_uhs2_legacy_init(struct mmc_host *host, struct mmc_card *card,
          bool reinit)
{
 int err;
 u32 cid[4];
 u32 ocr;
 u32 rocr;
 u8  *status;
 int ro;

 /* Send CMD0 to reset SD card */
 err = __mmc_go_idle(host);
 if (err)
  return err;

 mmc_delay(1);

 /* Send CMD8 to communicate SD interface operation condition */
 err = mmc_send_if_cond(host, host->ocr_avail);
 if (err)
  return err;

 /*
  * Probe SD card working voltage.
 */
 err = mmc_send_app_op_cond(host, 0, &ocr);
 if (err)
  return err;

 card->ocr = ocr;

 /*
  * Some SD cards claims an out of spec VDD voltage range. Let's treat
  * these bits as being in-valid and especially also bit7.
 */
 ocr &= ~0x7FFF;
 rocr = mmc_select_voltage(host, ocr);
 /*
  * Some cards have zero value of rocr in UHS-II mode. Assign host's
  * ocr value to rocr.
 */
 if (!rocr)
  rocr = host->ocr_avail;

 rocr |= (SD_OCR_CCS | SD_OCR_XPC);

 /* Wait SD power on ready */
 ocr = rocr;

 err = mmc_send_app_op_cond(host, ocr, &rocr);
 if (err)
  return err;

 err = mmc_send_cid(host, cid);
 if (err)
  return err;

 if (reinit) {
  if (memcmp(cid, card->raw_cid, sizeof(cid)) != 0) {
   pr_debug("%s: Perhaps the card was replaced\n",
     mmc_hostname(host));
   return -ENOENT;
  }
 } else {
  memcpy(card->raw_cid, cid, sizeof(card->raw_cid));
  mmc_decode_cid(card);
 }

 /*
  * For native busses:  get card RCA and quit open drain mode.
 */
 err = mmc_send_relative_addr(host, &card->rca);
 if (err)
  return err;

 err = mmc_sd_get_csd(card, false);
 if (err)
  return err;

 /*
  * Select card, as all following commands rely on that.
 */
 err = mmc_select_card(card);
 if (err)
  return err;

 /*
  * Fetch SCR from card.
 */
 err = mmc_app_send_scr(card);
 if (err)
  return err;

 err = mmc_decode_scr(card);
 if (err)
  return err;

 /*
  * Switch to high power consumption mode.
  * Even switch failed, sd card can still work at lower power consumption mode, but
  * performance will be lower than high power consumption mode.
 */
 status = kmalloc(64, GFP_KERNEL);
 if (!status)
  return -ENOMEM;

 if (!(card->csd.cmdclass & CCC_SWITCH)) {
  pr_warn("%s: card lacks mandatory switch function, performance might suffer\n",
   mmc_hostname(card->host));
 } else {
  /*
   * Send CMD6 to set Maximum Power Consumption to get better
   * performance. Ignore errors and continue.
 */
  err = mmc_sd_switch(card, 0, 3, SD4_SET_POWER_LIMIT_1_80W, status);
  if (!err)
   mmc_sd_switch(card, 1, 3, SD4_SET_POWER_LIMIT_1_80W, status);
 }

 /*
  * Check if read-only switch is active.
 */
 ro = mmc_sd_get_ro(host);
 if (ro < 0)
  pr_warn("%s: host does not support read-only switch, assuming write-enable\n",
   mmc_hostname(host));
 else if (ro > 0)
  mmc_card_set_readonly(card);

 kfree(status);
 return 0;
}

static int sd_uhs2_reinit(struct mmc_host *host)
{
 struct mmc_card *card = host->card;
 int err;

 err = sd_uhs2_power_up(host);
 if (err)
  return err;

 err = sd_uhs2_phy_init(host);
 if (err)
  return err;

 err = sd_uhs2_init_card(host, card);
 if (err)
  return err;

 return sd_uhs2_legacy_init(host, card, true);
}

static void sd_uhs2_remove(struct mmc_host *host)
{
 mmc_remove_card(host->card);
 host->card = NULL;
}

static int sd_uhs2_alive(struct mmc_host *host)
{
 return mmc_send_status(host->card, NULL);
}

static void sd_uhs2_detect(struct mmc_host *host)
{
 int err;

 mmc_get_card(host->card, NULL);
 err = _mmc_detect_card_removed(host);
 mmc_put_card(host->card, NULL);

 if (err) {
  sd_uhs2_remove(host);

  mmc_claim_host(host);
  mmc_detach_bus(host);
  sd_uhs2_power_off(host);
  mmc_release_host(host);
 }
}

static int _sd_uhs2_suspend(struct mmc_host *host)
{
 struct mmc_card *card = host->card;

 mmc_claim_host(host);

 if (mmc_card_suspended(card))
  goto out;

 sd_uhs2_power_off(host);
 mmc_card_set_suspended(card);

out:
 mmc_release_host(host);
 return 0;
}

/*
 * Callback for suspend
 */
static int sd_uhs2_suspend(struct mmc_host *host)
{
 int err;

 err = _sd_uhs2_suspend(host);
 if (!err) {
  pm_runtime_disable(&host->card->dev);
  pm_runtime_set_suspended(&host->card->dev);
 }

 return err;
}

/*
 * This function tries to determine if the same card is still present
 * and, if so, restore all state to it.
 */
static int _mmc_sd_uhs2_resume(struct mmc_host *host)
{
 int err = 0;

 mmc_claim_host(host);

 if (!mmc_card_suspended(host->card))
  goto out;

 /* Power up UHS2 SD card and re-initialize it. */
 err = sd_uhs2_reinit(host);
 mmc_card_clr_suspended(host->card);

out:
 mmc_release_host(host);
 return err;
}

/*
 * Callback for resume
 */
static int sd_uhs2_resume(struct mmc_host *host)
{
 pm_runtime_enable(&host->card->dev);
 return 0;
}

/*
 * Callback for runtime_suspend.
 */
static int sd_uhs2_runtime_suspend(struct mmc_host *host)
{
 int err;

 if (!(host->caps & MMC_CAP_AGGRESSIVE_PM))
  return 0;

 err = _sd_uhs2_suspend(host);
 if (err)
  pr_err("%s: error %d doing aggressive suspend\n", mmc_hostname(host), err);

 return err;
}

static int sd_uhs2_runtime_resume(struct mmc_host *host)
{
 int err;

 err = _mmc_sd_uhs2_resume(host);
 if (err && err != -ENOMEDIUM)
  pr_err("%s: error %d doing runtime resume\n", mmc_hostname(host), err);

 return err;
}

static int sd_uhs2_hw_reset(struct mmc_host *host)
{
 sd_uhs2_power_off(host);
 /* Wait at least 1 ms according to SD spec */
 mmc_delay(1);

 return sd_uhs2_reinit(host);
}

static const struct mmc_bus_ops sd_uhs2_ops = {
 .remove = sd_uhs2_remove,
 .alive = sd_uhs2_alive,
 .detect = sd_uhs2_detect,
 .suspend = sd_uhs2_suspend,
 .resume = sd_uhs2_resume,
 .runtime_suspend = sd_uhs2_runtime_suspend,
 .runtime_resume = sd_uhs2_runtime_resume,
 .shutdown = sd_uhs2_suspend,
 .hw_reset = sd_uhs2_hw_reset,
};

static int sd_uhs2_attach(struct mmc_host *host)
{
 int err;

 err = sd_uhs2_power_up(host);
 if (err)
  goto err;

 err = sd_uhs2_phy_init(host);
 if (err)
  goto err;

 err = sd_uhs2_init_card(host, NULL);
 if (err)
  goto err;

 err = sd_uhs2_legacy_init(host, host->card, false);
 if (err)
  goto remove_card;

 mmc_attach_bus(host, &sd_uhs2_ops);

 mmc_release_host(host);

 err = mmc_add_card(host->card);
 if (err)
  goto remove_card;

 mmc_claim_host(host);
 return 0;

remove_card:
 sd_uhs2_remove(host);
 mmc_claim_host(host);
err:
 mmc_detach_bus(host);
 sd_uhs2_power_off(host);
 return err;
}

/**
 * mmc_attach_sd_uhs2 - select UHS2 interface
 * @host: MMC host
 *
 * Try to select UHS2 interface and initialize the bus for a given
 * frequency, @freq.
 *
 * Return: 0 on success, non-zero error on failure
 */
int mmc_attach_sd_uhs2(struct mmc_host *host)
{
 int i, err;

 if (!(host->caps2 & MMC_CAP2_SD_UHS2))
  return -EOPNOTSUPP;

 /* Turn off the legacy SD interface before trying with UHS-II. */
 mmc_power_off(host);

 /*
  * Start UHS-II initialization at 52MHz and possibly make a retry at
  * 26MHz according to the spec. It's required that the host driver
  * validates ios->clock, to set a rate within the correct range.
 */
 for (i = 0; i < ARRAY_SIZE(sd_uhs2_freqs); i++) {
  host->f_init = sd_uhs2_freqs[i];
  pr_debug("%s: %s: trying to init UHS-II card at %u Hz\n",
    mmc_hostname(host), __func__, host->f_init);
  err = sd_uhs2_attach(host);
  if (!err)
   break;
 }

 return err;
}

/*
 * mmc_uhs2_prepare_cmd - prepare for SD command packet
 * @host: MMC host
 * @mrq: MMC request
 *
 * Initialize and fill in a header and a payload of SD command packet.
 * The caller should allocate uhs2_command in host->cmd->uhs2_cmd in
 * advance.
 *
 * Return: 0 on success, non-zero error on failure
 */
void mmc_uhs2_prepare_cmd(struct mmc_host *host, struct mmc_request *mrq)
{
 struct mmc_command *cmd;
 struct uhs2_command *uhs2_cmd;
 u8 plen;

 cmd = mrq->cmd;
 cmd->uhs2_cmd = &mrq->uhs2_cmd;
 uhs2_cmd = cmd->uhs2_cmd;
 uhs2_cmd->header = host->card->uhs2_config.node_id;
 if ((cmd->flags & MMC_CMD_MASK) == MMC_CMD_ADTC)
  uhs2_cmd->header |= UHS2_PACKET_TYPE_DCMD;
 else
  uhs2_cmd->header |= UHS2_PACKET_TYPE_CCMD;

 uhs2_cmd->arg = cmd->opcode << UHS2_SD_CMD_INDEX_POS;
 if (host->uhs2_app_cmd) {
  uhs2_cmd->arg |= UHS2_SD_CMD_APP;
  host->uhs2_app_cmd = false;
 }

 /*
  * UHS-II Addendum 7.2.1.2
  * Host may set DM to 1 for DCMD which supports multi-block read/write regardless of
  * data transfer length (e.g., CMD18, CMD25). Otherwise, it shall not set DM to 1.
  * (e.g., CMD6, CMD17, CMD24). These rules are also applied to other multi-block read/write
  * commands defined in other Part of SD specifications (for example, Host may set DM to 1
  * for ACMD18 or ACMD25).
 */
 if (mmc_op_multi(cmd->opcode))
  cmd->uhs2_cmd->tmode_half_duplex = mmc_card_uhs2_hd_mode(host);
 else
  cmd->uhs2_cmd->tmode_half_duplex = 0;

 uhs2_cmd = cmd->uhs2_cmd;
 plen = 2; /* at the maximum */

 if ((cmd->flags & MMC_CMD_MASK) == MMC_CMD_ADTC &&
     cmd->uhs2_cmd->tmode_half_duplex) {
  if (mmc_card_uhs2_hd_mode(host))
   uhs2_cmd->arg |= UHS2_DCMD_2L_HD_MODE;

  uhs2_cmd->arg |= UHS2_DCMD_LM_TLEN_EXIST;

  if (cmd->data->blocks == 1 &&
      cmd->data->blksz != 512 &&
      cmd->opcode != MMC_READ_SINGLE_BLOCK &&
      cmd->opcode != MMC_WRITE_BLOCK) {
   uhs2_cmd->arg |= UHS2_DCMD_TLUM_BYTE_MODE;
   uhs2_cmd->payload[1] = cpu_to_be32(cmd->data->blksz);
  } else {
   uhs2_cmd->payload[1] = cpu_to_be32(cmd->data->blocks);
  }
 } else {
  plen = 1;
 }

 uhs2_cmd->payload[0] = cpu_to_be32(cmd->arg);
 sd_uhs2_cmd_assemble(cmd, uhs2_cmd, plen, 0);
}