board/xilinx/versal-net/board.c - u-boot - Git at Google

 // SPDX-License-Identifier: GPL-2.0
 /*
  * Copyright (C) 2021 - 2022, Xilinx, Inc.
  * Copyright (C) 2022, Advanced Micro Devices, Inc.
  *
  * Michal Simek <michal.simek@amd.com>
  */

 #include <common.h>
 #include <cpu_func.h>
 #include <fdtdec.h>
 #include <init.h>
 #include <env_internal.h>
 #include <log.h>
 #include <malloc.h>
 #include <time.h>
 #include <asm/cache.h>
 #include <asm/global_data.h>
 #include <asm/io.h>
 #include <asm/arch/hardware.h>
 #include <asm/arch/sys_proto.h>
 #include <dm/device.h>
 #include <dm/uclass.h>
 #include "../common/board.h"

 #include <linux/bitfield.h>
 #include <debug_uart.h>
 #include <generated/dt.h>

 DECLARE_GLOBAL_DATA_PTR;

 int board_init(void)
 {
 	printf("EL Level:\tEL%d\n", current_el());

 	return 0;
 }

 static u32 platform_id, platform_version;

 char *soc_name_decode(void)
 {
 	char *name, *platform_name;

 	switch (platform_id) {
 	case VERSAL_NET_SPP:
 		platform_name = "ipp";
 		break;
 	case VERSAL_NET_EMU:
 		platform_name = "emu";
 		break;
 	case VERSAL_NET_QEMU:
 		platform_name = "qemu";
 		break;
 	default:
 		return NULL;
 	}

 	/*
 	 * --rev. are 6 chars
 	 * max platform name is qemu which is 4 chars
 	 * platform version number are 1+1
 	 * Plus 1 char for \n
 	 */
 	name = calloc(1, strlen(CONFIG_SYS_BOARD) + 13);
 	if (!name)
 		return NULL;

 	sprintf(name, "%s-%s-rev%d.%d", CONFIG_SYS_BOARD,
 		platform_name, platform_version / 10,
 		platform_version % 10);

 	return name;
 }

 bool soc_detection(void)
 {
 	u32 version, ps_version;

 	version = readl(PMC_TAP_VERSION);
 	platform_id = FIELD_GET(PLATFORM_MASK, version);
 	ps_version = FIELD_GET(PS_VERSION_MASK, version);

 	debug("idcode %x, version %x, usercode %x\n",
 	      readl(PMC_TAP_IDCODE), version,
 	      readl(PMC_TAP_USERCODE));

 	debug("pmc_ver %lx, ps version %x, rtl version %lx\n",
 	      FIELD_GET(PMC_VERSION_MASK, version),
 	      ps_version,
 	      FIELD_GET(RTL_VERSION_MASK, version));

 	platform_version = FIELD_GET(PLATFORM_VERSION_MASK, version);

 	if (platform_id == VERSAL_NET_SPP ||
 	    platform_id == VERSAL_NET_EMU) {
 		if (ps_version == PS_VERSION_PRODUCTION) {
 			/*
 			 * ES1 version ends at 1.9 version where there was +9
 			 * used because of IPP/SPP conversion. Production
 			 * version have platform_version started from 0 again
 			 * that's why adding +20 to continue with the same line.
 			 * It means the last ES1 version ends at 1.9 version and
 			 * new PRODUCTION line starts at 2.0.
 			 */
 			platform_version += 20;
 		} else {
 			/*
 			 * 9 is diff for
 			 * 0 means 0.9 version
 			 * 1 means 1.0 version
 			 * 2 means 1.1 version
 			 * etc,
 			 */
 			platform_version += 9;
 		}
 	}

 	debug("Platform id: %d version: %d.%d\n", platform_id,
 	      platform_version / 10, platform_version % 10);

 	return true;
 }

 int board_early_init_f(void)
 {
 	if (IS_ENABLED(CONFIG_DEBUG_UART)) {
 		/* Uart debug for sure */
 		debug_uart_init();
 		puts("Debug uart enabled\n"); /* or printch() */
 	}

 	return 0;
 }

 int board_early_init_r(void)
 {
 	u32 val;

 	if (current_el() != 3)
 		return 0;

 	debug("iou_switch ctrl div0 %x\n",
 	      readl(&crlapb_base->iou_switch_ctrl));

 	writel(IOU_SWITCH_CTRL_CLKACT_BIT |
 	       (CONFIG_IOU_SWITCH_DIVISOR0 << IOU_SWITCH_CTRL_DIVISOR0_SHIFT),
 	       &crlapb_base->iou_switch_ctrl);

 	/* Global timer init - Program time stamp reference clk */
 	val = readl(&crlapb_base->timestamp_ref_ctrl);
 	val |= CRL_APB_TIMESTAMP_REF_CTRL_CLKACT_BIT;
 	writel(val, &crlapb_base->timestamp_ref_ctrl);

 	debug("ref ctrl 0x%x\n",
 	      readl(&crlapb_base->timestamp_ref_ctrl));

 	/* Clear reset of timestamp reg */
 	writel(0, &crlapb_base->rst_timestamp);

 	/*
 	 * Program freq register in System counter and
 	 * enable system counter.
 	 */
 	writel(CONFIG_COUNTER_FREQUENCY,
 	       &iou_scntr_secure->base_frequency_id_register);

 	debug("counter val 0x%x\n",
 	      readl(&iou_scntr_secure->base_frequency_id_register));

 	writel(IOU_SCNTRS_CONTROL_EN,
 	       &iou_scntr_secure->counter_control_register);

 	debug("scntrs control 0x%x\n",
 	      readl(&iou_scntr_secure->counter_control_register));
 	debug("timer 0x%llx\n", get_ticks());
 	debug("timer 0x%llx\n", get_ticks());

 	return 0;
 }

 static u8 versal_net_get_bootmode(void)
 {
 	u8 bootmode;
 	u32 reg = 0;

 	reg = readl(&crp_base->boot_mode_usr);

 	if (reg >> BOOT_MODE_ALT_SHIFT)
 		reg >>= BOOT_MODE_ALT_SHIFT;

 	bootmode = reg & BOOT_MODES_MASK;

 	return bootmode;
 }

 static int boot_targets_setup(void)
 {
 	u8 bootmode;
 	struct udevice *dev;
 	int bootseq = -1;
 	int bootseq_len = 0;
 	int env_targets_len = 0;
 	const char *mode = NULL;
 	char *new_targets;
 	char *env_targets;

 	bootmode = versal_net_get_bootmode();

 	puts("Bootmode: ");
 	switch (bootmode) {
 	case USB_MODE:
 		puts("USB_MODE\n");
 		mode = "usb_dfu0 usb_dfu1";
 		break;
 	case JTAG_MODE:
 		puts("JTAG_MODE\n");
 		mode = "jtag pxe dhcp";
 		break;
 	case QSPI_MODE_24BIT:
 		puts("QSPI_MODE_24\n");
 		if (uclass_get_device_by_name(UCLASS_SPI,
 					      "spi@f1030000", &dev)) {
 			debug("QSPI driver for QSPI device is not present\n");
 			break;
 		}
 		mode = "xspi";
 		bootseq = dev_seq(dev);
 		break;
 	case QSPI_MODE_32BIT:
 		puts("QSPI_MODE_32\n");
 		if (uclass_get_device_by_name(UCLASS_SPI,
 					      "spi@f1030000", &dev)) {
 			debug("QSPI driver for QSPI device is not present\n");
 			break;
 		}
 		mode = "xspi";
 		bootseq = dev_seq(dev);
 		break;
 	case OSPI_MODE:
 		puts("OSPI_MODE\n");
 		if (uclass_get_device_by_name(UCLASS_SPI,
 					      "spi@f1010000", &dev)) {
 			debug("OSPI driver for OSPI device is not present\n");
 			break;
 		}
 		mode = "xspi";
 		bootseq = dev_seq(dev);
 		break;
 	case EMMC_MODE:
 		puts("EMMC_MODE\n");
 		mode = "mmc";
 		bootseq = dev_seq(dev);
 		break;
 	case SELECTMAP_MODE:
 		puts("SELECTMAP_MODE\n");
 		break;
 	case SD_MODE:
 		puts("SD_MODE\n");
 		if (uclass_get_device_by_name(UCLASS_MMC,
 					      "mmc@f1040000", &dev)) {
 			debug("SD0 driver for SD0 device is not present\n");
 			break;
 		}
 		debug("mmc0 device found at %p, seq %d\n", dev, dev_seq(dev));

 		mode = "mmc";
 		bootseq = dev_seq(dev);
 		break;
 	case SD1_LSHFT_MODE:
 		puts("LVL_SHFT_");
 		fallthrough;
 	case SD_MODE1:
 		puts("SD_MODE1\n");
 		if (uclass_get_device_by_name(UCLASS_MMC,
 					      "mmc@f1050000", &dev)) {
 			debug("SD1 driver for SD1 device is not present\n");
 			break;
 		}
 		debug("mmc1 device found at %p, seq %d\n", dev, dev_seq(dev));

 		mode = "mmc";
 		bootseq = dev_seq(dev);
 		break;
 	default:
 		printf("Invalid Boot Mode:0x%x\n", bootmode);
 		break;
 	}

 	if (mode) {
 		if (bootseq >= 0) {
 			bootseq_len = snprintf(NULL, 0, "%i", bootseq);
 			debug("Bootseq len: %x\n", bootseq_len);
 		}

 		/*
 		 * One terminating char + one byte for space between mode
 		 * and default boot_targets
 		 */
 		env_targets = env_get("boot_targets");
 		if (env_targets)
 			env_targets_len = strlen(env_targets);

 		new_targets = calloc(1, strlen(mode) + env_targets_len + 2 +
 				     bootseq_len);
 		if (!new_targets)
 			return -ENOMEM;

 		if (bootseq >= 0)
 			sprintf(new_targets, "%s%x %s", mode, bootseq,
 				env_targets ? env_targets : "");
 		else
 			sprintf(new_targets, "%s %s", mode,
 				env_targets ? env_targets : "");

 		env_set("boot_targets", new_targets);
 	}

 	return 0;
 }

 int board_late_init(void)
 {
 	int ret;

 	if (!(gd->flags & GD_FLG_ENV_DEFAULT)) {
 		debug("Saved variables - Skipping\n");
 		return 0;
 	}

 	if (!IS_ENABLED(CONFIG_ENV_VARS_UBOOT_RUNTIME_CONFIG))
 		return 0;

 	if (IS_ENABLED(CONFIG_DISTRO_DEFAULTS)) {
 		ret = boot_targets_setup();
 		if (ret)
 			return ret;
 	}

 	return board_late_init_xilinx();
 }

 int dram_init_banksize(void)
 {
 	int ret;

 	ret = fdtdec_setup_memory_banksize();
 	if (ret)
 		return ret;

 	mem_map_fill();

 	return 0;
 }

 int dram_init(void)
 {
 	int ret;

 	if (IS_ENABLED(CONFIG_SYS_MEM_RSVD_FOR_MMU))
 		ret = fdtdec_setup_mem_size_base();
 	else
 		ret = fdtdec_setup_mem_size_base_lowest();

 	if (ret)
 		return -EINVAL;

 	return 0;
 }

 void reset_cpu(void)
 {
 }

 #if defined(CONFIG_ENV_IS_NOWHERE)
 enum env_location env_get_location(enum env_operation op, int prio)
 {
 	u8 bootmode = versal_net_get_bootmode();

 	if (prio)
 		return ENVL_UNKNOWN;

 	switch (bootmode) {
 	case EMMC_MODE:
 	case SD_MODE:
 	case SD1_LSHFT_MODE:
 	case SD_MODE1:
 		if (IS_ENABLED(CONFIG_ENV_IS_IN_FAT))
 			return ENVL_FAT;
 		if (IS_ENABLED(CONFIG_ENV_IS_IN_EXT4))
 			return ENVL_EXT4;
 		return ENVL_NOWHERE;
 	case OSPI_MODE:
 	case QSPI_MODE_24BIT:
 	case QSPI_MODE_32BIT:
 		if (IS_ENABLED(CONFIG_ENV_IS_IN_SPI_FLASH))
 			return ENVL_SPI_FLASH;
 		return ENVL_NOWHERE;
 	case JTAG_MODE:
 	case SELECTMAP_MODE:
 	default:
 		return ENVL_NOWHERE;
 	}
 }
 #endif
	// SPDX-License-Identifier: GPL-2.0
	/*
	* Copyright (C) 2021 - 2022, Xilinx, Inc.
	* Copyright (C) 2022, Advanced Micro Devices, Inc.
	*
	* Michal Simek <michal.simek@amd.com>
	*/

	#include <common.h>
	#include <cpu_func.h>
	#include <fdtdec.h>
	#include <init.h>
	#include <env_internal.h>
	#include <log.h>
	#include <malloc.h>
	#include <time.h>
	#include <asm/cache.h>
	#include <asm/global_data.h>
	#include <asm/io.h>
	#include <asm/arch/hardware.h>
	#include <asm/arch/sys_proto.h>
	#include <dm/device.h>
	#include <dm/uclass.h>
	#include "../common/board.h"

	#include <linux/bitfield.h>
	#include <debug_uart.h>
	#include <generated/dt.h>

	DECLARE_GLOBAL_DATA_PTR;

	int board_init(void)
	{
	printf("EL Level:\tEL%d\n", current_el());

	return 0;
	}

	static u32 platform_id, platform_version;

	char *soc_name_decode(void)
	{
	char name, platform_name;

	switch (platform_id) {
	case VERSAL_NET_SPP:
	platform_name = "ipp";
	break;
	case VERSAL_NET_EMU:
	platform_name = "emu";
	break;
	case VERSAL_NET_QEMU:
	platform_name = "qemu";
	break;
	default:
	return NULL;
	}

	/*
	* --rev. are 6 chars
	* max platform name is qemu which is 4 chars
	* platform version number are 1+1
	* Plus 1 char for \n
	*/
	name = calloc(1, strlen(CONFIG_SYS_BOARD) + 13);
	if (!name)
	return NULL;

	sprintf(name, "%s-%s-rev%d.%d", CONFIG_SYS_BOARD,
	platform_name, platform_version / 10,
	platform_version % 10);

	return name;
	}

	bool soc_detection(void)
	{
	u32 version, ps_version;

	version = readl(PMC_TAP_VERSION);
	platform_id = FIELD_GET(PLATFORM_MASK, version);
	ps_version = FIELD_GET(PS_VERSION_MASK, version);

	debug("idcode %x, version %x, usercode %x\n",
	readl(PMC_TAP_IDCODE), version,
	readl(PMC_TAP_USERCODE));

	debug("pmc_ver %lx, ps version %x, rtl version %lx\n",
	FIELD_GET(PMC_VERSION_MASK, version),
	ps_version,
	FIELD_GET(RTL_VERSION_MASK, version));

	platform_version = FIELD_GET(PLATFORM_VERSION_MASK, version);

	if (platform_id == VERSAL_NET_SPP \|\|
	platform_id == VERSAL_NET_EMU) {
	if (ps_version == PS_VERSION_PRODUCTION) {
	/*
	* ES1 version ends at 1.9 version where there was +9
	* used because of IPP/SPP conversion. Production
	* version have platform_version started from 0 again
	* that's why adding +20 to continue with the same line.
	* It means the last ES1 version ends at 1.9 version and
	* new PRODUCTION line starts at 2.0.
	*/
	platform_version += 20;
	} else {
	/*
	* 9 is diff for
	* 0 means 0.9 version
	* 1 means 1.0 version
	* 2 means 1.1 version
	* etc,
	*/
	platform_version += 9;
	}
	}

	debug("Platform id: %d version: %d.%d\n", platform_id,
	platform_version / 10, platform_version % 10);

	return true;
	}

	int board_early_init_f(void)
	{
	if (IS_ENABLED(CONFIG_DEBUG_UART)) {
	/* Uart debug for sure */
	debug_uart_init();
	puts("Debug uart enabled\n"); /* or printch() */
	}

	return 0;
	}

	int board_early_init_r(void)
	{
	u32 val;

	if (current_el() != 3)
	return 0;

	debug("iou_switch ctrl div0 %x\n",
	readl(&crlapb_base->iou_switch_ctrl));

	writel(IOU_SWITCH_CTRL_CLKACT_BIT \|
	(CONFIG_IOU_SWITCH_DIVISOR0 << IOU_SWITCH_CTRL_DIVISOR0_SHIFT),
	&crlapb_base->iou_switch_ctrl);

	/* Global timer init - Program time stamp reference clk */
	val = readl(&crlapb_base->timestamp_ref_ctrl);
	val \|= CRL_APB_TIMESTAMP_REF_CTRL_CLKACT_BIT;
	writel(val, &crlapb_base->timestamp_ref_ctrl);

	debug("ref ctrl 0x%x\n",
	readl(&crlapb_base->timestamp_ref_ctrl));

	/* Clear reset of timestamp reg */
	writel(0, &crlapb_base->rst_timestamp);

	/*
	* Program freq register in System counter and
	* enable system counter.
	*/
	writel(CONFIG_COUNTER_FREQUENCY,
	&iou_scntr_secure->base_frequency_id_register);

	debug("counter val 0x%x\n",
	readl(&iou_scntr_secure->base_frequency_id_register));

	writel(IOU_SCNTRS_CONTROL_EN,
	&iou_scntr_secure->counter_control_register);

	debug("scntrs control 0x%x\n",
	readl(&iou_scntr_secure->counter_control_register));
	debug("timer 0x%llx\n", get_ticks());
	debug("timer 0x%llx\n", get_ticks());

	return 0;
	}

	static u8 versal_net_get_bootmode(void)
	{
	u8 bootmode;
	u32 reg = 0;

	reg = readl(&crp_base->boot_mode_usr);

	if (reg >> BOOT_MODE_ALT_SHIFT)
	reg >>= BOOT_MODE_ALT_SHIFT;

	bootmode = reg & BOOT_MODES_MASK;

	return bootmode;
	}

	static int boot_targets_setup(void)
	{
	u8 bootmode;
	struct udevice *dev;
	int bootseq = -1;
	int bootseq_len = 0;
	int env_targets_len = 0;
	const char *mode = NULL;
	char *new_targets;
	char *env_targets;

	bootmode = versal_net_get_bootmode();

	puts("Bootmode: ");
	switch (bootmode) {
	case USB_MODE:
	puts("USB_MODE\n");
	mode = "usb_dfu0 usb_dfu1";
	break;
	case JTAG_MODE:
	puts("JTAG_MODE\n");
	mode = "jtag pxe dhcp";
	break;
	case QSPI_MODE_24BIT:
	puts("QSPI_MODE_24\n");
	if (uclass_get_device_by_name(UCLASS_SPI,
	"spi@f1030000", &dev)) {
	debug("QSPI driver for QSPI device is not present\n");
	break;
	}
	mode = "xspi";
	bootseq = dev_seq(dev);
	break;
	case QSPI_MODE_32BIT:
	puts("QSPI_MODE_32\n");
	if (uclass_get_device_by_name(UCLASS_SPI,
	"spi@f1030000", &dev)) {
	debug("QSPI driver for QSPI device is not present\n");
	break;
	}
	mode = "xspi";
	bootseq = dev_seq(dev);
	break;
	case OSPI_MODE:
	puts("OSPI_MODE\n");
	if (uclass_get_device_by_name(UCLASS_SPI,
	"spi@f1010000", &dev)) {
	debug("OSPI driver for OSPI device is not present\n");
	break;
	}
	mode = "xspi";
	bootseq = dev_seq(dev);
	break;
	case EMMC_MODE:
	puts("EMMC_MODE\n");
	mode = "mmc";
	bootseq = dev_seq(dev);
	break;
	case SELECTMAP_MODE:
	puts("SELECTMAP_MODE\n");
	break;
	case SD_MODE:
	puts("SD_MODE\n");
	if (uclass_get_device_by_name(UCLASS_MMC,
	"mmc@f1040000", &dev)) {
	debug("SD0 driver for SD0 device is not present\n");
	break;
	}
	debug("mmc0 device found at %p, seq %d\n", dev, dev_seq(dev));

	mode = "mmc";
	bootseq = dev_seq(dev);
	break;
	case SD1_LSHFT_MODE:
	puts("LVL_SHFT_");
	fallthrough;
	case SD_MODE1:
	puts("SD_MODE1\n");
	if (uclass_get_device_by_name(UCLASS_MMC,
	"mmc@f1050000", &dev)) {
	debug("SD1 driver for SD1 device is not present\n");
	break;
	}
	debug("mmc1 device found at %p, seq %d\n", dev, dev_seq(dev));

	mode = "mmc";
	bootseq = dev_seq(dev);
	break;
	default:
	printf("Invalid Boot Mode:0x%x\n", bootmode);
	break;
	}

	if (mode) {
	if (bootseq >= 0) {
	bootseq_len = snprintf(NULL, 0, "%i", bootseq);
	debug("Bootseq len: %x\n", bootseq_len);
	}

	/*
	* One terminating char + one byte for space between mode
	* and default boot_targets
	*/
	env_targets = env_get("boot_targets");
	if (env_targets)
	env_targets_len = strlen(env_targets);

	new_targets = calloc(1, strlen(mode) + env_targets_len + 2 +
	bootseq_len);
	if (!new_targets)
	return -ENOMEM;

	if (bootseq >= 0)
	sprintf(new_targets, "%s%x %s", mode, bootseq,
	env_targets ? env_targets : "");
	else
	sprintf(new_targets, "%s %s", mode,
	env_targets ? env_targets : "");

	env_set("boot_targets", new_targets);
	}

	return 0;
	}

	int board_late_init(void)
	{
	int ret;

	if (!(gd->flags & GD_FLG_ENV_DEFAULT)) {
	debug("Saved variables - Skipping\n");
	return 0;
	}

	if (!IS_ENABLED(CONFIG_ENV_VARS_UBOOT_RUNTIME_CONFIG))
	return 0;

	if (IS_ENABLED(CONFIG_DISTRO_DEFAULTS)) {
	ret = boot_targets_setup();
	if (ret)
	return ret;
	}

	return board_late_init_xilinx();
	}

	int dram_init_banksize(void)
	{
	int ret;

	ret = fdtdec_setup_memory_banksize();
	if (ret)
	return ret;

	mem_map_fill();

	return 0;
	}

	int dram_init(void)
	{
	int ret;

	if (IS_ENABLED(CONFIG_SYS_MEM_RSVD_FOR_MMU))
	ret = fdtdec_setup_mem_size_base();
	else
	ret = fdtdec_setup_mem_size_base_lowest();

	if (ret)
	return -EINVAL;

	return 0;
	}

	void reset_cpu(void)
	{
	}

	#if defined(CONFIG_ENV_IS_NOWHERE)
	enum env_location env_get_location(enum env_operation op, int prio)
	{
	u8 bootmode = versal_net_get_bootmode();

	if (prio)
	return ENVL_UNKNOWN;

	switch (bootmode) {
	case EMMC_MODE:
	case SD_MODE:
	case SD1_LSHFT_MODE:
	case SD_MODE1:
	if (IS_ENABLED(CONFIG_ENV_IS_IN_FAT))
	return ENVL_FAT;
	if (IS_ENABLED(CONFIG_ENV_IS_IN_EXT4))
	return ENVL_EXT4;
	return ENVL_NOWHERE;
	case OSPI_MODE:
	case QSPI_MODE_24BIT:
	case QSPI_MODE_32BIT:
	if (IS_ENABLED(CONFIG_ENV_IS_IN_SPI_FLASH))
	return ENVL_SPI_FLASH;
	return ENVL_NOWHERE;
	case JTAG_MODE:
	case SELECTMAP_MODE:
	default:
	return ENVL_NOWHERE;
	}
	}
	#endif