/* * (C) Copyright 2000-2007 * Wolfgang Denk, DENX Software Engineering, wd@denx.de. * * See file CREDITS for list of people who contributed to this * project. * * This program is free software; you can redistribute it and/or * modify it under the terms of the GNU General Public License as * published by the Free Software Foundation; either version 2 of * the License, or (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, * MA 02111-1307 USA */ /* * CPU specific code * * written or collected and sometimes rewritten by * Magnus Damm <damm@bitsmart.com> * * minor modifications by * Wolfgang Denk <wd@denx.de> */ #include <common.h> #include <watchdog.h> #include <command.h> #include <asm/cache.h> #include <ppc4xx.h> #include <netdev.h> DECLARE_GLOBAL_DATA_PTR; void board_reset(void); /* * To provide an interface to detect CPU number for boards that support * more then one CPU, we implement the "weak" default functions here. * * Returns CPU number */ int __get_cpu_num(void) { return NA_OR_UNKNOWN_CPU; } int get_cpu_num(void) __attribute__((weak, alias("__get_cpu_num"))); #if defined(CONFIG_PCI) #if defined(CONFIG_405GP) || \ defined(CONFIG_440EP) || defined(CONFIG_440GR) || \ defined(CONFIG_440EPX) || defined(CONFIG_440GRX) #define PCI_ASYNC static int pci_async_enabled(void) { #if defined(CONFIG_405GP) return (mfdcr(CPC0_PSR) & PSR_PCI_ASYNC_EN); #endif #if defined(CONFIG_440EP) || defined(CONFIG_440GR) || \ defined(CONFIG_440EPX) || defined(CONFIG_440GRX) || \ defined(CONFIG_460EX) || defined(CONFIG_460GT) unsigned long val; mfsdr(SDR0_SDSTP1, val); return (val & SDR0_SDSTP1_PAME_MASK); #endif } #endif #endif /* CONFIG_PCI */ #if defined(CONFIG_PCI) && !defined(CONFIG_IOP480) && \ !defined(CONFIG_405) && !defined(CONFIG_405EX) int pci_arbiter_enabled(void) { #if defined(CONFIG_405GP) return (mfdcr(CPC0_PSR) & PSR_PCI_ARBIT_EN); #endif #if defined(CONFIG_405EP) return (mfdcr(CPC0_PCI) & CPC0_PCI_ARBIT_EN); #endif #if defined(CONFIG_440GP) return (mfdcr(CPC0_STRP1) & CPC0_STRP1_PAE_MASK); #endif #if defined(CONFIG_440GX) || defined(CONFIG_440SP) || defined(CONFIG_440SPE) unsigned long val; mfsdr(SDR0_XCR, val); return (val & 0x80000000); #endif #if defined(CONFIG_440EP) || defined(CONFIG_440GR) || \ defined(CONFIG_440EPX) || defined(CONFIG_440GRX) || \ defined(CONFIG_460EX) || defined(CONFIG_460GT) unsigned long val; mfsdr(SDR0_PCI0, val); return (val & 0x80000000); #endif } #endif #if defined(CONFIG_405EP) #define I2C_BOOTROM static int i2c_bootrom_enabled(void) { #if defined(CONFIG_405EP) return (mfdcr(CPC0_BOOT) & CPC0_BOOT_SEP); #else unsigned long val; mfsdr(SDR0_SDCS0, val); return (val & SDR0_SDCS_SDD); #endif } #endif #if defined(CONFIG_440GX) #define SDR0_PINSTP_SHIFT 29 static char *bootstrap_str[] = { "EBC (16 bits)", "EBC (8 bits)", "EBC (32 bits)", "EBC (8 bits)", "PCI", "I2C (Addr 0x54)", "Reserved", "I2C (Addr 0x50)", }; static char bootstrap_char[] = { 'A', 'B', 'C', 'B', 'D', 'E', 'x', 'F' }; #endif #if defined(CONFIG_440SP) || defined(CONFIG_440SPE) #define SDR0_PINSTP_SHIFT 30 static char *bootstrap_str[] = { "EBC (8 bits)", "PCI", "I2C (Addr 0x54)", "I2C (Addr 0x50)", }; static char bootstrap_char[] = { 'A', 'B', 'C', 'D'}; #endif #if defined(CONFIG_440EP) || defined(CONFIG_440GR) #define SDR0_PINSTP_SHIFT 29 static char *bootstrap_str[] = { "EBC (8 bits)", "PCI", "NAND (8 bits)", "EBC (16 bits)", "EBC (16 bits)", "I2C (Addr 0x54)", "PCI", "I2C (Addr 0x52)", }; static char bootstrap_char[] = { 'A', 'B', 'C', 'D', 'E', 'G', 'F', 'H' }; #endif #if defined(CONFIG_440EPX) || defined(CONFIG_440GRX) #define SDR0_PINSTP_SHIFT 29 static char *bootstrap_str[] = { "EBC (8 bits)", "EBC (16 bits)", "EBC (16 bits)", "NAND (8 bits)", "PCI", "I2C (Addr 0x54)", "PCI", "I2C (Addr 0x52)", }; static char bootstrap_char[] = { 'A', 'B', 'C', 'D', 'E', 'G', 'F', 'H' }; #endif #if defined(CONFIG_460EX) || defined(CONFIG_460GT) #define SDR0_PINSTP_SHIFT 29 static char *bootstrap_str[] = { "EBC (8 bits)", "EBC (16 bits)", "PCI", "PCI", "EBC (16 bits)", "NAND (8 bits)", "I2C (Addr 0x54)", /* A8 */ "I2C (Addr 0x52)", /* A4 */ }; static char bootstrap_char[] = { 'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H' }; #endif #if defined(CONFIG_460SX) #define SDR0_PINSTP_SHIFT 29 static char *bootstrap_str[] = { "EBC (8 bits)", "EBC (16 bits)", "EBC (32 bits)", "NAND (8 bits)", "I2C (Addr 0x54)", /* A8 */ "I2C (Addr 0x52)", /* A4 */ }; static char bootstrap_char[] = { 'A', 'B', 'C', 'D', 'E', 'G' }; #endif #if defined(CONFIG_405EZ) #define SDR0_PINSTP_SHIFT 28 static char *bootstrap_str[] = { "EBC (8 bits)", "SPI (fast)", "NAND (512 page, 4 addr cycle)", "I2C (Addr 0x50)", "EBC (32 bits)", "I2C (Addr 0x50)", "NAND (2K page, 5 addr cycle)", "I2C (Addr 0x50)", "EBC (16 bits)", "Reserved", "NAND (2K page, 4 addr cycle)", "I2C (Addr 0x50)", "NAND (512 page, 3 addr cycle)", "I2C (Addr 0x50)", "SPI (slow)", "I2C (Addr 0x50)", }; static char bootstrap_char[] = { 'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', \ 'I', 'x', 'K', 'L', 'M', 'N', 'O', 'P' }; #endif #if defined(CONFIG_405EX) #define SDR0_PINSTP_SHIFT 29 static char *bootstrap_str[] = { "EBC (8 bits)", "EBC (16 bits)", "EBC (16 bits)", "NAND (8 bits)", "NAND (8 bits)", "I2C (Addr 0x54)", "EBC (8 bits)", "I2C (Addr 0x52)", }; static char bootstrap_char[] = { 'A', 'B', 'C', 'D', 'E', 'G', 'F', 'H' }; #endif #if defined(SDR0_PINSTP_SHIFT) static int bootstrap_option(void) { unsigned long val; mfsdr(SDR0_PINSTP, val); return ((val & 0xf0000000) >> SDR0_PINSTP_SHIFT); } #endif /* SDR0_PINSTP_SHIFT */ #if defined(CONFIG_440) static int do_chip_reset (unsigned long sys0, unsigned long sys1) { /* Changes to CPC0_SYS0 and CPC0_SYS1 require chip * reset. */ mtdcr (CPC0_CR0, mfdcr (CPC0_CR0) | 0x80000000); /* Set SWE */ mtdcr (CPC0_SYS0, sys0); mtdcr (CPC0_SYS1, sys1); mtdcr (CPC0_CR0, mfdcr (CPC0_CR0) & ~0x80000000); /* Clr SWE */ mtspr (SPRN_DBCR0, 0x20000000); /* Reset the chip */ return 1; } #endif int checkcpu (void) { #if !defined(CONFIG_405) /* not used on Xilinx 405 FPGA implementations */ uint pvr = get_pvr(); ulong clock = gd->cpu_clk; char buf[32]; #if defined(CONFIG_460EX) || defined(CONFIG_460GT) u32 reg; #endif #if !defined(CONFIG_IOP480) char addstr[64] = ""; sys_info_t sys_info; int cpu_num; cpu_num = get_cpu_num(); if (cpu_num >= 0) printf("CPU%d: ", cpu_num); else puts("CPU: "); get_sys_info(&sys_info); #if defined(CONFIG_XILINX_440) puts("IBM PowerPC 4"); #else puts("AMCC PowerPC 4"); #endif #if defined(CONFIG_405GP) || defined(CONFIG_405CR) || \ defined(CONFIG_405EP) || defined(CONFIG_405EZ) || \ defined(CONFIG_405EX) puts("05"); #endif #if defined(CONFIG_440) #if defined(CONFIG_460EX) || defined(CONFIG_460GT) puts("60"); #else puts("40"); #endif #endif switch (pvr) { case PVR_405GP_RB: puts("GP Rev. B"); break; case PVR_405GP_RC: puts("GP Rev. C"); break; case PVR_405GP_RD: puts("GP Rev. D"); break; #ifdef CONFIG_405GP case PVR_405GP_RE: /* 405GP rev E and 405CR rev C have same PVR */ puts("GP Rev. E"); break; #endif case PVR_405CR_RA: puts("CR Rev. A"); break; case PVR_405CR_RB: puts("CR Rev. B"); break; #ifdef CONFIG_405CR case PVR_405CR_RC: /* 405GP rev E and 405CR rev C have same PVR */ puts("CR Rev. C"); break; #endif case PVR_405GPR_RB: puts("GPr Rev. B"); break; case PVR_405EP_RB: puts("EP Rev. B"); break; case PVR_405EZ_RA: puts("EZ Rev. A"); break; case PVR_405EX1_RA: puts("EX Rev. A"); strcpy(addstr, "Security support"); break; case PVR_405EXR2_RA: puts("EXr Rev. A"); strcpy(addstr, "No Security support"); break; case PVR_405EX1_RC: puts("EX Rev. C"); strcpy(addstr, "Security support"); break; case PVR_405EX2_RC: puts("EX Rev. C"); strcpy(addstr, "No Security support"); break; case PVR_405EXR1_RC: puts("EXr Rev. C"); strcpy(addstr, "Security support"); break; case PVR_405EXR2_RC: puts("EXr Rev. C"); strcpy(addstr, "No Security support"); break; case PVR_405EX1_RD: puts("EX Rev. D"); strcpy(addstr, "Security support"); break; case PVR_405EX2_RD: puts("EX Rev. D"); strcpy(addstr, "No Security support"); break; case PVR_405EXR1_RD: puts("EXr Rev. D"); strcpy(addstr, "Security support"); break; case PVR_405EXR2_RD: puts("EXr Rev. D"); strcpy(addstr, "No Security support"); break; #if defined(CONFIG_440) case PVR_440GP_RB: puts("GP Rev. B"); /* See errata 1.12: CHIP_4 */ if ((mfdcr(CPC0_SYS0) != mfdcr(CPC0_STRP0)) || (mfdcr(CPC0_SYS1) != mfdcr(CPC0_STRP1)) ){ puts ( "\n\t CPC0_SYSx DCRs corrupted. " "Resetting chip ...\n"); udelay( 1000 * 1000 ); /* Give time for serial buf to clear */ do_chip_reset ( mfdcr(CPC0_STRP0), mfdcr(CPC0_STRP1) ); } break; case PVR_440GP_RC: puts("GP Rev. C"); break; case PVR_440GX_RA: puts("GX Rev. A"); break; case PVR_440GX_RB: puts("GX Rev. B"); break; case PVR_440GX_RC: puts("GX Rev. C"); break; case PVR_440GX_RF: puts("GX Rev. F"); break; case PVR_440EP_RA: puts("EP Rev. A"); break; #ifdef CONFIG_440EP case PVR_440EP_RB: /* 440EP rev B and 440GR rev A have same PVR */ puts("EP Rev. B"); break; case PVR_440EP_RC: /* 440EP rev C and 440GR rev B have same PVR */ puts("EP Rev. C"); break; #endif /* CONFIG_440EP */ #ifdef CONFIG_440GR case PVR_440GR_RA: /* 440EP rev B and 440GR rev A have same PVR */ puts("GR Rev. A"); break; case PVR_440GR_RB: /* 440EP rev C and 440GR rev B have same PVR */ puts("GR Rev. B"); break; #endif /* CONFIG_440GR */ #endif /* CONFIG_440 */ #ifdef CONFIG_440EPX case PVR_440EPX1_RA: /* 440EPx rev A and 440GRx rev A have same PVR */ puts("EPx Rev. A"); strcpy(addstr, "Security/Kasumi support"); break; case PVR_440EPX2_RA: /* 440EPx rev A and 440GRx rev A have same PVR */ puts("EPx Rev. A"); strcpy(addstr, "No Security/Kasumi support"); break; #endif /* CONFIG_440EPX */ #ifdef CONFIG_440GRX case PVR_440GRX1_RA: /* 440EPx rev A and 440GRx rev A have same PVR */ puts("GRx Rev. A"); strcpy(addstr, "Security/Kasumi support"); break; case PVR_440GRX2_RA: /* 440EPx rev A and 440GRx rev A have same PVR */ puts("GRx Rev. A"); strcpy(addstr, "No Security/Kasumi support"); break; #endif /* CONFIG_440GRX */ case PVR_440SP_6_RAB: puts("SP Rev. A/B"); strcpy(addstr, "RAID 6 support"); break; case PVR_440SP_RAB: puts("SP Rev. A/B"); strcpy(addstr, "No RAID 6 support"); break; case PVR_440SP_6_RC: puts("SP Rev. C"); strcpy(addstr, "RAID 6 support"); break; case PVR_440SP_RC: puts("SP Rev. C"); strcpy(addstr, "No RAID 6 support"); break; case PVR_440SPe_6_RA: puts("SPe Rev. A"); strcpy(addstr, "RAID 6 support"); break; case PVR_440SPe_RA: puts("SPe Rev. A"); strcpy(addstr, "No RAID 6 support"); break; case PVR_440SPe_6_RB: puts("SPe Rev. B"); strcpy(addstr, "RAID 6 support"); break; case PVR_440SPe_RB: puts("SPe Rev. B"); strcpy(addstr, "No RAID 6 support"); break; #if defined(CONFIG_460EX) || defined(CONFIG_460GT) case PVR_460EX_RA: puts("EX Rev. A"); strcpy(addstr, "No Security/Kasumi support"); break; case PVR_460EX_SE_RA: puts("EX Rev. A"); strcpy(addstr, "Security/Kasumi support"); break; case PVR_460EX_RB: puts("EX Rev. B"); mfsdr(SDR0_ECID3, reg); if (reg & 0x00100000) strcpy(addstr, "No Security/Kasumi support"); else strcpy(addstr, "Security/Kasumi support"); break; case PVR_460GT_RA: puts("GT Rev. A"); strcpy(addstr, "No Security/Kasumi support"); break; case PVR_460GT_SE_RA: puts("GT Rev. A"); strcpy(addstr, "Security/Kasumi support"); break; case PVR_460GT_RB: puts("GT Rev. B"); mfsdr(SDR0_ECID3, reg); if (reg & 0x00100000) strcpy(addstr, "No Security/Kasumi support"); else strcpy(addstr, "Security/Kasumi support"); break; #endif case PVR_460SX_RA: puts("SX Rev. A"); strcpy(addstr, "Security support"); break; case PVR_460SX_RA_V1: puts("SX Rev. A"); strcpy(addstr, "No Security support"); break; case PVR_460GX_RA: puts("GX Rev. A"); strcpy(addstr, "Security support"); break; case PVR_460GX_RA_V1: puts("GX Rev. A"); strcpy(addstr, "No Security support"); break; case PVR_VIRTEX5: puts("x5 VIRTEX5"); break; default: printf (" UNKNOWN (PVR=%08x)", pvr); break; } printf (" at %s MHz (PLB=%lu OPB=%lu EBC=%lu", strmhz(buf, clock), sys_info.freqPLB / 1000000, get_OPB_freq() / 1000000, sys_info.freqEBC / 1000000); #if defined(CONFIG_PCI) && \ (defined(CONFIG_440EP) || defined(CONFIG_440EPX) || \ defined(CONFIG_440GR) || defined(CONFIG_440GRX)) printf(" PCI=%lu MHz", sys_info.freqPCI / 1000000); #endif printf(")\n"); if (addstr[0] != 0) printf(" %s\n", addstr); #if defined(I2C_BOOTROM) printf (" I2C boot EEPROM %sabled\n", i2c_bootrom_enabled() ? "en" : "dis"); #endif /* I2C_BOOTROM */ #if defined(SDR0_PINSTP_SHIFT) printf (" Bootstrap Option %c - ", bootstrap_char[bootstrap_option()]); printf ("Boot ROM Location %s", bootstrap_str[bootstrap_option()]); #ifdef CONFIG_NAND_U_BOOT puts(", booting from NAND"); #endif /* CONFIG_NAND_U_BOOT */ putc('\n'); #endif /* SDR0_PINSTP_SHIFT */ #if defined(CONFIG_PCI) && !defined(CONFIG_405EX) printf (" Internal PCI arbiter %sabled", pci_arbiter_enabled() ? "en" : "dis"); #endif #if defined(CONFIG_PCI) && defined(PCI_ASYNC) if (pci_async_enabled()) { printf (", PCI async ext clock used"); } else { printf (", PCI sync clock at %lu MHz", sys_info.freqPLB / sys_info.pllPciDiv / 1000000); } #endif #if defined(CONFIG_PCI) && !defined(CONFIG_405EX) putc('\n'); #endif #if defined(CONFIG_405EP) || defined(CONFIG_405EZ) || defined(CONFIG_405EX) printf (" 16 kB I-Cache 16 kB D-Cache"); #elif defined(CONFIG_440) printf (" 32 kB I-Cache 32 kB D-Cache"); #else printf (" 16 kB I-Cache %d kB D-Cache", ((pvr | 0x00000001) == PVR_405GPR_RB) ? 16 : 8); #endif #endif /* !defined(CONFIG_IOP480) */ #if defined(CONFIG_IOP480) printf ("PLX IOP480 (PVR=%08x)", pvr); printf (" at %s MHz:", strmhz(buf, clock)); printf (" %u kB I-Cache", 4); printf (" %u kB D-Cache", 2); #endif #endif /* !defined(CONFIG_405) */ putc ('\n'); return 0; } int ppc440spe_revB() { unsigned int pvr; pvr = get_pvr(); if ((pvr == PVR_440SPe_6_RB) || (pvr == PVR_440SPe_RB)) return 1; else return 0; } /* ------------------------------------------------------------------------- */ int do_reset (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) { #if defined(CONFIG_BOARD_RESET) board_reset(); #else #if defined(CONFIG_SYS_4xx_RESET_TYPE) mtspr(SPRN_DBCR0, CONFIG_SYS_4xx_RESET_TYPE << 28); #else /* * Initiate system reset in debug control register DBCR */ mtspr(SPRN_DBCR0, 0x30000000); #endif /* defined(CONFIG_SYS_4xx_RESET_TYPE) */ #endif /* defined(CONFIG_BOARD_RESET) */ return 1; } /* * Get timebase clock frequency */ unsigned long get_tbclk (void) { #if !defined(CONFIG_IOP480) sys_info_t sys_info; get_sys_info(&sys_info); return (sys_info.freqProcessor); #else return (66000000); #endif } #if defined(CONFIG_WATCHDOG) void watchdog_reset(void) { int re_enable = disable_interrupts(); reset_4xx_watchdog(); if (re_enable) enable_interrupts(); } void reset_4xx_watchdog(void) { /* * Clear TSR(WIS) bit */ mtspr(SPRN_TSR, 0x40000000); } #endif /* CONFIG_WATCHDOG */ /* * Initializes on-chip ethernet controllers. * to override, implement board_eth_init() */ int cpu_eth_init(bd_t *bis) { #if defined(CONFIG_PPC4xx_EMAC) ppc_4xx_eth_initialize(bis); #endif return 0; }