363 lines
8.0 KiB
C
363 lines
8.0 KiB
C
// SPDX-License-Identifier: GPL-2.0+
|
|
/*
|
|
* Copyright 2013-2015 Arcturus Networks, Inc.
|
|
* http://www.arcturusnetworks.com/products/ucp1020/
|
|
* by Oleksandr G Zhadan et al.
|
|
* based on board/freescale/p1_p2_rdb_pc/spl.c
|
|
* original copyright follows:
|
|
* Copyright 2013 Freescale Semiconductor, Inc.
|
|
*/
|
|
|
|
#include <common.h>
|
|
#include <command.h>
|
|
#include <hwconfig.h>
|
|
#include <pci.h>
|
|
#include <i2c.h>
|
|
#include <miiphy.h>
|
|
#include <linux/libfdt.h>
|
|
#include <fdt_support.h>
|
|
#include <fsl_mdio.h>
|
|
#include <tsec.h>
|
|
#include <ioports.h>
|
|
#include <netdev.h>
|
|
#include <micrel.h>
|
|
#include <spi_flash.h>
|
|
#include <mmc.h>
|
|
#include <linux/ctype.h>
|
|
#include <asm/fsl_serdes.h>
|
|
#include <asm/gpio.h>
|
|
#include <asm/processor.h>
|
|
#include <asm/mmu.h>
|
|
#include <asm/cache.h>
|
|
#include <asm/immap_85xx.h>
|
|
#include <asm/fsl_pci.h>
|
|
#include <fsl_ddr_sdram.h>
|
|
#include <asm/io.h>
|
|
#include <asm/fsl_law.h>
|
|
#include <asm/fsl_lbc.h>
|
|
#include <asm/mp.h>
|
|
#include "ucp1020.h"
|
|
|
|
void spi_set_speed(struct spi_slave *slave, uint hz)
|
|
{
|
|
/* TO DO: It's actially have to be in spi/ */
|
|
}
|
|
|
|
/*
|
|
* To be compatible with cmd_gpio
|
|
*/
|
|
int name_to_gpio(const char *name)
|
|
{
|
|
int gpio = 31 - simple_strtoul(name, NULL, 10);
|
|
|
|
if (gpio < 16)
|
|
gpio = -1;
|
|
|
|
return gpio;
|
|
}
|
|
|
|
void board_gpio_init(void)
|
|
{
|
|
int i;
|
|
char envname[8], *val;
|
|
|
|
for (i = 0; i < GPIO_MAX_NUM; i++) {
|
|
sprintf(envname, "GPIO%d", i);
|
|
val = env_get(envname);
|
|
if (val) {
|
|
char direction = toupper(val[0]);
|
|
char level = toupper(val[1]);
|
|
|
|
if (direction == 'I') {
|
|
gpio_direction_input(i);
|
|
} else {
|
|
if (direction == 'O') {
|
|
if (level == '1')
|
|
gpio_direction_output(i, 1);
|
|
else
|
|
gpio_direction_output(i, 0);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
val = env_get("PCIE_OFF");
|
|
if (val) {
|
|
gpio_direction_input(GPIO_PCIE1_EN);
|
|
gpio_direction_input(GPIO_PCIE2_EN);
|
|
} else {
|
|
gpio_direction_output(GPIO_PCIE1_EN, 1);
|
|
gpio_direction_output(GPIO_PCIE2_EN, 1);
|
|
}
|
|
|
|
val = env_get("SDHC_CDWP_OFF");
|
|
if (!val) {
|
|
ccsr_gur_t *gur = (void *)(CONFIG_SYS_MPC85xx_GUTS_ADDR);
|
|
|
|
setbits_be32(&gur->pmuxcr,
|
|
(MPC85xx_PMUXCR_SDHC_CD | MPC85xx_PMUXCR_SDHC_WP));
|
|
}
|
|
}
|
|
|
|
int board_early_init_f(void)
|
|
{
|
|
return 0; /* Just in case. Could be disable in config file */
|
|
}
|
|
|
|
int checkboard(void)
|
|
{
|
|
printf("Board: %s\n", CONFIG_BOARDNAME_LOCAL);
|
|
board_gpio_init();
|
|
printf("SD/MMC: 4-bit Mode\n");
|
|
|
|
return 0;
|
|
}
|
|
|
|
#ifdef CONFIG_PCI
|
|
void pci_init_board(void)
|
|
{
|
|
fsl_pcie_init_board(0);
|
|
}
|
|
#endif
|
|
|
|
int board_early_init_r(void)
|
|
{
|
|
const unsigned int flashbase = CONFIG_SYS_FLASH_BASE;
|
|
const u8 flash_esel = find_tlb_idx((void *)flashbase, 1);
|
|
|
|
/*
|
|
* Remap Boot flash region to caching-inhibited
|
|
* so that flash can be erased properly.
|
|
*/
|
|
|
|
/* Flush d-cache and invalidate i-cache of any FLASH data */
|
|
flush_dcache();
|
|
invalidate_icache();
|
|
|
|
/* invalidate existing TLB entry for flash */
|
|
disable_tlb(flash_esel);
|
|
|
|
set_tlb(1, flashbase, CONFIG_SYS_FLASH_BASE_PHYS, /* tlb, epn, rpn */
|
|
MAS3_SX | MAS3_SW | MAS3_SR, MAS2_I | MAS2_G, /* perms, wimge */
|
|
0, flash_esel, BOOKE_PAGESZ_64M, 1);/* ts, esel, tsize, iprot */
|
|
|
|
return 0;
|
|
}
|
|
|
|
int board_phy_config(struct phy_device *phydev)
|
|
{
|
|
#if defined(CONFIG_PHY_MICREL_KSZ9021)
|
|
int regval;
|
|
static int cnt;
|
|
|
|
if (cnt++ == 0)
|
|
printf("PHYs address [");
|
|
|
|
if (phydev->addr == TSEC1_PHY_ADDR || phydev->addr == TSEC3_PHY_ADDR) {
|
|
regval =
|
|
ksz9021_phy_extended_read(phydev,
|
|
MII_KSZ9021_EXT_STRAP_STATUS);
|
|
/*
|
|
* min rx data delay
|
|
*/
|
|
ksz9021_phy_extended_write(phydev,
|
|
MII_KSZ9021_EXT_RGMII_RX_DATA_SKEW,
|
|
0x6666);
|
|
/*
|
|
* max rx/tx clock delay, min rx/tx control
|
|
*/
|
|
ksz9021_phy_extended_write(phydev,
|
|
MII_KSZ9021_EXT_RGMII_CLOCK_SKEW,
|
|
0xf6f6);
|
|
printf("0x%x", (regval & 0x1f));
|
|
} else {
|
|
printf("0x%x", (TSEC2_PHY_ADDR & 0x1f));
|
|
}
|
|
if (cnt == 3)
|
|
printf("] ");
|
|
else
|
|
printf(",");
|
|
#endif
|
|
|
|
#if defined(CONFIG_PHY_MICREL_KSZ9031_DEBUG)
|
|
regval = ksz9031_phy_extended_read(phydev, 2, 0x01, 0x4000);
|
|
if (regval >= 0)
|
|
printf(" (ADDR 0x%x) ", regval & 0x1f);
|
|
#endif
|
|
|
|
return 0;
|
|
}
|
|
|
|
int last_stage_init(void)
|
|
{
|
|
static char newkernelargs[256];
|
|
static u8 id1[16];
|
|
static u8 id2;
|
|
struct mmc *mmc;
|
|
char *sval, *kval;
|
|
|
|
if (i2c_read(CONFIG_SYS_I2C_IDT6V49205B, 7, 1, &id1[0], 2) < 0) {
|
|
printf("Error reading i2c IDT6V49205B information!\n");
|
|
} else {
|
|
printf("IDT6V49205B(0x%02x): ready\n", id1[1]);
|
|
i2c_read(CONFIG_SYS_I2C_IDT6V49205B, 4, 1, &id1[0], 2);
|
|
if (!(id1[1] & 0x02)) {
|
|
id1[1] |= 0x02;
|
|
i2c_write(CONFIG_SYS_I2C_IDT6V49205B, 4, 1, &id1[0], 2);
|
|
asm("nop; nop");
|
|
}
|
|
}
|
|
|
|
if (i2c_read(CONFIG_SYS_I2C_NCT72_ADDR, 0xFE, 1, &id2, 1) < 0)
|
|
printf("Error reading i2c NCT72 information!\n");
|
|
else
|
|
printf("NCT72(0x%x): ready\n", id2);
|
|
|
|
kval = env_get("kernelargs");
|
|
|
|
mmc = find_mmc_device(0);
|
|
if (mmc)
|
|
if (!mmc_init(mmc)) {
|
|
printf("MMC/SD card detected\n");
|
|
if (kval) {
|
|
int n = strlen(defkargs);
|
|
char *tmp = strstr(kval, defkargs);
|
|
|
|
*tmp = 0;
|
|
strcpy(newkernelargs, kval);
|
|
strcat(newkernelargs, " ");
|
|
strcat(newkernelargs, mmckargs);
|
|
strcat(newkernelargs, " ");
|
|
strcat(newkernelargs, &tmp[n]);
|
|
env_set("kernelargs", newkernelargs);
|
|
} else {
|
|
env_set("kernelargs", mmckargs);
|
|
}
|
|
}
|
|
get_arc_info();
|
|
|
|
if (kval) {
|
|
sval = env_get("SERIAL");
|
|
if (sval) {
|
|
strcpy(newkernelargs, "SN=");
|
|
strcat(newkernelargs, sval);
|
|
strcat(newkernelargs, " ");
|
|
strcat(newkernelargs, kval);
|
|
env_set("kernelargs", newkernelargs);
|
|
}
|
|
} else {
|
|
printf("Error reading kernelargs env variable!\n");
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
int board_eth_init(bd_t *bis)
|
|
{
|
|
struct fsl_pq_mdio_info mdio_info;
|
|
struct tsec_info_struct tsec_info[4];
|
|
#ifdef CONFIG_TSEC2
|
|
ccsr_gur_t *gur = (void *)(CONFIG_SYS_MPC85xx_GUTS_ADDR);
|
|
#endif
|
|
int num = 0;
|
|
|
|
#ifdef CONFIG_TSEC1
|
|
SET_STD_TSEC_INFO(tsec_info[num], 1);
|
|
num++;
|
|
#endif
|
|
#ifdef CONFIG_TSEC2
|
|
SET_STD_TSEC_INFO(tsec_info[num], 2);
|
|
if (is_serdes_configured(SGMII_TSEC2)) {
|
|
if (!(in_be32(&gur->pordevsr) & MPC85xx_PORDEVSR_SGMII2_DIS)) {
|
|
puts("eTSEC2 is in sgmii mode.\n");
|
|
tsec_info[num].flags |= TSEC_SGMII;
|
|
tsec_info[num].phyaddr = TSEC2_PHY_ADDR_SGMII;
|
|
}
|
|
}
|
|
num++;
|
|
#endif
|
|
#ifdef CONFIG_TSEC3
|
|
SET_STD_TSEC_INFO(tsec_info[num], 3);
|
|
num++;
|
|
#endif
|
|
|
|
if (!num) {
|
|
printf("No TSECs initialized\n");
|
|
return 0;
|
|
}
|
|
|
|
mdio_info.regs = (struct tsec_mii_mng *)CONFIG_SYS_MDIO_BASE_ADDR;
|
|
mdio_info.name = DEFAULT_MII_NAME;
|
|
|
|
fsl_pq_mdio_init(bis, &mdio_info);
|
|
|
|
tsec_eth_init(bis, tsec_info, num);
|
|
|
|
return pci_eth_init(bis);
|
|
}
|
|
|
|
#ifdef CONFIG_OF_BOARD_SETUP
|
|
int ft_board_setup(void *blob, bd_t *bd)
|
|
{
|
|
phys_addr_t base;
|
|
phys_size_t size;
|
|
const char *soc_usb_compat = "fsl-usb2-dr";
|
|
int err, usb1_off, usb2_off;
|
|
|
|
ft_cpu_setup(blob, bd);
|
|
|
|
base = env_get_bootm_low();
|
|
size = env_get_bootm_size();
|
|
|
|
fdt_fixup_memory(blob, (u64)base, (u64)size);
|
|
|
|
FT_FSL_PCI_SETUP;
|
|
|
|
#if defined(CONFIG_HAS_FSL_DR_USB)
|
|
fsl_fdt_fixup_dr_usb(blob, bd);
|
|
#endif
|
|
|
|
#if defined(CONFIG_SDCARD) || defined(CONFIG_SPIFLASH)
|
|
/* Delete eLBC node as it is muxed with USB2 controller */
|
|
if (hwconfig("usb2")) {
|
|
const char *soc_elbc_compat = "fsl,p1020-elbc";
|
|
int off = fdt_node_offset_by_compatible(blob, -1,
|
|
soc_elbc_compat);
|
|
if (off < 0) {
|
|
printf
|
|
("WARNING: could not find compatible node %s: %s\n",
|
|
soc_elbc_compat, fdt_strerror(off));
|
|
return off;
|
|
}
|
|
err = fdt_del_node(blob, off);
|
|
if (err < 0) {
|
|
printf("WARNING: could not remove %s: %s\n",
|
|
soc_elbc_compat, fdt_strerror(err));
|
|
}
|
|
return err;
|
|
}
|
|
#endif
|
|
|
|
/* Delete USB2 node as it is muxed with eLBC */
|
|
usb1_off = fdt_node_offset_by_compatible(blob, -1, soc_usb_compat);
|
|
if (usb1_off < 0) {
|
|
printf("WARNING: could not find compatible node %s: %s.\n",
|
|
soc_usb_compat, fdt_strerror(usb1_off));
|
|
return usb1_off;
|
|
}
|
|
usb2_off =
|
|
fdt_node_offset_by_compatible(blob, usb1_off, soc_usb_compat);
|
|
if (usb2_off < 0) {
|
|
printf("WARNING: could not find compatible node %s: %s.\n",
|
|
soc_usb_compat, fdt_strerror(usb2_off));
|
|
return usb2_off;
|
|
}
|
|
err = fdt_del_node(blob, usb2_off);
|
|
if (err < 0) {
|
|
printf("WARNING: could not remove %s: %s.\n",
|
|
soc_usb_compat, fdt_strerror(err));
|
|
}
|
|
return 0;
|
|
}
|
|
#endif
|