| /* |
| * (C) Copyright 2001 |
| * Josh Huber <huber@mclx.com>, Mission Critical Linux, Inc. |
| * |
| * 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 |
| * |
| * modifications for the DB64360 eval board based by Ingo.Assmus@keymile.com |
| */ |
| |
| /* |
| * db64360.c - main board support/init for the Galileo Eval board. |
| */ |
| |
| #include <common.h> |
| #include <74xx_7xx.h> |
| #include "../include/memory.h" |
| #include "../include/pci.h" |
| #include "../include/mv_gen_reg.h" |
| #include <net.h> |
| |
| #include "eth.h" |
| #include "mpsc.h" |
| #include "i2c.h" |
| #include "64360.h" |
| #include "mv_regs.h" |
| |
| #undef DEBUG |
| /*#define DEBUG */ |
| |
| #define MAP_PCI |
| |
| #ifdef DEBUG |
| #define DP(x) x |
| #else |
| #define DP(x) |
| #endif |
| |
| extern void flush_data_cache (void); |
| extern void invalidate_l1_instruction_cache (void); |
| |
| /* ------------------------------------------------------------------------- */ |
| |
| /* this is the current GT register space location */ |
| /* it starts at CFG_DFL_GT_REGS but moves later to CFG_GT_REGS */ |
| |
| /* Unfortunately, we cant change it while we are in flash, so we initialize it |
| * to the "final" value. This means that any debug_led calls before |
| * board_early_init_f wont work right (like in cpu_init_f). |
| * See also my_remap_gt_regs below. (NTL) |
| */ |
| |
| void board_prebootm_init (void); |
| unsigned int INTERNAL_REG_BASE_ADDR = CFG_GT_REGS; |
| int display_mem_map (void); |
| |
| /* ------------------------------------------------------------------------- */ |
| |
| /* |
| * This is a version of the GT register space remapping function that |
| * doesn't touch globals (meaning, it's ok to run from flash.) |
| * |
| * Unfortunately, this has the side effect that a writable |
| * INTERNAL_REG_BASE_ADDR is impossible. Oh well. |
| */ |
| |
| void my_remap_gt_regs (u32 cur_loc, u32 new_loc) |
| { |
| u32 temp; |
| |
| /* check and see if it's already moved */ |
| |
| /* original ppcboot 1.1.6 source |
| |
| temp = in_le32((u32 *)(new_loc + INTERNAL_SPACE_DECODE)); |
| if ((temp & 0xffff) == new_loc >> 20) |
| return; |
| |
| temp = (in_le32((u32 *)(cur_loc + INTERNAL_SPACE_DECODE)) & |
| 0xffff0000) | (new_loc >> 20); |
| |
| out_le32((u32 *)(cur_loc + INTERNAL_SPACE_DECODE), temp); |
| |
| while (GTREGREAD(INTERNAL_SPACE_DECODE) != temp); |
| original ppcboot 1.1.6 source end */ |
| |
| temp = in_le32 ((u32 *) (new_loc + INTERNAL_SPACE_DECODE)); |
| if ((temp & 0xffff) == new_loc >> 16) |
| return; |
| |
| temp = (in_le32 ((u32 *) (cur_loc + INTERNAL_SPACE_DECODE)) & |
| 0xffff0000) | (new_loc >> 16); |
| |
| out_le32 ((u32 *) (cur_loc + INTERNAL_SPACE_DECODE), temp); |
| |
| while (GTREGREAD (INTERNAL_SPACE_DECODE) != temp); |
| } |
| |
| #ifdef CONFIG_PCI |
| |
| static void gt_pci_config (void) |
| { |
| unsigned int stat; |
| unsigned int val = 0x00fff864; /* DINK32: BusNum 23:16, DevNum 15:11, FuncNum 10:8, RegNum 7:2 */ |
| |
| /* In PCIX mode devices provide their own bus and device numbers. We query the Discovery II's |
| * config registers by writing ones to the bus and device. |
| * We then update the Virtual register with the correct value for the bus and device. |
| */ |
| if ((GTREGREAD (PCI_0_MODE) & (BIT4 | BIT5)) != 0) { /*if PCI-X */ |
| GT_REG_WRITE (PCI_0_CONFIG_ADDR, BIT31 | val); |
| |
| GT_REG_READ (PCI_0_CONFIG_DATA_VIRTUAL_REG, &stat); |
| |
| GT_REG_WRITE (PCI_0_CONFIG_ADDR, BIT31 | val); |
| GT_REG_WRITE (PCI_0_CONFIG_DATA_VIRTUAL_REG, |
| (stat & 0xffff0000) | CFG_PCI_IDSEL); |
| |
| } |
| if ((GTREGREAD (PCI_1_MODE) & (BIT4 | BIT5)) != 0) { /*if PCI-X */ |
| GT_REG_WRITE (PCI_1_CONFIG_ADDR, BIT31 | val); |
| GT_REG_READ (PCI_1_CONFIG_DATA_VIRTUAL_REG, &stat); |
| |
| GT_REG_WRITE (PCI_1_CONFIG_ADDR, BIT31 | val); |
| GT_REG_WRITE (PCI_1_CONFIG_DATA_VIRTUAL_REG, |
| (stat & 0xffff0000) | CFG_PCI_IDSEL); |
| } |
| |
| /* Enable master */ |
| PCI_MASTER_ENABLE (0, SELF); |
| PCI_MASTER_ENABLE (1, SELF); |
| |
| /* Enable PCI0/1 Mem0 and IO 0 disable all others */ |
| GT_REG_READ (BASE_ADDR_ENABLE, &stat); |
| stat |= (1 << 11) | (1 << 12) | (1 << 13) | (1 << 16) | (1 << 17) | (1 |
| << |
| 18); |
| stat &= ~((1 << 9) | (1 << 10) | (1 << 14) | (1 << 15)); |
| GT_REG_WRITE (BASE_ADDR_ENABLE, stat); |
| |
| /* ronen- add write to pci remap registers for 64460. |
| in 64360 when writing to pci base go and overide remap automaticaly, |
| in 64460 it doesn't */ |
| GT_REG_WRITE (PCI_0_IO_BASE_ADDR, CFG_PCI0_IO_BASE >> 16); |
| GT_REG_WRITE (PCI_0I_O_ADDRESS_REMAP, CFG_PCI0_IO_BASE >> 16); |
| GT_REG_WRITE (PCI_0_IO_SIZE, (CFG_PCI0_IO_SIZE - 1) >> 16); |
| |
| GT_REG_WRITE (PCI_0_MEMORY0_BASE_ADDR, CFG_PCI0_MEM_BASE >> 16); |
| GT_REG_WRITE (PCI_0MEMORY0_ADDRESS_REMAP, CFG_PCI0_MEM_BASE >> 16); |
| GT_REG_WRITE (PCI_0_MEMORY0_SIZE, (CFG_PCI0_MEM_SIZE - 1) >> 16); |
| |
| GT_REG_WRITE (PCI_1_IO_BASE_ADDR, CFG_PCI1_IO_BASE >> 16); |
| GT_REG_WRITE (PCI_1I_O_ADDRESS_REMAP, CFG_PCI1_IO_BASE >> 16); |
| GT_REG_WRITE (PCI_1_IO_SIZE, (CFG_PCI1_IO_SIZE - 1) >> 16); |
| |
| GT_REG_WRITE (PCI_1_MEMORY0_BASE_ADDR, CFG_PCI1_MEM_BASE >> 16); |
| GT_REG_WRITE (PCI_1MEMORY0_ADDRESS_REMAP, CFG_PCI1_MEM_BASE >> 16); |
| GT_REG_WRITE (PCI_1_MEMORY0_SIZE, (CFG_PCI1_MEM_SIZE - 1) >> 16); |
| |
| /* PCI interface settings */ |
| /* Timeout set to retry forever */ |
| GT_REG_WRITE (PCI_0TIMEOUT_RETRY, 0x0); |
| GT_REG_WRITE (PCI_1TIMEOUT_RETRY, 0x0); |
| |
| /* ronen - enable only CS0 and Internal reg!! */ |
| GT_REG_WRITE (PCI_0BASE_ADDRESS_REGISTERS_ENABLE, 0xfffffdfe); |
| GT_REG_WRITE (PCI_1BASE_ADDRESS_REGISTERS_ENABLE, 0xfffffdfe); |
| |
| /*ronen update the pci internal registers base address.*/ |
| #ifdef MAP_PCI |
| for (stat = 0; stat <= PCI_HOST1; stat++) |
| pciWriteConfigReg (stat, |
| PCI_INTERNAL_REGISTERS_MEMORY_MAPPED_BASE_ADDRESS, |
| SELF, CFG_GT_REGS); |
| #endif |
| |
| } |
| #endif |
| |
| /* Setup CPU interface paramaters */ |
| static void gt_cpu_config (void) |
| { |
| cpu_t cpu = get_cpu_type (); |
| ulong tmp; |
| |
| /* cpu configuration register */ |
| tmp = GTREGREAD (CPU_CONFIGURATION); |
| |
| /* set the SINGLE_CPU bit see MV64360 P.399 */ |
| #ifndef CFG_GT_DUAL_CPU /* SINGLE_CPU seems to cause JTAG problems */ |
| tmp |= CPU_CONF_SINGLE_CPU; |
| #endif |
| |
| tmp &= ~CPU_CONF_AACK_DELAY_2; |
| |
| tmp |= CPU_CONF_DP_VALID; |
| tmp |= CPU_CONF_AP_VALID; |
| |
| tmp |= CPU_CONF_PIPELINE; |
| |
| GT_REG_WRITE (CPU_CONFIGURATION, tmp); /* Marvell (VXWorks) writes 0x20220FF */ |
| |
| /* CPU master control register */ |
| tmp = GTREGREAD (CPU_MASTER_CONTROL); |
| |
| tmp |= CPU_MAST_CTL_ARB_EN; |
| |
| if ((cpu == CPU_7400) || |
| (cpu == CPU_7410) || (cpu == CPU_7455) || (cpu == CPU_7450)) { |
| |
| tmp |= CPU_MAST_CTL_CLEAN_BLK; |
| tmp |= CPU_MAST_CTL_FLUSH_BLK; |
| |
| } else { |
| /* cleanblock must be cleared for CPUs |
| * that do not support this command (603e, 750) |
| * see Res#1 */ |
| tmp &= ~CPU_MAST_CTL_CLEAN_BLK; |
| tmp &= ~CPU_MAST_CTL_FLUSH_BLK; |
| } |
| GT_REG_WRITE (CPU_MASTER_CONTROL, tmp); |
| } |
| |
| /* |
| * board_early_init_f. |
| * |
| * set up gal. device mappings, etc. |
| */ |
| int board_early_init_f (void) |
| { |
| uchar sram_boot = 0; |
| |
| /* |
| * set up the GT the way the kernel wants it |
| * the call to move the GT register space will obviously |
| * fail if it has already been done, but we're going to assume |
| * that if it's not at the power-on location, it's where we put |
| * it last time. (huber) |
| */ |
| |
| my_remap_gt_regs (CFG_DFL_GT_REGS, CFG_GT_REGS); |
| |
| /* No PCI in first release of Port To_do: enable it. */ |
| #ifdef CONFIG_PCI |
| gt_pci_config (); |
| #endif |
| /* mask all external interrupt sources */ |
| GT_REG_WRITE (CPU_INTERRUPT_MASK_REGISTER_LOW, 0); |
| GT_REG_WRITE (CPU_INTERRUPT_MASK_REGISTER_HIGH, 0); |
| /* new in MV6436x */ |
| GT_REG_WRITE (CPU_INTERRUPT_1_MASK_REGISTER_LOW, 0); |
| GT_REG_WRITE (CPU_INTERRUPT_1_MASK_REGISTER_HIGH, 0); |
| /* --------------------- */ |
| GT_REG_WRITE (PCI_0INTERRUPT_CAUSE_MASK_REGISTER_LOW, 0); |
| GT_REG_WRITE (PCI_0INTERRUPT_CAUSE_MASK_REGISTER_HIGH, 0); |
| GT_REG_WRITE (PCI_1INTERRUPT_CAUSE_MASK_REGISTER_LOW, 0); |
| GT_REG_WRITE (PCI_1INTERRUPT_CAUSE_MASK_REGISTER_HIGH, 0); |
| /* does not exist in MV6436x |
| GT_REG_WRITE(CPU_INT_0_MASK, 0); |
| GT_REG_WRITE(CPU_INT_1_MASK, 0); |
| GT_REG_WRITE(CPU_INT_2_MASK, 0); |
| GT_REG_WRITE(CPU_INT_3_MASK, 0); |
| --------------------- */ |
| |
| |
| /* ----- DEVICE BUS SETTINGS ------ */ |
| |
| /* |
| * EVB |
| * 0 - SRAM ???? |
| * 1 - RTC ???? |
| * 2 - UART ???? |
| * 3 - Flash checked 32Bit Intel Strata |
| * boot - BootCS checked 8Bit 29LV040B |
| * |
| * Zuma |
| * 0 - Flash |
| * boot - BootCS |
| */ |
| |
| /* |
| * the dual 7450 module requires burst access to the boot |
| * device, so the serial rom copies the boot device to the |
| * on-board sram on the eval board, and updates the correct |
| * registers to boot from the sram. (device0) |
| */ |
| if (memoryGetDeviceBaseAddress (DEVICE0) == CFG_DFL_BOOTCS_BASE) |
| sram_boot = 1; |
| if (!sram_boot) |
| memoryMapDeviceSpace (DEVICE0, CFG_DEV0_SPACE, CFG_DEV0_SIZE); |
| |
| memoryMapDeviceSpace (DEVICE1, CFG_DEV1_SPACE, CFG_DEV1_SIZE); |
| memoryMapDeviceSpace (DEVICE2, CFG_DEV2_SPACE, CFG_DEV2_SIZE); |
| memoryMapDeviceSpace (DEVICE3, CFG_DEV3_SPACE, CFG_DEV3_SIZE); |
| |
| |
| /* configure device timing */ |
| #ifdef CFG_DEV0_PAR /* set port parameters for SRAM device module access */ |
| if (!sram_boot) |
| GT_REG_WRITE (DEVICE_BANK0PARAMETERS, CFG_DEV0_PAR); |
| #endif |
| |
| #ifdef CFG_DEV1_PAR /* set port parameters for RTC device module access */ |
| GT_REG_WRITE (DEVICE_BANK1PARAMETERS, CFG_DEV1_PAR); |
| #endif |
| #ifdef CFG_DEV2_PAR /* set port parameters for DUART device module access */ |
| GT_REG_WRITE (DEVICE_BANK2PARAMETERS, CFG_DEV2_PAR); |
| #endif |
| |
| #ifdef CFG_32BIT_BOOT_PAR /* set port parameters for Flash device module access */ |
| /* detect if we are booting from the 32 bit flash */ |
| if (GTREGREAD (DEVICE_BOOT_BANK_PARAMETERS) & (0x3 << 20)) { |
| /* 32 bit boot flash */ |
| GT_REG_WRITE (DEVICE_BANK3PARAMETERS, CFG_8BIT_BOOT_PAR); |
| GT_REG_WRITE (DEVICE_BOOT_BANK_PARAMETERS, |
| CFG_32BIT_BOOT_PAR); |
| } else { |
| /* 8 bit boot flash */ |
| GT_REG_WRITE (DEVICE_BANK3PARAMETERS, CFG_32BIT_BOOT_PAR); |
| GT_REG_WRITE (DEVICE_BOOT_BANK_PARAMETERS, CFG_8BIT_BOOT_PAR); |
| } |
| #else |
| /* 8 bit boot flash only */ |
| /* GT_REG_WRITE(DEVICE_BOOT_BANK_PARAMETERS, CFG_8BIT_BOOT_PAR);*/ |
| #endif |
| |
| |
| gt_cpu_config (); |
| |
| /* MPP setup */ |
| GT_REG_WRITE (MPP_CONTROL0, CFG_MPP_CONTROL_0); |
| GT_REG_WRITE (MPP_CONTROL1, CFG_MPP_CONTROL_1); |
| GT_REG_WRITE (MPP_CONTROL2, CFG_MPP_CONTROL_2); |
| GT_REG_WRITE (MPP_CONTROL3, CFG_MPP_CONTROL_3); |
| |
| GT_REG_WRITE (GPP_LEVEL_CONTROL, CFG_GPP_LEVEL_CONTROL); |
| DEBUG_LED0_ON (); |
| DEBUG_LED1_ON (); |
| DEBUG_LED2_ON (); |
| |
| return 0; |
| } |
| |
| /* various things to do after relocation */ |
| |
| int misc_init_r () |
| { |
| icache_enable (); |
| #ifdef CFG_L2 |
| l2cache_enable (); |
| #endif |
| #ifdef CONFIG_MPSC |
| |
| mpsc_sdma_init (); |
| mpsc_init2 (); |
| #endif |
| |
| #if 0 |
| /* disable the dcache and MMU */ |
| dcache_lock (); |
| #endif |
| return 0; |
| } |
| |
| void after_reloc (ulong dest_addr, gd_t * gd) |
| { |
| /* check to see if we booted from the sram. If so, move things |
| * back to the way they should be. (we're running from main |
| * memory at this point now */ |
| if (memoryGetDeviceBaseAddress (DEVICE0) == CFG_DFL_BOOTCS_BASE) { |
| memoryMapDeviceSpace (DEVICE0, CFG_DEV0_SPACE, CFG_DEV0_SIZE); |
| memoryMapDeviceSpace (BOOT_DEVICE, CFG_DFL_BOOTCS_BASE, _8M); |
| } |
| display_mem_map (); |
| /* now, jump to the main ppcboot board init code */ |
| board_init_r (gd, dest_addr); |
| /* NOTREACHED */ |
| } |
| |
| /* ------------------------------------------------------------------------- */ |
| |
| /* |
| * Check Board Identity: |
| * |
| * right now, assume borad type. (there is just one...after all) |
| */ |
| |
| int checkboard (void) |
| { |
| int l_type = 0; |
| |
| printf ("BOARD: %s\n", CFG_BOARD_NAME); |
| return (l_type); |
| } |
| |
| /* utility functions */ |
| void debug_led (int led, int mode) |
| { |
| volatile int *addr = 0; |
| int dummy; |
| |
| if (mode == 1) { |
| switch (led) { |
| case 0: |
| addr = (int *) ((unsigned int) CFG_DEV1_SPACE | |
| 0x08000); |
| break; |
| |
| case 1: |
| addr = (int *) ((unsigned int) CFG_DEV1_SPACE | |
| 0x0c000); |
| break; |
| |
| case 2: |
| addr = (int *) ((unsigned int) CFG_DEV1_SPACE | |
| 0x10000); |
| break; |
| } |
| } else if (mode == 0) { |
| switch (led) { |
| case 0: |
| addr = (int *) ((unsigned int) CFG_DEV1_SPACE | |
| 0x14000); |
| break; |
| |
| case 1: |
| addr = (int *) ((unsigned int) CFG_DEV1_SPACE | |
| 0x18000); |
| break; |
| |
| case 2: |
| addr = (int *) ((unsigned int) CFG_DEV1_SPACE | |
| 0x1c000); |
| break; |
| } |
| } |
| |
| dummy = *addr; |
| } |
| |
| int display_mem_map (void) |
| { |
| int i, j; |
| unsigned int base, size, width; |
| |
| /* SDRAM */ |
| printf ("SD (DDR) RAM\n"); |
| for (i = 0; i <= BANK3; i++) { |
| base = memoryGetBankBaseAddress (i); |
| size = memoryGetBankSize (i); |
| if (size != 0) { |
| printf ("BANK%d: base - 0x%08x\tsize - %dM bytes\n", |
| i, base, size >> 20); |
| } |
| } |
| |
| /* CPU's PCI windows */ |
| for (i = 0; i <= PCI_HOST1; i++) { |
| printf ("\nCPU's PCI %d windows\n", i); |
| base = pciGetSpaceBase (i, PCI_IO); |
| size = pciGetSpaceSize (i, PCI_IO); |
| printf (" IO: base - 0x%08x\tsize - %dM bytes\n", base, |
| size >> 20); |
| for (j = 0; |
| j <= |
| PCI_REGION0 |
| /*ronen currently only first PCI MEM is used 3 */ ; |
| j++) { |
| base = pciGetSpaceBase (i, j); |
| size = pciGetSpaceSize (i, j); |
| printf ("MEMORY %d: base - 0x%08x\tsize - %dM bytes\n", j, base, size >> 20); |
| } |
| } |
| |
| /* Devices */ |
| printf ("\nDEVICES\n"); |
| for (i = 0; i <= DEVICE3; i++) { |
| base = memoryGetDeviceBaseAddress (i); |
| size = memoryGetDeviceSize (i); |
| width = memoryGetDeviceWidth (i) * 8; |
| printf ("DEV %d: base - 0x%08x size - %dM bytes\twidth - %d bits", i, base, size >> 20, width); |
| if (i == 0) |
| printf ("\t- EXT SRAM (actual - 1M)\n"); |
| else if (i == 1) |
| printf ("\t- RTC\n"); |
| else if (i == 2) |
| printf ("\t- UART\n"); |
| else |
| printf ("\t- LARGE FLASH\n"); |
| } |
| |
| /* Bootrom */ |
| base = memoryGetDeviceBaseAddress (BOOT_DEVICE); /* Boot */ |
| size = memoryGetDeviceSize (BOOT_DEVICE); |
| width = memoryGetDeviceWidth (BOOT_DEVICE) * 8; |
| printf (" BOOT: base - 0x%08x size - %dM bytes\twidth - %d bits\n", |
| base, size >> 20, width); |
| return (0); |
| } |
| |
| /* DRAM check routines copied from gw8260 */ |
| |
| #if defined (CFG_DRAM_TEST) |
| |
| /*********************************************************************/ |
| /* NAME: move64() - moves a double word (64-bit) */ |
| /* */ |
| /* DESCRIPTION: */ |
| /* this function performs a double word move from the data at */ |
| /* the source pointer to the location at the destination pointer. */ |
| /* */ |
| /* INPUTS: */ |
| /* unsigned long long *src - pointer to data to move */ |
| /* */ |
| /* OUTPUTS: */ |
| /* unsigned long long *dest - pointer to locate to move data */ |
| /* */ |
| /* RETURNS: */ |
| /* None */ |
| /* */ |
| /* RESTRICTIONS/LIMITATIONS: */ |
| /* May cloober fr0. */ |
| /* */ |
| /*********************************************************************/ |
| static void move64 (unsigned long long *src, unsigned long long *dest) |
| { |
| asm ("lfd 0, 0(3)\n\t" /* fpr0 = *scr */ |
| "stfd 0, 0(4)" /* *dest = fpr0 */ |
| : : : "fr0"); /* Clobbers fr0 */ |
| return; |
| } |
| |
| |
| #if defined (CFG_DRAM_TEST_DATA) |
| |
| unsigned long long pattern[] = { |
| 0xaaaaaaaaaaaaaaaaULL, |
| 0xccccccccccccccccULL, |
| 0xf0f0f0f0f0f0f0f0ULL, |
| 0xff00ff00ff00ff00ULL, |
| 0xffff0000ffff0000ULL, |
| 0xffffffff00000000ULL, |
| 0x00000000ffffffffULL, |
| 0x0000ffff0000ffffULL, |
| 0x00ff00ff00ff00ffULL, |
| 0x0f0f0f0f0f0f0f0fULL, |
| 0x3333333333333333ULL, |
| 0x5555555555555555ULL, |
| }; |
| |
| /*********************************************************************/ |
| /* NAME: mem_test_data() - test data lines for shorts and opens */ |
| /* */ |
| /* DESCRIPTION: */ |
| /* Tests data lines for shorts and opens by forcing adjacent data */ |
| /* to opposite states. Because the data lines could be routed in */ |
| /* an arbitrary manner the must ensure test patterns ensure that */ |
| /* every case is tested. By using the following series of binary */ |
| /* patterns every combination of adjacent bits is test regardless */ |
| /* of routing. */ |
| /* */ |
| /* ...101010101010101010101010 */ |
| /* ...110011001100110011001100 */ |
| /* ...111100001111000011110000 */ |
| /* ...111111110000000011111111 */ |
| /* */ |
| /* Carrying this out, gives us six hex patterns as follows: */ |
| /* */ |
| /* 0xaaaaaaaaaaaaaaaa */ |
| /* 0xcccccccccccccccc */ |
| /* 0xf0f0f0f0f0f0f0f0 */ |
| /* 0xff00ff00ff00ff00 */ |
| /* 0xffff0000ffff0000 */ |
| /* 0xffffffff00000000 */ |
| /* */ |
| /* The number test patterns will always be given by: */ |
| /* */ |
| /* log(base 2)(number data bits) = log2 (64) = 6 */ |
| /* */ |
| /* To test for short and opens to other signals on our boards. we */ |
| /* simply */ |
| /* test with the 1's complemnt of the paterns as well. */ |
| /* */ |
| /* OUTPUTS: */ |
| /* Displays failing test pattern */ |
| /* */ |
| /* RETURNS: */ |
| /* 0 - Passed test */ |
| /* 1 - Failed test */ |
| /* */ |
| /* RESTRICTIONS/LIMITATIONS: */ |
| /* Assumes only one one SDRAM bank */ |
| /* */ |
| /*********************************************************************/ |
| int mem_test_data (void) |
| { |
| unsigned long long *pmem = (unsigned long long *) CFG_MEMTEST_START; |
| unsigned long long temp64; |
| int num_patterns = sizeof (pattern) / sizeof (pattern[0]); |
| int i; |
| unsigned int hi, lo; |
| |
| for (i = 0; i < num_patterns; i++) { |
| move64 (&(pattern[i]), pmem); |
| move64 (pmem, &temp64); |
| |
| /* hi = (temp64>>32) & 0xffffffff; */ |
| /* lo = temp64 & 0xffffffff; */ |
| /* printf("\ntemp64 = 0x%08x%08x", hi, lo); */ |
| |
| hi = (pattern[i] >> 32) & 0xffffffff; |
| lo = pattern[i] & 0xffffffff; |
| /* printf("\npattern[%d] = 0x%08x%08x", i, hi, lo); */ |
| |
| if (temp64 != pattern[i]) { |
| printf ("\n Data Test Failed, pattern 0x%08x%08x", |
| hi, lo); |
| return 1; |
| } |
| } |
| |
| return 0; |
| } |
| #endif /* CFG_DRAM_TEST_DATA */ |
| |
| #if defined (CFG_DRAM_TEST_ADDRESS) |
| /*********************************************************************/ |
| /* NAME: mem_test_address() - test address lines */ |
| /* */ |
| /* DESCRIPTION: */ |
| /* This function performs a test to verify that each word im */ |
| /* memory is uniquly addressable. The test sequence is as follows: */ |
| /* */ |
| /* 1) write the address of each word to each word. */ |
| /* 2) verify that each location equals its address */ |
| /* */ |
| /* OUTPUTS: */ |
| /* Displays failing test pattern and address */ |
| /* */ |
| /* RETURNS: */ |
| /* 0 - Passed test */ |
| /* 1 - Failed test */ |
| /* */ |
| /* RESTRICTIONS/LIMITATIONS: */ |
| /* */ |
| /* */ |
| /*********************************************************************/ |
| int mem_test_address (void) |
| { |
| volatile unsigned int *pmem = |
| (volatile unsigned int *) CFG_MEMTEST_START; |
| const unsigned int size = (CFG_MEMTEST_END - CFG_MEMTEST_START) / 4; |
| unsigned int i; |
| |
| /* write address to each location */ |
| for (i = 0; i < size; i++) { |
| pmem[i] = i; |
| } |
| |
| /* verify each loaction */ |
| for (i = 0; i < size; i++) { |
| if (pmem[i] != i) { |
| printf ("\n Address Test Failed at 0x%x", i); |
| return 1; |
| } |
| } |
| return 0; |
| } |
| #endif /* CFG_DRAM_TEST_ADDRESS */ |
| |
| #if defined (CFG_DRAM_TEST_WALK) |
| /*********************************************************************/ |
| /* NAME: mem_march() - memory march */ |
| /* */ |
| /* DESCRIPTION: */ |
| /* Marches up through memory. At each location verifies rmask if */ |
| /* read = 1. At each location write wmask if write = 1. Displays */ |
| /* failing address and pattern. */ |
| /* */ |
| /* INPUTS: */ |
| /* volatile unsigned long long * base - start address of test */ |
| /* unsigned int size - number of dwords(64-bit) to test */ |
| /* unsigned long long rmask - read verify mask */ |
| /* unsigned long long wmask - wrtie verify mask */ |
| /* short read - verifies rmask if read = 1 */ |
| /* short write - writes wmask if write = 1 */ |
| /* */ |
| /* OUTPUTS: */ |
| /* Displays failing test pattern and address */ |
| /* */ |
| /* RETURNS: */ |
| /* 0 - Passed test */ |
| /* 1 - Failed test */ |
| /* */ |
| /* RESTRICTIONS/LIMITATIONS: */ |
| /* */ |
| /* */ |
| /*********************************************************************/ |
| int mem_march (volatile unsigned long long *base, |
| unsigned int size, |
| unsigned long long rmask, |
| unsigned long long wmask, short read, short write) |
| { |
| unsigned int i; |
| unsigned long long temp; |
| unsigned int hitemp, lotemp, himask, lomask; |
| |
| for (i = 0; i < size; i++) { |
| if (read != 0) { |
| /* temp = base[i]; */ |
| move64 ((unsigned long long *) &(base[i]), &temp); |
| if (rmask != temp) { |
| hitemp = (temp >> 32) & 0xffffffff; |
| lotemp = temp & 0xffffffff; |
| himask = (rmask >> 32) & 0xffffffff; |
| lomask = rmask & 0xffffffff; |
| |
| printf ("\n Walking one's test failed: address = 0x%08x," "\n\texpected 0x%08x%08x, found 0x%08x%08x", i << 3, himask, lomask, hitemp, lotemp); |
| return 1; |
| } |
| } |
| if (write != 0) { |
| /* base[i] = wmask; */ |
| move64 (&wmask, (unsigned long long *) &(base[i])); |
| } |
| } |
| return 0; |
| } |
| #endif /* CFG_DRAM_TEST_WALK */ |
| |
| /*********************************************************************/ |
| /* NAME: mem_test_walk() - a simple walking ones test */ |
| /* */ |
| /* DESCRIPTION: */ |
| /* Performs a walking ones through entire physical memory. The */ |
| /* test uses as series of memory marches, mem_march(), to verify */ |
| /* and write the test patterns to memory. The test sequence is as */ |
| /* follows: */ |
| /* 1) march writing 0000...0001 */ |
| /* 2) march verifying 0000...0001 , writing 0000...0010 */ |
| /* 3) repeat step 2 shifting masks left 1 bit each time unitl */ |
| /* the write mask equals 1000...0000 */ |
| /* 4) march verifying 1000...0000 */ |
| /* The test fails if any of the memory marches return a failure. */ |
| /* */ |
| /* OUTPUTS: */ |
| /* Displays which pass on the memory test is executing */ |
| /* */ |
| /* RETURNS: */ |
| /* 0 - Passed test */ |
| /* 1 - Failed test */ |
| /* */ |
| /* RESTRICTIONS/LIMITATIONS: */ |
| /* */ |
| /* */ |
| /*********************************************************************/ |
| int mem_test_walk (void) |
| { |
| unsigned long long mask; |
| volatile unsigned long long *pmem = |
| (volatile unsigned long long *) CFG_MEMTEST_START; |
| const unsigned long size = (CFG_MEMTEST_END - CFG_MEMTEST_START) / 8; |
| |
| unsigned int i; |
| |
| mask = 0x01; |
| |
| printf ("Initial Pass"); |
| mem_march (pmem, size, 0x0, 0x1, 0, 1); |
| |
| printf ("\b\b\b\b\b\b\b\b\b\b\b\b"); |
| printf (" "); |
| printf (" "); |
| printf ("\b\b\b\b\b\b\b\b\b\b\b\b"); |
| |
| for (i = 0; i < 63; i++) { |
| printf ("Pass %2d", i + 2); |
| if (mem_march (pmem, size, mask, mask << 1, 1, 1) != 0) { |
| /*printf("mask: 0x%x, pass: %d, ", mask, i); */ |
| return 1; |
| } |
| mask = mask << 1; |
| printf ("\b\b\b\b\b\b\b"); |
| } |
| |
| printf ("Last Pass"); |
| if (mem_march (pmem, size, 0, mask, 0, 1) != 0) { |
| /* printf("mask: 0x%x", mask); */ |
| return 1; |
| } |
| printf ("\b\b\b\b\b\b\b\b\b"); |
| printf (" "); |
| printf ("\b\b\b\b\b\b\b\b\b"); |
| |
| return 0; |
| } |
| |
| /*********************************************************************/ |
| /* NAME: testdram() - calls any enabled memory tests */ |
| /* */ |
| /* DESCRIPTION: */ |
| /* Runs memory tests if the environment test variables are set to */ |
| /* 'y'. */ |
| /* */ |
| /* INPUTS: */ |
| /* testdramdata - If set to 'y', data test is run. */ |
| /* testdramaddress - If set to 'y', address test is run. */ |
| /* testdramwalk - If set to 'y', walking ones test is run */ |
| /* */ |
| /* OUTPUTS: */ |
| /* None */ |
| /* */ |
| /* RETURNS: */ |
| /* 0 - Passed test */ |
| /* 1 - Failed test */ |
| /* */ |
| /* RESTRICTIONS/LIMITATIONS: */ |
| /* */ |
| /* */ |
| /*********************************************************************/ |
| int testdram (void) |
| { |
| char *s; |
| int rundata, runaddress, runwalk; |
| |
| s = getenv ("testdramdata"); |
| rundata = (s && (*s == 'y')) ? 1 : 0; |
| s = getenv ("testdramaddress"); |
| runaddress = (s && (*s == 'y')) ? 1 : 0; |
| s = getenv ("testdramwalk"); |
| runwalk = (s && (*s == 'y')) ? 1 : 0; |
| |
| /* rundata = 1; */ |
| /* runaddress = 0; */ |
| /* runwalk = 0; */ |
| |
| if ((rundata == 1) || (runaddress == 1) || (runwalk == 1)) { |
| printf ("Testing RAM from 0x%08x to 0x%08x ... (don't panic... that will take a moment !!!!)\n", CFG_MEMTEST_START, CFG_MEMTEST_END); |
| } |
| #ifdef CFG_DRAM_TEST_DATA |
| if (rundata == 1) { |
| printf ("Test DATA ... "); |
| if (mem_test_data () == 1) { |
| printf ("failed \n"); |
| return 1; |
| } else |
| printf ("ok \n"); |
| } |
| #endif |
| #ifdef CFG_DRAM_TEST_ADDRESS |
| if (runaddress == 1) { |
| printf ("Test ADDRESS ... "); |
| if (mem_test_address () == 1) { |
| printf ("failed \n"); |
| return 1; |
| } else |
| printf ("ok \n"); |
| } |
| #endif |
| #ifdef CFG_DRAM_TEST_WALK |
| if (runwalk == 1) { |
| printf ("Test WALKING ONEs ... "); |
| if (mem_test_walk () == 1) { |
| printf ("failed \n"); |
| return 1; |
| } else |
| printf ("ok \n"); |
| } |
| #endif |
| if ((rundata == 1) || (runaddress == 1) || (runwalk == 1)) { |
| printf ("passed\n"); |
| } |
| return 0; |
| |
| } |
| #endif /* CFG_DRAM_TEST */ |
| |
| /* ronen - the below functions are used by the bootm function */ |
| /* - we map the base register to fbe00000 (same mapping as in the LSP) */ |
| /* - we turn off the RX gig dmas - to prevent the dma from overunning */ |
| /* the kernel data areas. */ |
| /* - we diable and invalidate the icache and dcache. */ |
| void my_remap_gt_regs_bootm (u32 cur_loc, u32 new_loc) |
| { |
| u32 temp; |
| |
| temp = in_le32 ((u32 *) (new_loc + INTERNAL_SPACE_DECODE)); |
| if ((temp & 0xffff) == new_loc >> 16) |
| return; |
| |
| temp = (in_le32 ((u32 *) (cur_loc + INTERNAL_SPACE_DECODE)) & |
| 0xffff0000) | (new_loc >> 16); |
| |
| out_le32 ((u32 *) (cur_loc + INTERNAL_SPACE_DECODE), temp); |
| |
| while ((WORD_SWAP (*((volatile unsigned int *) (NONE_CACHEABLE | |
| new_loc | |
| (INTERNAL_SPACE_DECODE))))) |
| != temp); |
| |
| } |
| |
| void board_prebootm_init () |
| { |
| |
| /* change window size of PCI1 IO in order tp prevent overlaping with REG BASE. */ |
| GT_REG_WRITE (PCI_1_IO_SIZE, (_64K - 1) >> 16); |
| |
| /* Stop GigE Rx DMA engines */ |
| GT_REG_WRITE (MV64360_ETH_RECEIVE_QUEUE_COMMAND_REG (0), 0x0000ff00); |
| GT_REG_WRITE (MV64360_ETH_RECEIVE_QUEUE_COMMAND_REG (1), 0x0000ff00); |
| /* MV_REG_WRITE (MV64360_ETH_RECEIVE_QUEUE_COMMAND_REG(2), 0x0000ff00); */ |
| |
| /* Relocate MV64360 internal regs */ |
| my_remap_gt_regs_bootm (CFG_GT_REGS, BRIDGE_REG_BASE_BOOTM); |
| |
| icache_disable (); |
| invalidate_l1_instruction_cache (); |
| flush_data_cache (); |
| dcache_disable (); |
| } |