blob: 3fde9fbc47083baebc1168b1719828301bab98ce [file] [log] [blame]
// SPDX-License-Identifier: GPL-2.0+
/*
* Copyright (C) 2020 Marvell International Ltd.
*/
#include <dm.h>
#include <dm/uclass.h>
#include <env.h>
#include <iomux.h>
#include <asm/global_data.h>
#include <linux/bitfield.h>
#include <linux/bitops.h>
#include <linux/compat.h>
#include <linux/io.h>
#include <mach/clock.h>
#include <mach/cavm-reg.h>
#include <mach/cvmx-bootmem.h>
DECLARE_GLOBAL_DATA_PTR;
/*
* Important:
* This address cannot be changed as the PCI console tool relies on exactly
* this value!
*/
#define BOOTLOADER_BOOTMEM_DESC_ADDR 0x6c100
#define BOOTLOADER_BOOTMEM_DESC_SPACE (BOOTLOADER_BOOTMEM_DESC_ADDR + 0x8)
#define OCTEON_RESERVED_LOW_BOOT_MEM_SIZE (1024 * 1024)
#define BOOTCMD_NAME "pci-bootcmd"
#define CONSOLE_NAME "pci-console@0"
#define OCTEON_BOOTLOADER_LOAD_MEM_NAME "__tmp_load"
/*
* TRUE for devices having registers with little-endian byte
* order, FALSE for registers with native-endian byte order.
* PCI mandates little-endian, USB and SATA are configurable,
* but we chose little-endian for these.
*
* This table will be referened in the Octeon platform specific
* mangle-port.h header.
*/
const bool octeon_should_swizzle_table[256] = {
[0x00] = true, /* bootbus/CF */
[0x1b] = true, /* PCI mmio window */
[0x1c] = true, /* PCI mmio window */
[0x1d] = true, /* PCI mmio window */
[0x1e] = true, /* PCI mmio window */
[0x68] = true, /* OCTEON III USB */
[0x69] = true, /* OCTEON III USB */
[0x6c] = true, /* OCTEON III SATA */
[0x6f] = true, /* OCTEON II USB */
};
static int get_clocks(void)
{
const u64 ref_clock = PLL_REF_CLK;
void __iomem *rst_boot;
u64 val;
rst_boot = ioremap(CAVM_RST_BOOT, 0);
val = ioread64(rst_boot);
gd->cpu_clk = ref_clock * FIELD_GET(RST_BOOT_C_MUL, val);
gd->bus_clk = ref_clock * FIELD_GET(RST_BOOT_PNR_MUL, val);
debug("%s: cpu: %lu, bus: %lu\n", __func__, gd->cpu_clk, gd->bus_clk);
return 0;
}
/* Early mach init code run from flash */
int mach_cpu_init(void)
{
void __iomem *mio_boot_reg_cfg0;
/* Remap boot-bus 0x1fc0.0000 -> 0x1f40.0000 */
/* ToDo: Move this to an early running bus (bootbus) DM driver */
mio_boot_reg_cfg0 = ioremap(CAVM_MIO_BOOT_REG_CFG0, 0);
clrsetbits_be64(mio_boot_reg_cfg0, 0xffff, 0x1f40);
/* Get clocks and store them in GD */
get_clocks();
return 0;
}
/**
* Returns number of cores
*
* @return number of CPU cores for the specified node
*/
static int cavm_octeon_num_cores(void)
{
void __iomem *ciu_fuse;
ciu_fuse = ioremap(CAVM_CIU_FUSE, 0);
return fls64(ioread64(ciu_fuse) & 0xffffffffffff);
}
int print_cpuinfo(void)
{
printf("SoC: Octeon CN73xx (%d cores)\n", cavm_octeon_num_cores());
return 0;
}
static int octeon_bootmem_init(void)
{
int ret;
/* Call old single-node func: it uses only gd->ram_size */
ret = cvmx_bootmem_phy_mem_list_init(gd->ram_size,
OCTEON_RESERVED_LOW_BOOT_MEM_SIZE,
(void *)CKSEG0ADDR(BOOTLOADER_BOOTMEM_DESC_SPACE));
if (!ret) {
printf("FATAL: Error initializing bootmem list\n");
return -ENOSPC;
}
/*
* Put bootmem descriptor address in known location for host.
* Make sure it is not in kseg0, as we want physical address
*/
writeq((u64)__cvmx_bootmem_internal_get_desc_ptr() & 0x7fffffffull,
(void *)CKSEG0ADDR(BOOTLOADER_BOOTMEM_DESC_ADDR));
debug("Reserving first 1MB of memory\n");
ret = cvmx_bootmem_reserve_memory(0, OCTEON_RESERVED_LOW_BOOT_MEM_SIZE,
"__low_reserved", 0);
if (!ret)
puts("Error reserving low 1MB of memory\n");
#ifdef DEBUG
cvmx_bootmem_phy_list_print();
#endif
return 0;
}
static int octeon_configure_load_memory(void)
{
char *eptr;
u32 addr;
u32 size;
int ret;
eptr = env_get("octeon_reserved_mem_load_size");
if (!eptr || !strcmp("auto", eptr)) {
/*
* Pick a size that we think is appropriate.
* Please note that for small memory boards this guess
* will likely not be ideal.
* Please pick a specific size for boards/applications
* that require it.
*/
if (gd->ram_size <= (256 << 20)) {
size = min_t(u64, (128 << 20),
((gd->ram_size * 2) / 5) & ~0xFFFFF);
} else {
size = min_t(u64, (256 << 20),
((gd->ram_size - (256 << 20)) / 3) & ~0xFFFFF);
}
} else {
size = simple_strtol(eptr, NULL, 16);
debug("octeon_reserved_mem_load_size=0x%08x\n", size);
}
if (size) {
debug("Linux reserved load size 0x%08x\n", size);
eptr = env_get("octeon_reserved_mem_load_base");
if (!eptr || !strcmp("auto", eptr)) {
u64 mem_top;
/*
* Leave some room for previous allocations that
* are made starting at the top of the low
* 256 Mbytes of DRAM
*/
int adjust = (1 << 20);
if (gd->ram_size <= (512 << 20))
adjust = (17 << 20);
/* Put block at the top of DDR0, or bottom of DDR2 */
if ((gd->ram_size <= (256 << 20)) ||
(size > (gd->ram_size - (256 << 20)))) {
mem_top = min_t(u64, gd->ram_size - adjust,
(256 << 20) - adjust);
} else if ((gd->ram_size <= (512 << 20)) ||
(size > (gd->ram_size - (512 << 20)))) {
mem_top = min_t(u64, gd->ram_size - adjust,
(512 << 20) - adjust);
} else {
/*
* We have enough room, so set
* mem_top so that the block is
* at the base of the DDR2
* segment
*/
mem_top = (512 << 20) + size;
}
/*
* Adjust for boot bus memory hole on OCTEON II
* and later.
*/
if ((gd->ram_size > (256 << 20)))
mem_top += (256 << 20);
debug("Adjusted memory top is 0x%llx\n", mem_top);
addr = mem_top - size;
if (addr > (512 << 20))
addr = (512 << 20);
if ((addr >= (256 << 20)) && addr < (512 << 20)) {
/*
* The address landed in the boot-bus
* memory hole. Dig it out of the hole.
*/
addr = (512 << 20);
}
} else {
addr = simple_strtol(eptr, NULL, 16);
}
ret = cvmx_bootmem_phy_named_block_alloc(size, addr,
addr + size, 0,
OCTEON_BOOTLOADER_LOAD_MEM_NAME,
0);
if (ret < 0) {
printf("ERROR: Unable to allocate bootloader reserved memory (addr: 0x%x, size: 0x%x).\n",
addr, size);
} else {
/*
* Set default load address to base of memory
* reserved for loading. The setting of the
* env. variable also sets the load_addr global
* variable.
* This environment variable is overridden each
* boot if a reserved block is created.
*/
char str[20];
snprintf(str, sizeof(str), "0x%x", addr);
env_set("loadaddr", str);
debug("Setting load address to 0x%08x, size 0x%x\n",
addr, size);
}
return 0;
}
printf("WARNING: No reserved memory for image loading.\n");
return -1;
}
static int init_pcie_console(void)
{
char *stdinname = env_get("stdin");
char *stdoutname = env_get("stdout");
char *stderrname = env_get("stderr");
struct udevice *pcie_console_dev = NULL;
bool stdin_set, stdout_set, stderr_set;
char iomux_name[128];
int ret = 0;
debug("%s: stdin: %s, stdout: %s, stderr: %s\n", __func__, stdinname,
stdoutname, stderrname);
if (!stdinname) {
env_set("stdin", "serial");
stdinname = env_get("stdin");
}
if (!stdoutname) {
env_set("stdout", "serial");
stdoutname = env_get("stdout");
}
if (!stderrname) {
env_set("stderr", "serial");
stderrname = env_get("stderr");
}
if (!stdinname || !stdoutname || !stderrname) {
printf("%s: Error setting environment variables for serial\n",
__func__);
return -1;
}
stdin_set = !!strstr(stdinname, CONSOLE_NAME);
stdout_set = !!strstr(stdoutname, CONSOLE_NAME);
stderr_set = !!strstr(stderrname, CONSOLE_NAME);
log_debug("stdin: %d, \"%s\", stdout: %d, \"%s\", stderr: %d, \"%s\"\n",
stdin_set, stdinname, stdout_set, stdoutname,
stderr_set, stderrname);
ret = uclass_get_device_by_name(UCLASS_SERIAL, CONSOLE_NAME,
&pcie_console_dev);
if (ret || !pcie_console_dev) {
debug("%s: No PCI console device %s found\n", __func__,
CONSOLE_NAME);
return 0;
}
if (stdin_set)
strncpy(iomux_name, stdinname, sizeof(iomux_name));
else
snprintf(iomux_name, sizeof(iomux_name), "%s,%s",
stdinname, pcie_console_dev->name);
ret = iomux_doenv(stdin, iomux_name);
if (ret) {
log_err("%s: Error setting I/O stdin MUX to %s\n",
__func__, iomux_name);
return ret;
}
if (!stdin_set)
env_set("stdin", iomux_name);
if (stdout_set)
strncpy(iomux_name, stdoutname, sizeof(iomux_name));
else
snprintf(iomux_name, sizeof(iomux_name), "%s,%s", stdoutname,
pcie_console_dev->name);
ret = iomux_doenv(stdout, iomux_name);
if (ret) {
log_err("%s: Error setting I/O stdout MUX to %s\n",
__func__, iomux_name);
return ret;
}
if (!stdout_set)
env_set("stdout", iomux_name);
if (stderr_set)
strncpy(iomux_name, stderrname, sizeof(iomux_name));
else
snprintf(iomux_name, sizeof(iomux_name), "%s,%s", stderrname,
pcie_console_dev->name);
ret = iomux_doenv(stderr, iomux_name);
if (ret) {
log_err("%s: Error setting I/O stderr MUX to %s\n",
__func__, iomux_name);
return ret;
}
if (!stderr_set)
env_set("stderr", iomux_name);
debug("%s: stdin: %s, stdout: %s, stderr: %s, ret: %d\n",
__func__, env_get("stdin"), env_get("stdout"),
env_get("stderr"), ret);
return ret;
}
static int init_bootcmd_console(void)
{
char *stdinname = env_get("stdin");
struct udevice *bootcmd_dev = NULL;
bool stdin_set;
char iomux_name[128];
int ret = 0;
debug("%s: stdin before: %s\n", __func__,
stdinname ? stdinname : "NONE");
if (!stdinname) {
env_set("stdin", "serial");
stdinname = env_get("stdin");
}
stdin_set = !!strstr(stdinname, BOOTCMD_NAME);
ret = uclass_get_device_by_driver(UCLASS_SERIAL,
DM_DRIVER_GET(octeon_bootcmd),
&bootcmd_dev);
if (ret) {
log_err("%s: Error getting %s serial class\n", __func__,
BOOTCMD_NAME);
} else if (bootcmd_dev) {
if (stdin_set)
strncpy(iomux_name, stdinname, sizeof(iomux_name));
else
snprintf(iomux_name, sizeof(iomux_name), "%s,%s",
stdinname, bootcmd_dev->name);
ret = iomux_doenv(stdin, iomux_name);
if (ret)
log_err("%s: Error %d enabling the PCI bootcmd input console \"%s\"\n",
__func__, ret, iomux_name);
if (!stdin_set)
env_set("stdin", iomux_name);
}
debug("%s: Set iomux and stdin to %s (ret: %d)\n",
__func__, iomux_name, ret);
return ret;
}
int arch_misc_init(void)
{
int ret;
ret = octeon_bootmem_init();
if (ret)
return ret;
ret = octeon_configure_load_memory();
if (ret)
return ret;
if (CONFIG_IS_ENABLED(OCTEON_SERIAL_PCIE_CONSOLE))
init_pcie_console();
if (CONFIG_IS_ENABLED(OCTEON_SERIAL_BOOTCMD))
init_bootcmd_console();
return 0;
}