404 lines
		
	
	
		
			8.8 KiB
		
	
	
	
		
			C
		
	
	
	
			
		
		
	
	
			404 lines
		
	
	
		
			8.8 KiB
		
	
	
	
		
			C
		
	
	
	
| /*
 | |
|  * (C) Copyright 2010
 | |
|  * Dirk Eibach,  Guntermann & Drunck GmbH, eibach@gdsys.de
 | |
|  *
 | |
|  * based on kilauea.c
 | |
|  * by Stefan Roese, DENX Software Engineering, sr@denx.de.
 | |
|  *
 | |
|  * SPDX-License-Identifier:	GPL-2.0+
 | |
|  */
 | |
| 
 | |
| #include <common.h>
 | |
| #include <asm/ppc4xx.h>
 | |
| #include <asm/ppc405.h>
 | |
| #include <libfdt.h>
 | |
| #include <fdt_support.h>
 | |
| #include <asm/processor.h>
 | |
| #include <asm/io.h>
 | |
| #include <asm/errno.h>
 | |
| #include <asm/ppc4xx-gpio.h>
 | |
| #include <flash.h>
 | |
| 
 | |
| #include <pca9698.h>
 | |
| 
 | |
| #include "405ex.h"
 | |
| #include <gdsys_fpga.h>
 | |
| 
 | |
| #include <miiphy.h>
 | |
| #include <i2c.h>
 | |
| #include <dtt.h>
 | |
| 
 | |
| DECLARE_GLOBAL_DATA_PTR;
 | |
| 
 | |
| #define PHYREG_CONTROL				0
 | |
| #define PHYREG_PAGE_ADDRESS			22
 | |
| #define PHYREG_PG0_COPPER_SPECIFIC_CONTROL_1	16
 | |
| #define PHYREG_PG2_COPPER_SPECIFIC_CONTROL_2	26
 | |
| #define PHYREG_PG2_MAC_SPECIFIC_STATUS_1	17
 | |
| #define PHYREG_PG2_MAC_SPECIFIC_CONTROL		21
 | |
| 
 | |
| #define LATCH0_BASE (CONFIG_SYS_LATCH_BASE)
 | |
| #define LATCH1_BASE (CONFIG_SYS_LATCH_BASE + 0x100)
 | |
| #define LATCH2_BASE (CONFIG_SYS_LATCH_BASE + 0x200)
 | |
| #define LATCH3_BASE (CONFIG_SYS_LATCH_BASE + 0x300)
 | |
| 
 | |
| enum {
 | |
| 	UNITTYPE_CCD_SWITCH = 1,
 | |
| };
 | |
| 
 | |
| enum {
 | |
| 	HWVER_100 = 0,
 | |
| 	HWVER_110 = 1,
 | |
| };
 | |
| 
 | |
| struct ihs_fpga *fpga_ptr[] = CONFIG_SYS_FPGA_PTR;
 | |
| 
 | |
| static inline void blank_string(int size)
 | |
| {
 | |
| 	int i;
 | |
| 
 | |
| 	for (i = 0; i < size; i++)
 | |
| 		putc('\b');
 | |
| 	for (i = 0; i < size; i++)
 | |
| 		putc(' ');
 | |
| 	for (i = 0; i < size; i++)
 | |
| 		putc('\b');
 | |
| }
 | |
| 
 | |
| /*
 | |
|  * Board early initialization function
 | |
|  */
 | |
| int misc_init_r(void)
 | |
| {
 | |
| 	/* startup fans */
 | |
| 	dtt_init();
 | |
| 
 | |
| #ifdef CONFIG_ENV_IS_IN_FLASH
 | |
| 	/* Monitor protection ON by default */
 | |
| 	flash_protect(FLAG_PROTECT_SET,
 | |
| 		      -CONFIG_SYS_MONITOR_LEN,
 | |
| 		      0xffffffff,
 | |
| 		      &flash_info[0]);
 | |
| #endif
 | |
| 
 | |
| 	return 0;
 | |
| }
 | |
| 
 | |
| static void print_fpga_info(unsigned dev)
 | |
| {
 | |
| 	u16 versions;
 | |
| 	u16 fpga_version;
 | |
| 	u16 fpga_features;
 | |
| 	int fpga_state = get_fpga_state(dev);
 | |
| 
 | |
| 	unsigned unit_type;
 | |
| 	unsigned hardware_version;
 | |
| 	unsigned feature_channels;
 | |
| 	unsigned feature_expansion;
 | |
| 
 | |
| 	FPGA_GET_REG(dev, versions, &versions);
 | |
| 	FPGA_GET_REG(dev, fpga_version, &fpga_version);
 | |
| 	FPGA_GET_REG(dev, fpga_features, &fpga_features);
 | |
| 
 | |
| 	printf("FPGA%d: ", dev);
 | |
| 	if (fpga_state & FPGA_STATE_PLATFORM)
 | |
| 		printf("(legacy) ");
 | |
| 
 | |
| 	if (fpga_state & FPGA_STATE_DONE_FAILED) {
 | |
| 		printf(" done timed out\n");
 | |
| 		return;
 | |
| 	}
 | |
| 
 | |
| 	if (fpga_state & FPGA_STATE_REFLECTION_FAILED) {
 | |
| 		printf(" refelectione test failed\n");
 | |
| 		return;
 | |
| 	}
 | |
| 
 | |
| 	unit_type = (versions & 0xf000) >> 12;
 | |
| 	hardware_version = versions & 0x000f;
 | |
| 	feature_channels = fpga_features & 0x007f;
 | |
| 	feature_expansion = fpga_features & (1<<15);
 | |
| 
 | |
| 	switch (unit_type) {
 | |
| 	case UNITTYPE_CCD_SWITCH:
 | |
| 		printf("CCD-Switch");
 | |
| 		break;
 | |
| 
 | |
| 	default:
 | |
| 		printf("UnitType %d(not supported)", unit_type);
 | |
| 		break;
 | |
| 	}
 | |
| 
 | |
| 	switch (hardware_version) {
 | |
| 	case HWVER_100:
 | |
| 		printf(" HW-Ver 1.00\n");
 | |
| 		break;
 | |
| 
 | |
| 	case HWVER_110:
 | |
| 		printf(" HW-Ver 1.10\n");
 | |
| 		break;
 | |
| 
 | |
| 	default:
 | |
| 		printf(" HW-Ver %d(not supported)\n",
 | |
| 		       hardware_version);
 | |
| 		break;
 | |
| 	}
 | |
| 
 | |
| 	printf("       FPGA V %d.%02d, features:",
 | |
| 		fpga_version / 100, fpga_version % 100);
 | |
| 
 | |
| 	printf(" %d channel(s)", feature_channels);
 | |
| 
 | |
| 	printf(", expansion %ssupported\n", feature_expansion ? "" : "un");
 | |
| }
 | |
| 
 | |
| int checkboard(void)
 | |
| {
 | |
| 	char *s = getenv("serial#");
 | |
| 
 | |
| 	printf("Board: CATCenter Io64\n");
 | |
| 
 | |
| 	if (s != NULL) {
 | |
| 		puts(", serial# ");
 | |
| 		puts(s);
 | |
| 	}
 | |
| 
 | |
| 	return 0;
 | |
| }
 | |
| 
 | |
| int configure_gbit_phy(char *bus, unsigned char addr)
 | |
| {
 | |
| 	unsigned short value;
 | |
| 
 | |
| 	/* select page 0 */
 | |
| 	if (miiphy_write(bus, addr, PHYREG_PAGE_ADDRESS, 0x0000))
 | |
| 		goto err_out;
 | |
| 	/* switch to powerdown */
 | |
| 	if (miiphy_read(bus, addr, PHYREG_PG0_COPPER_SPECIFIC_CONTROL_1,
 | |
| 		&value))
 | |
| 		goto err_out;
 | |
| 	if (miiphy_write(bus, addr, PHYREG_PG0_COPPER_SPECIFIC_CONTROL_1,
 | |
| 		value | 0x0004))
 | |
| 		goto err_out;
 | |
| 	/* select page 2 */
 | |
| 	if (miiphy_write(bus, addr, PHYREG_PAGE_ADDRESS, 0x0002))
 | |
| 		goto err_out;
 | |
| 	/* disable SGMII autonegotiation */
 | |
| 	if (miiphy_write(bus, addr, PHYREG_PG2_MAC_SPECIFIC_CONTROL, 48))
 | |
| 		goto err_out;
 | |
| 	/* select page 0 */
 | |
| 	if (miiphy_write(bus, addr, PHYREG_PAGE_ADDRESS, 0x0000))
 | |
| 		goto err_out;
 | |
| 	/* switch from powerdown to normal operation */
 | |
| 	if (miiphy_read(bus, addr, PHYREG_PG0_COPPER_SPECIFIC_CONTROL_1,
 | |
| 		&value))
 | |
| 		goto err_out;
 | |
| 	if (miiphy_write(bus, addr, PHYREG_PG0_COPPER_SPECIFIC_CONTROL_1,
 | |
| 		value & ~0x0004))
 | |
| 		goto err_out;
 | |
| 	/* reset phy so settings take effect */
 | |
| 	if (miiphy_write(bus, addr, PHYREG_CONTROL, 0x9140))
 | |
| 		goto err_out;
 | |
| 
 | |
| 	return 0;
 | |
| 
 | |
| err_out:
 | |
| 	printf("Error writing to the PHY addr=%02x\n", addr);
 | |
| 	return -1;
 | |
| }
 | |
| 
 | |
| int verify_gbit_phy(char *bus, unsigned char addr)
 | |
| {
 | |
| 	unsigned short value;
 | |
| 
 | |
| 	/* select page 2 */
 | |
| 	if (miiphy_write(bus, addr, PHYREG_PAGE_ADDRESS, 0x0002))
 | |
| 		goto err_out;
 | |
| 	/* verify SGMII link status */
 | |
| 	if (miiphy_read(bus, addr, PHYREG_PG2_MAC_SPECIFIC_STATUS_1, &value))
 | |
| 		goto err_out;
 | |
| 	if (!(value & (1 << 10)))
 | |
| 		return -2;
 | |
| 
 | |
| 	return 0;
 | |
| 
 | |
| err_out:
 | |
| 	printf("Error writing to the PHY addr=%02x\n", addr);
 | |
| 	return -1;
 | |
| }
 | |
| 
 | |
| int last_stage_init(void)
 | |
| {
 | |
| 	unsigned int k;
 | |
| 	unsigned int fpga;
 | |
| 	int failed = 0;
 | |
| 	char str_phys[] = "Setup PHYs -";
 | |
| 	char str_serdes[] = "Start SERDES blocks";
 | |
| 	char str_channels[] = "Start FPGA channels";
 | |
| 	char str_locks[] = "Verify SERDES locks";
 | |
| 	char str_hicb[] = "Verify HICB status";
 | |
| 	char str_status[] = "Verify PHY status -";
 | |
| 	char slash[] = "\\|/-\\|/-";
 | |
| 
 | |
| 	print_fpga_info(0);
 | |
| 	print_fpga_info(1);
 | |
| 
 | |
| 	/* setup Gbit PHYs */
 | |
| 	puts("TRANS: ");
 | |
| 	puts(str_phys);
 | |
| 	int retval;
 | |
| 	struct mii_dev *mdiodev = mdio_alloc();
 | |
| 	if (!mdiodev)
 | |
| 		return -ENOMEM;
 | |
| 	strncpy(mdiodev->name, CONFIG_SYS_GBIT_MII_BUSNAME, MDIO_NAME_LEN);
 | |
| 	mdiodev->read = bb_miiphy_read;
 | |
| 	mdiodev->write = bb_miiphy_write;
 | |
| 
 | |
| 	retval = mdio_register(mdiodev);
 | |
| 	if (retval < 0)
 | |
| 		return retval;
 | |
| 
 | |
| 	for (k = 0; k < 32; ++k) {
 | |
| 		configure_gbit_phy(CONFIG_SYS_GBIT_MII_BUSNAME, k);
 | |
| 		putc('\b');
 | |
| 		putc(slash[k % 8]);
 | |
| 	}
 | |
| 
 | |
| 	mdiodev = mdio_alloc();
 | |
| 	if (!mdiodev)
 | |
| 		return -ENOMEM;
 | |
| 	strncpy(mdiodev->name, CONFIG_SYS_GBIT_MII1_BUSNAME, MDIO_NAME_LEN);
 | |
| 	mdiodev->read = bb_miiphy_read;
 | |
| 	mdiodev->write = bb_miiphy_write;
 | |
| 
 | |
| 	retval = mdio_register(mdiodev);
 | |
| 	if (retval < 0)
 | |
| 		return retval;
 | |
| 
 | |
| 	for (k = 0; k < 32; ++k) {
 | |
| 		configure_gbit_phy(CONFIG_SYS_GBIT_MII1_BUSNAME, k);
 | |
| 		putc('\b');
 | |
| 		putc(slash[k % 8]);
 | |
| 	}
 | |
| 	blank_string(strlen(str_phys));
 | |
| 
 | |
| 	/* take fpga serdes blocks out of reset */
 | |
| 	puts(str_serdes);
 | |
| 	udelay(500000);
 | |
| 	FPGA_SET_REG(0, quad_serdes_reset, 0);
 | |
| 	FPGA_SET_REG(1, quad_serdes_reset, 0);
 | |
| 	blank_string(strlen(str_serdes));
 | |
| 
 | |
| 	/* take channels out of reset */
 | |
| 	puts(str_channels);
 | |
| 	udelay(500000);
 | |
| 	for (fpga = 0; fpga < 2; ++fpga) {
 | |
| 		for (k = 0; k < 32; ++k)
 | |
| 			FPGA_SET_REG(fpga, ch[k].config_int, 0);
 | |
| 	}
 | |
| 	blank_string(strlen(str_channels));
 | |
| 
 | |
| 	/* verify channels serdes lock */
 | |
| 	puts(str_locks);
 | |
| 	udelay(500000);
 | |
| 	for (fpga = 0; fpga < 2; ++fpga) {
 | |
| 		for (k = 0; k < 32; ++k) {
 | |
| 			u16 status;
 | |
| 			FPGA_GET_REG(fpga, ch[k].status_int, &status);
 | |
| 			if (!(status & (1 << 4))) {
 | |
| 				failed = 1;
 | |
| 				printf("fpga %d channel %d: no serdes lock\n",
 | |
| 					fpga, k);
 | |
| 			}
 | |
| 			/* reset events */
 | |
| 			FPGA_SET_REG(fpga, ch[k].status_int, 0);
 | |
| 		}
 | |
| 	}
 | |
| 	blank_string(strlen(str_locks));
 | |
| 
 | |
| 	/* verify hicb_status */
 | |
| 	puts(str_hicb);
 | |
| 	for (fpga = 0; fpga < 2; ++fpga) {
 | |
| 		for (k = 0; k < 32; ++k) {
 | |
| 			u16 status;
 | |
| 			FPGA_GET_REG(fpga, hicb_ch[k].status_int, &status);
 | |
| 			if (status)
 | |
| 				printf("fpga %d hicb %d: hicb status %04x\n",
 | |
| 					fpga, k, status);
 | |
| 			/* reset events */
 | |
| 			FPGA_SET_REG(fpga, hicb_ch[k].status_int, 0);
 | |
| 		}
 | |
| 	}
 | |
| 	blank_string(strlen(str_hicb));
 | |
| 
 | |
| 	/* verify phy status */
 | |
| 	puts(str_status);
 | |
| 	for (k = 0; k < 32; ++k) {
 | |
| 		if (verify_gbit_phy(CONFIG_SYS_GBIT_MII_BUSNAME, k)) {
 | |
| 			printf("verify baseboard phy %d failed\n", k);
 | |
| 			failed = 1;
 | |
| 		}
 | |
| 		putc('\b');
 | |
| 		putc(slash[k % 8]);
 | |
| 	}
 | |
| 	for (k = 0; k < 32; ++k) {
 | |
| 		if (verify_gbit_phy(CONFIG_SYS_GBIT_MII1_BUSNAME, k)) {
 | |
| 			printf("verify extensionboard phy %d failed\n", k);
 | |
| 			failed = 1;
 | |
| 		}
 | |
| 		putc('\b');
 | |
| 		putc(slash[k % 8]);
 | |
| 	}
 | |
| 	blank_string(strlen(str_status));
 | |
| 
 | |
| 	printf("Starting 64 channels %s\n", failed ? "failed" : "ok");
 | |
| 
 | |
| 	return 0;
 | |
| }
 | |
| 
 | |
| void gd405ex_init(void)
 | |
| {
 | |
| 	unsigned int k;
 | |
| 
 | |
| 	if (i2c_probe(0x22)) { /* i2c_probe returns 0 on success */
 | |
| 		for (k = 0; k < CONFIG_SYS_FPGA_COUNT; ++k)
 | |
| 			gd->arch.fpga_state[k] |= FPGA_STATE_PLATFORM;
 | |
| 	} else {
 | |
| 		pca9698_direction_output(0x22, 39, 1);
 | |
| 	}
 | |
| }
 | |
| 
 | |
| void gd405ex_set_fpga_reset(unsigned state)
 | |
| {
 | |
| 	int legacy = get_fpga_state(0) & FPGA_STATE_PLATFORM;
 | |
| 
 | |
| 	if (legacy) {
 | |
| 		if (state) {
 | |
| 			out_le16((void *)LATCH0_BASE, CONFIG_SYS_LATCH0_RESET);
 | |
| 			out_le16((void *)LATCH1_BASE, CONFIG_SYS_LATCH1_RESET);
 | |
| 		} else {
 | |
| 			out_le16((void *)LATCH0_BASE, CONFIG_SYS_LATCH0_BOOT);
 | |
| 			out_le16((void *)LATCH1_BASE, CONFIG_SYS_LATCH1_BOOT);
 | |
| 		}
 | |
| 	} else {
 | |
| 		pca9698_set_value(0x22, 39, state ? 0 : 1);
 | |
| 	}
 | |
| }
 | |
| 
 | |
| void gd405ex_setup_hw(void)
 | |
| {
 | |
| 	gpio_write_bit(CONFIG_SYS_GPIO_STARTUP_FINISHED_N, 0);
 | |
| 	gpio_write_bit(CONFIG_SYS_GPIO_STARTUP_FINISHED, 1);
 | |
| }
 | |
| 
 | |
| int gd405ex_get_fpga_done(unsigned fpga)
 | |
| {
 | |
| 	int legacy = get_fpga_state(0) & FPGA_STATE_PLATFORM;
 | |
| 
 | |
| 	if (legacy)
 | |
| 		return in_le16((void *)LATCH3_BASE)
 | |
| 			& CONFIG_SYS_FPGA_DONE(fpga);
 | |
| 	else
 | |
| 		return pca9698_get_value(0x22, fpga ? 9 : 8);
 | |
| }
 |