#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: armadaxp_machdep.c,v 1.19 2023/04/21 15:04:47 skrll Exp $");
#include "opt_arm_debug.h"
#include "opt_console.h"
#include "opt_machdep.h"
#include "opt_mvsoc.h"
#include "opt_evbarm_boardtype.h"
#include "opt_com.h"
#include "opt_ddb.h"
#include "opt_kgdb.h"
#include "opt_pci.h"
#include <sys/bus.h>
#include <sys/param.h>
#include <sys/device.h>
#include <sys/systm.h>
#include <sys/kernel.h>
#include <sys/exec.h>
#include <sys/proc.h>
#include <sys/msgbuf.h>
#include <sys/reboot.h>
#include <sys/termios.h>
#include <sys/ksyms.h>
#include <uvm/uvm_extern.h>
#include <sys/conf.h>
#include <dev/cons.h>
#include <dev/md.h>
#include <dev/marvell/marvellreg.h>
#include <dev/pci/pcireg.h>
#include <dev/pci/pcivar.h>
#include <machine/pci_machdep.h>
#include <machine/db_machdep.h>
#include <ddb/db_sym.h>
#include <ddb/db_extern.h>
#ifdef KGDB
#include <sys/kgdb.h>
#endif
#include <machine/bootconfig.h>
#include <machine/autoconf.h>
#include <machine/cpu.h>
#include <machine/frame.h>
#include <arm/armreg.h>
#include <arm/undefined.h>
#include <arm/arm32/machdep.h>
#include <arm/marvell/mvsocreg.h>
#include <arm/marvell/mvsocvar.h>
#include <arm/marvell/armadaxpreg.h>
#include <evbarm/marvell/marvellreg.h>
#include <evbarm/marvell/marvellvar.h>
#include <dev/marvell/marvellreg.h>
#include "mvpex.h"
#include "com.h"
#if NCOM > 0
#include <dev/ic/comreg.h>
#include <dev/ic/comvar.h>
#endif
#include <net/if_ether.h>
BootConfig bootconfig;
char *boot_args = NULL;
char *boot_file = NULL;
extern unsigned int uboot_regs_pa[];
unsigned int *uboot_regs_va;
char boot_argbuf[MAX_BOOT_STRING];
extern int KERNEL_BASE_phys[];
#ifndef MEMSTART
#define MEMSTART 0x00000000UL
#endif
#ifndef MEMSIZE
#define MEMSIZE 0x40000000UL
#endif
#ifndef STARTUP_PAGETABLE_ADDR
#define STARTUP_PAGETABLE_ADDR 0x00000000UL
#endif
#define KERNEL_OFFSET (paddr_t)&KERNEL_BASE_phys
#define KERNEL_TEXT_BASE (KERNEL_BASE + KERNEL_OFFSET)
#define KERNEL_VM_BASE (KERNEL_BASE + 0x40000000)
#define KERNEL_VM_SIZE 0x14000000
void consinit(void);
#ifdef KGDB
static void kgdb_port_init(void);
#endif
static void axp_device_register(device_t dev, void *aux);
static void
axp_system_reset(void)
{
extern vaddr_t misc_base;
#define write_miscreg(r, v) (*(volatile uint32_t *)(misc_base + (r)) = (v))
cpu_reset_address = 0;
write_miscreg(ARMADAXP_MISC_RSTOUTNMASKR,
ARMADAXP_MISC_RSTOUTNMASKR_GLOBALSOFTRSTOUTEN);
write_miscreg(ARMADAXP_MISC_SSRR, ARMADAXP_MISC_SSRR_GLOBALSOFTRST);
while (1);
}
static const struct pmap_devmap devmap[] = {
DEVMAP_ENTRY(MARVELL_INTERREGS_VBASE,
MARVELL_INTERREGS_PBASE,
MVSOC_INTERREGS_SIZE),
DEVMAP_ENTRY_END
};
static inline pd_entry_t *
read_ttb(void)
{
return (pd_entry_t *)(armreg_ttbr_read() & ~((1<<14)-1));
}
static int
axp_pcie_free_win(void)
{
for (size_t i = 0; i < ARMADAXP_MLMB_NWINDOW; i++) {
if ((read_mlmbreg(MVSOC_MLMB_WCR(i)) &
MVSOC_MLMB_WCR_WINEN) == 0) {
return i;
}
}
return (-1);
}
static void
reset_axp_pcie_win(void)
{
uint32_t target, attr;
int memtag = 0, iotag = 0, window, i;
uint32_t membase;
uint32_t iobase;
uint32_t tags[] = { ARMADAXP_TAG_PEX00_MEM, ARMADAXP_TAG_PEX00_IO,
ARMADAXP_TAG_PEX01_MEM, ARMADAXP_TAG_PEX01_IO,
ARMADAXP_TAG_PEX02_MEM, ARMADAXP_TAG_PEX02_IO,
ARMADAXP_TAG_PEX03_MEM, ARMADAXP_TAG_PEX03_IO,
ARMADAXP_TAG_PEX10_MEM, ARMADAXP_TAG_PEX10_IO,
ARMADAXP_TAG_PEX11_MEM, ARMADAXP_TAG_PEX11_IO,
ARMADAXP_TAG_PEX12_MEM, ARMADAXP_TAG_PEX12_IO,
ARMADAXP_TAG_PEX13_MEM, ARMADAXP_TAG_PEX13_IO,
ARMADAXP_TAG_PEX2_MEM, ARMADAXP_TAG_PEX2_IO,
ARMADAXP_TAG_PEX3_MEM, ARMADAXP_TAG_PEX3_IO
};
nwindow = ARMADAXP_MLMB_NWINDOW;
nremap = ARMADAXP_MLMB_NREMAP;
membase = MARVELL_PEXMEM_PBASE;
iobase = MARVELL_PEXIO_PBASE;
for (i = 0; i < __arraycount(tags) / 2; i++) {
memtag = tags[2 * i];
iotag = tags[(2 * i) + 1];
window = mvsoc_target(memtag, &target, &attr, NULL, NULL);
if (window >= nwindow) {
window = axp_pcie_free_win();
if (window < 0) {
aprint_error(": no free windows for PEX MEM\n");
break;
}
}
write_mlmbreg(MVSOC_MLMB_WCR(window),
MVSOC_MLMB_WCR_WINEN |
MVSOC_MLMB_WCR_TARGET(target) |
MVSOC_MLMB_WCR_ATTR(attr) |
MVSOC_MLMB_WCR_SIZE(MARVELL_PEXMEM_SIZE));
write_mlmbreg(MVSOC_MLMB_WBR(window),
membase & MVSOC_MLMB_WBR_BASE_MASK);
#ifdef PCI_NETBSD_CONFIGURE
if (window < nremap) {
write_mlmbreg(MVSOC_MLMB_WRLR(window),
membase & MVSOC_MLMB_WRLR_REMAP_MASK);
write_mlmbreg(MVSOC_MLMB_WRHR(window), 0);
}
#endif
window = mvsoc_target(iotag, &target, &attr, NULL, NULL);
if (window >= nwindow) {
window = axp_pcie_free_win();
if (window < 0) {
aprint_error(": no free windows for PEX I/O\n");
break;
}
}
write_mlmbreg(MVSOC_MLMB_WCR(window),
MVSOC_MLMB_WCR_WINEN |
MVSOC_MLMB_WCR_TARGET(target) |
MVSOC_MLMB_WCR_ATTR(attr) |
MVSOC_MLMB_WCR_SIZE(MARVELL_PEXIO_SIZE));
write_mlmbreg(MVSOC_MLMB_WBR(window),
iobase & MVSOC_MLMB_WBR_BASE_MASK);
#ifdef PCI_NETBSD_CONFIGURE
if (window < nremap) {
write_mlmbreg(MVSOC_MLMB_WRLR(window),
iobase & MVSOC_MLMB_WRLR_REMAP_MASK);
write_mlmbreg(MVSOC_MLMB_WRHR(window), 0);
}
#endif
membase += MARVELL_PEXMEM_SIZE;
iobase += MARVELL_PEXIO_SIZE;
}
}
vaddr_t
initarm(void *arg)
{
cpu_reset_address = axp_system_reset;
mvsoc_bootstrap(MARVELL_INTERREGS_VBASE);
if (set_cpufuncs())
panic("cpu not recognized!");
pmap_devmap_bootstrap((vaddr_t)read_ttb(), devmap);
consinit();
reset_axp_pcie_win();
armadaxp_bootstrap(
MARVELL_INTERREGS_VBASE,
MARVELL_INTERREGS_PBASE);
#ifdef KGDB
kgdb_port_init();
#endif
#ifdef VERBOSE_INIT_ARM
#define BDSTR(s) _BDSTR(s)
#define _BDSTR(s) #s
printf("\nNetBSD/evbarm (" BDSTR(EVBARM_BOARDTYPE) ") booting ...\n");
#endif
#ifdef __HAVE_MM_MD_DIRECT_MAPPED_PHYS
const bool mapallmem_p = true;
#else
const bool mapallmem_p = false;
#endif
#ifdef VERBOSE_INIT_ARM
printf("initarm: Configuring system ...\n");
#endif
psize_t memsize = MEMSIZE;
if (mapallmem_p && memsize > KERNEL_VM_BASE - KERNEL_BASE) {
printf("%s: dropping RAM size from %luMB to %uMB\n",
__func__, (unsigned long) (memsize >> 20),
(KERNEL_VM_BASE - KERNEL_BASE) >> 20);
memsize = KERNEL_VM_BASE - KERNEL_BASE;
}
bootconfig.dramblocks = 1;
bootconfig.dram[0].address = MEMSTART;
bootconfig.dram[0].pages = memsize / PAGE_SIZE;
physical_start = bootconfig.dram[0].address;
physical_end = physical_start + (bootconfig.dram[0].pages * PAGE_SIZE);
arm32_bootmem_init(0, physical_end, (uintptr_t) KERNEL_BASE_phys);
arm32_kernel_vm_init(KERNEL_VM_BASE, ARM_VECTORS_LOW, 0,
devmap, mapallmem_p);
evbarm_device_register = axp_device_register;
uboot_regs_va = (int *)((unsigned int)uboot_regs_pa + KERNEL_BASE);
boot_args = (char *)(uboot_regs_va[3] + KERNEL_BASE);
strlcpy(boot_argbuf, (char *)boot_args, sizeof(boot_argbuf));
boot_args = boot_argbuf;
parse_mi_bootargs(boot_args);
return initarm_common(KERNEL_VM_BASE, KERNEL_VM_SIZE, NULL, 0);
}
#ifndef CONSADDR
#error Specify the address of the UART with the CONSADDR option.
#endif
#ifndef CONSPEED
#define CONSPEED B115200
#endif
#ifndef CONMODE
#define CONMODE ((TTYDEF_CFLAG & ~(CSIZE | CSTOPB | PARENB)) | CS8)
#endif
#ifndef CONSFREQ
#define CONSFREQ 0
#endif
static const int comcnspeed = CONSPEED;
static const int comcnfreq = CONSFREQ;
static const tcflag_t comcnmode = CONMODE;
static const bus_addr_t comcnaddr = (bus_addr_t)CONSADDR;
void
consinit(void)
{
static bool consinit_called = false;
if (consinit_called)
return;
consinit_called = true;
#if NCOM > 0
extern int mvuart_cnattach(bus_space_tag_t, bus_addr_t, int,
uint32_t, int);
if (mvuart_cnattach(&mvsoc_bs_tag, comcnaddr, comcnspeed,
comcnfreq ? comcnfreq : mvTclk , comcnmode))
panic("Serial console can not be initialized.");
#endif
}
#ifdef KGDB
#ifndef KGDB_DEVADDR
#error Specify the address of the kgdb UART with the KGDB_DEVADDR option.
#endif
#ifndef KGDB_DEVRATE
#define KGDB_DEVRATE B115200
#endif
#define MVUART_SIZE 0x20
#ifndef KGDB_DEVMODE
#define KGDB_DEVMODE ((TTYDEF_CFLAG & ~(CSIZE | CSTOPB | PARENB)) | CS8)
#endif
static const vaddr_t comkgdbaddr = KGDB_DEVADDR;
static const int comkgdbspeed = KGDB_DEVRATE;
static const int comkgdbmode = KGDB_DEVMODE;
void
static kgdb_port_init(void)
{
static int kgdbsinit_called = 0;
if (kgdbsinit_called != 0)
return;
kgdbsinit_called = 1;
if (com_kgdb_attach(&mvsoc_bs_tag, comkgdbaddr, comkgdbspeed,
MVUART_SIZE, COM_TYPE_16550_NOERS, comkgdbmode))
panic("KGDB uart can not be initialized.");
}
#endif
#if NMVPEX > 0
static void
marvell_startend_by_tag(int tag, uint64_t *start, uint64_t *end)
{
uint32_t base, size;
int win;
win = mvsoc_target(tag, NULL, NULL, &base, &size);
if (size != 0) {
if (win < nremap)
*start = read_mlmbreg(MVSOC_MLMB_WRLR(win)) |
((read_mlmbreg(MVSOC_MLMB_WRHR(win)) << 16) << 16);
else
*start = base;
*end = *start + size - 1;
} else
*start = *end = 0;
}
#endif
static void
axp_device_register(device_t dev, void *aux)
{
prop_dictionary_t dict = device_properties(dev);
#if NCOM > 0
if (device_is_a(dev, "com") &&
device_is_a(device_parent(dev), "mvsoc"))
prop_dictionary_set_uint32(dict, "frequency", mvTclk);
#endif
#if NMVPEX > 0
extern struct bus_space
armadaxp_pex00_io_bs_tag, armadaxp_pex00_mem_bs_tag,
armadaxp_pex01_io_bs_tag, armadaxp_pex01_mem_bs_tag,
armadaxp_pex02_io_bs_tag, armadaxp_pex02_mem_bs_tag,
armadaxp_pex03_io_bs_tag, armadaxp_pex03_mem_bs_tag,
armadaxp_pex10_io_bs_tag, armadaxp_pex10_mem_bs_tag,
armadaxp_pex2_io_bs_tag, armadaxp_pex2_mem_bs_tag,
armadaxp_pex3_io_bs_tag, armadaxp_pex3_mem_bs_tag;
extern struct arm32_pci_chipset arm32_mvpex0_chipset,
arm32_mvpex1_chipset, arm32_mvpex2_chipset,
arm32_mvpex3_chipset, arm32_mvpex4_chipset,
arm32_mvpex5_chipset, arm32_mvpex6_chipset;
struct marvell_attach_args *mva = aux;
if (device_is_a(dev, "mvpex")) {
struct bus_space *mvpex_io_bs_tag, *mvpex_mem_bs_tag;
struct arm32_pci_chipset *arm32_mvpex_chipset;
prop_data_t io_bs_tag, mem_bs_tag, pc;
uint64_t start, end;
int iotag, memtag;
if (mva->mva_offset == MVSOC_PEX_BASE) {
mvpex_io_bs_tag = &armadaxp_pex00_io_bs_tag;
mvpex_mem_bs_tag = &armadaxp_pex00_mem_bs_tag;
arm32_mvpex_chipset = &arm32_mvpex0_chipset;
iotag = ARMADAXP_TAG_PEX00_IO;
memtag = ARMADAXP_TAG_PEX00_MEM;
} else if (mva->mva_offset == ARMADAXP_PEX01_BASE) {
mvpex_io_bs_tag = &armadaxp_pex01_io_bs_tag;
mvpex_mem_bs_tag = &armadaxp_pex01_mem_bs_tag;
arm32_mvpex_chipset = &arm32_mvpex1_chipset;
iotag = ARMADAXP_TAG_PEX01_IO;
memtag = ARMADAXP_TAG_PEX01_MEM;
} else if (mva->mva_offset == ARMADAXP_PEX02_BASE) {
mvpex_io_bs_tag = &armadaxp_pex02_io_bs_tag;
mvpex_mem_bs_tag = &armadaxp_pex02_mem_bs_tag;
arm32_mvpex_chipset = &arm32_mvpex2_chipset;
iotag = ARMADAXP_TAG_PEX02_IO;
memtag = ARMADAXP_TAG_PEX02_MEM;
} else if (mva->mva_offset == ARMADAXP_PEX03_BASE) {
mvpex_io_bs_tag = &armadaxp_pex03_io_bs_tag;
mvpex_mem_bs_tag = &armadaxp_pex03_mem_bs_tag;
arm32_mvpex_chipset = &arm32_mvpex3_chipset;
iotag = ARMADAXP_TAG_PEX03_IO;
memtag = ARMADAXP_TAG_PEX03_MEM;
} else if (mva->mva_offset == ARMADAXP_PEX10_BASE) {
mvpex_io_bs_tag = &armadaxp_pex10_io_bs_tag;
mvpex_mem_bs_tag = &armadaxp_pex10_mem_bs_tag;
arm32_mvpex_chipset = &arm32_mvpex4_chipset;
iotag = ARMADAXP_TAG_PEX10_IO;
memtag = ARMADAXP_TAG_PEX10_MEM;
} else if (mva->mva_offset == ARMADAXP_PEX2_BASE) {
mvpex_io_bs_tag = &armadaxp_pex2_io_bs_tag;
mvpex_mem_bs_tag = &armadaxp_pex2_mem_bs_tag;
arm32_mvpex_chipset = &arm32_mvpex5_chipset;
iotag = ARMADAXP_TAG_PEX2_IO;
memtag = ARMADAXP_TAG_PEX2_MEM;
} else {
mvpex_io_bs_tag = &armadaxp_pex3_io_bs_tag;
mvpex_mem_bs_tag = &armadaxp_pex3_mem_bs_tag;
arm32_mvpex_chipset = &arm32_mvpex6_chipset;
iotag = ARMADAXP_TAG_PEX3_IO;
memtag = ARMADAXP_TAG_PEX3_MEM;
}
arm32_mvpex_chipset->pc_conf_v = device_private(dev);
arm32_mvpex_chipset->pc_intr_v = device_private(dev);
io_bs_tag = prop_data_create_data_nocopy(
mvpex_io_bs_tag, sizeof(struct bus_space));
KASSERT(io_bs_tag != NULL);
prop_dictionary_set(dict, "io-bus-tag", io_bs_tag);
prop_object_release(io_bs_tag);
mem_bs_tag = prop_data_create_data_nocopy(
mvpex_mem_bs_tag, sizeof(struct bus_space));
KASSERT(mem_bs_tag != NULL);
prop_dictionary_set(dict, "mem-bus-tag", mem_bs_tag);
prop_object_release(mem_bs_tag);
pc = prop_data_create_data_nocopy(arm32_mvpex_chipset,
sizeof(struct arm32_pci_chipset));
KASSERT(pc != NULL);
prop_dictionary_set(dict, "pci-chipset", pc);
prop_object_release(pc);
marvell_startend_by_tag(iotag, &start, &end);
prop_dictionary_set_uint64(dict, "iostart", start);
prop_dictionary_set_uint64(dict, "ioend", end);
marvell_startend_by_tag(memtag, &start, &end);
prop_dictionary_set_uint64(dict, "memstart", start);
prop_dictionary_set_uint64(dict, "memend", end);
prop_dictionary_set_uint32(dict,
"cache-line-size", arm_dcache_align);
}
if (device_is_a(dev, "mvgbec")) {
uint8_t enaddr[ETHER_ADDR_LEN];
char optname[9];
int unit = device_unit(dev);
if (unit > 9)
return;
switch (unit) {
case 0:
strlcpy(optname, "ethaddr", sizeof(optname));
break;
default:
snprintf(optname, sizeof(optname),
"eth%daddr", unit);
break;
}
if (get_bootconf_option(boot_args, optname,
BOOTOPT_TYPE_MACADDR, enaddr)) {
prop_data_t pd =
prop_data_create_data(enaddr, sizeof(enaddr));
prop_dictionary_set(dict, "mac-address", pd);
}
}
if (device_is_a(dev, "mvxpe")) {
uint8_t enaddr[ETHER_ADDR_LEN];
char optname[9];
int unit = device_unit(dev);
if (unit > 9)
return;
switch (unit) {
case 0:
strlcpy(optname, "ethaddr", sizeof(optname));
break;
default:
snprintf(optname, sizeof(optname),
"eth%daddr", unit);
break;
}
if (get_bootconf_option(boot_args, optname,
BOOTOPT_TYPE_MACADDR, enaddr)) {
prop_data_t pd =
prop_data_create_data(enaddr, sizeof(enaddr));
prop_dictionary_set(dict, "mac-address", pd);
}
}
#endif
}