| /* |
| * (C) Copyright 2001-2003 |
| * Stefan Roese, esd gmbh germany, stefan.roese@esd-electronics.com |
| * |
| * 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 |
| */ |
| |
| #include <common.h> |
| #include <asm/processor.h> |
| #include <asm/io.h> |
| #include <command.h> |
| #include <malloc.h> |
| #include <sja1000.h> |
| |
| #undef FPGA_DEBUG |
| |
| DECLARE_GLOBAL_DATA_PTR; |
| |
| extern int do_reset (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]); |
| extern void lxt971_no_sleep(void); |
| |
| /* fpga configuration data - gzip compressed and generated by bin2c */ |
| const unsigned char fpgadata[] = |
| { |
| #include "fpgadata.c" |
| }; |
| |
| /* |
| * include common fpga code (for esd boards) |
| */ |
| #include "../common/fpga.c" |
| |
| /* |
| * generate a short spike on the CAN tx line |
| * to bring the couplers in sync |
| */ |
| void init_coupler(u32 addr) |
| { |
| struct sja1000_basic_s *ctrl = (struct sja1000_basic_s *)addr; |
| |
| /* reset */ |
| out_8(&ctrl->cr, CR_RR); |
| |
| /* dominant */ |
| out_8(&ctrl->btr0, 0x00); /* btr setup is required */ |
| out_8(&ctrl->btr1, 0x14); /* we use 1Mbit/s */ |
| out_8(&ctrl->oc, OC_TP1 | OC_TN1 | OC_POL1 | |
| OC_TP0 | OC_TN0 | OC_POL0 | OC_MODE1); |
| out_8(&ctrl->cr, 0x00); |
| |
| /* delay */ |
| in_8(&ctrl->cr); |
| in_8(&ctrl->cr); |
| in_8(&ctrl->cr); |
| in_8(&ctrl->cr); |
| |
| /* reset */ |
| out_8(&ctrl->cr, CR_RR); |
| } |
| |
| int board_early_init_f(void) |
| { |
| /* |
| * IRQ 0-15 405GP internally generated; active high; level sensitive |
| * IRQ 16 405GP internally generated; active low; level sensitive |
| * IRQ 17-24 RESERVED |
| * IRQ 25 (EXT IRQ 0) CAN0; active low; level sensitive |
| * IRQ 26 (EXT IRQ 1) SER0 ; active low; level sensitive |
| * IRQ 27 (EXT IRQ 2) SER1; active low; level sensitive |
| * IRQ 28 (EXT IRQ 3) FPGA 0; active low; level sensitive |
| * IRQ 29 (EXT IRQ 4) FPGA 1; active low; level sensitive |
| * IRQ 30 (EXT IRQ 5) PCI INTA; active low; level sensitive |
| * IRQ 31 (EXT IRQ 6) COMPACT FLASH; active high; level sensitive |
| */ |
| mtdcr(UIC0SR, 0xFFFFFFFF); /* clear all ints */ |
| mtdcr(UIC0ER, 0x00000000); /* disable all ints */ |
| mtdcr(UIC0CR, 0x00000000); /* set all to be non-critical*/ |
| mtdcr(UIC0PR, 0xFFFFFF99); /* set int polarities */ |
| mtdcr(UIC0TR, 0x10000000); /* set int trigger levels */ |
| mtdcr(UIC0VCR, 0x00000001); /* set vect base=0,INT0 highest prio */ |
| mtdcr(UIC0SR, 0xFFFFFFFF); /* clear all ints */ |
| |
| /* |
| * EBC Configuration Register: set ready timeout to |
| * 512 ebc-clks -> ca. 15 us |
| */ |
| mtebc(EBC0_CFG, 0xa8400000); /* ebc always driven */ |
| |
| return 0; |
| } |
| |
| int misc_init_r(void) |
| { |
| unsigned char *dst; |
| unsigned char fctr; |
| ulong len = sizeof(fpgadata); |
| int status; |
| int index; |
| int i; |
| |
| /* adjust flash start and offset */ |
| gd->bd->bi_flashstart = 0 - gd->bd->bi_flashsize; |
| gd->bd->bi_flashoffset = 0; |
| |
| dst = malloc(CONFIG_SYS_FPGA_MAX_SIZE); |
| if (gunzip(dst, CONFIG_SYS_FPGA_MAX_SIZE, |
| (uchar *)fpgadata, &len) != 0) { |
| printf("GUNZIP ERROR - must RESET board to recover\n"); |
| do_reset(NULL, 0, 0, NULL); |
| } |
| |
| status = fpga_boot(dst, len); |
| if (status != 0) { |
| printf("\nFPGA: Booting failed "); |
| switch (status) { |
| case ERROR_FPGA_PRG_INIT_LOW: |
| printf("(Timeout: INIT not low " |
| "after asserting PROGRAM*)\n"); |
| break; |
| case ERROR_FPGA_PRG_INIT_HIGH: |
| printf("(Timeout: INIT not high " |
| "after deasserting PROGRAM*)\n"); |
| break; |
| case ERROR_FPGA_PRG_DONE: |
| printf("(Timeout: DONE not high " |
| "after programming FPGA)\n"); |
| break; |
| } |
| |
| /* display infos on fpgaimage */ |
| index = 15; |
| for (i=0; i<4; i++) { |
| len = dst[index]; |
| printf("FPGA: %s\n", &(dst[index+1])); |
| index += len+3; |
| } |
| putc ('\n'); |
| /* delayed reboot */ |
| for (i=20; i>0; i--) { |
| printf("Rebooting in %2d seconds \r",i); |
| for (index=0;index<1000;index++) |
| udelay(1000); |
| } |
| putc('\n'); |
| do_reset(NULL, 0, 0, NULL); |
| } |
| |
| puts("FPGA: "); |
| |
| /* display infos on fpgaimage */ |
| index = 15; |
| for (i=0; i<4; i++) { |
| len = dst[index]; |
| printf("%s ", &(dst[index+1])); |
| index += len+3; |
| } |
| putc('\n'); |
| |
| free(dst); |
| |
| /* |
| * Reset FPGA via FPGA_DATA pin |
| */ |
| SET_FPGA(FPGA_PRG | FPGA_CLK); |
| udelay(1000); /* wait 1ms */ |
| SET_FPGA(FPGA_PRG | FPGA_CLK | FPGA_DATA); |
| udelay(1000); /* wait 1ms */ |
| |
| /* |
| * Reset external DUARTs |
| */ |
| out_be32((void*)GPIO0_OR, |
| in_be32((void*)GPIO0_OR) | CONFIG_SYS_DUART_RST); |
| udelay(10); |
| out_be32((void*)GPIO0_OR, |
| in_be32((void*)GPIO0_OR) & ~CONFIG_SYS_DUART_RST); |
| udelay(1000); |
| |
| /* |
| * Set NAND-FLASH GPIO signals to default |
| */ |
| out_be32((void*)GPIO0_OR, |
| in_be32((void*)GPIO0_OR) & |
| ~(CONFIG_SYS_NAND_CLE | CONFIG_SYS_NAND_ALE)); |
| out_be32((void*)GPIO0_OR, |
| in_be32((void*)GPIO0_OR) | CONFIG_SYS_NAND_CE); |
| |
| /* |
| * Setup EEPROM write protection |
| */ |
| out_be32((void*)GPIO0_OR, |
| in_be32((void*)GPIO0_OR) | CONFIG_SYS_EEPROM_WP); |
| out_be32((void*)GPIO0_TCR, |
| in_be32((void*)GPIO0_TCR) | CONFIG_SYS_EEPROM_WP); |
| |
| /* |
| * Enable interrupts in exar duart mcr[3] |
| */ |
| out_8((void *)DUART0_BA + 4, 0x08); |
| out_8((void *)DUART1_BA + 4, 0x08); |
| |
| /* |
| * Enable auto RS485 mode in 2nd external uart |
| */ |
| out_8((void *)DUART1_BA + 3, 0xbf); /* write LCR */ |
| fctr = in_8((void *)DUART1_BA + 1); /* read FCTR */ |
| fctr |= 0x08; /* enable RS485 mode */ |
| out_8((void *)DUART1_BA + 1, fctr); /* write FCTR */ |
| out_8((void *)DUART1_BA + 3, 0); /* write LCR */ |
| |
| /* |
| * Init magnetic couplers |
| */ |
| if (!getenv("noinitcoupler")) { |
| init_coupler(CAN0_BA); |
| init_coupler(CAN1_BA); |
| } |
| return 0; |
| } |
| |
| /* |
| * Check Board Identity: |
| */ |
| int checkboard(void) |
| { |
| char str[64]; |
| int i = getenv_r("serial#", str, sizeof(str)); |
| |
| puts("Board: "); |
| |
| if (i == -1) |
| puts("### No HW ID - assuming PLU405"); |
| else |
| puts(str); |
| |
| putc('\n'); |
| return 0; |
| } |
| |
| #ifdef CONFIG_IDE_RESET |
| #define FPGA_CTRL (CONFIG_SYS_FPGA_BASE_ADDR + CONFIG_SYS_FPGA_CTRL) |
| void ide_set_reset(int on) |
| { |
| /* |
| * Assert or deassert CompactFlash Reset Pin |
| */ |
| if (on) { /* assert RESET */ |
| out_be16((void *)FPGA_CTRL, |
| in_be16((void *)FPGA_CTRL) & |
| ~CONFIG_SYS_FPGA_CTRL_CF_RESET); |
| } else { /* release RESET */ |
| out_be16((void *)FPGA_CTRL, |
| in_be16((void *)FPGA_CTRL) | |
| CONFIG_SYS_FPGA_CTRL_CF_RESET); |
| } |
| } |
| #endif /* CONFIG_IDE_RESET */ |
| |
| void reset_phy(void) |
| { |
| #ifdef CONFIG_LXT971_NO_SLEEP |
| |
| /* |
| * Disable sleep mode in LXT971 |
| */ |
| lxt971_no_sleep(); |
| #endif |
| } |
| |
| #if defined(CONFIG_SYS_EEPROM_WREN) |
| /* Input: <dev_addr> I2C address of EEPROM device to enable. |
| * <state> -1: deliver current state |
| * 0: disable write |
| * 1: enable write |
| * Returns: -1: wrong device address |
| * 0: dis-/en- able done |
| * 0/1: current state if <state> was -1. |
| */ |
| int eeprom_write_enable(unsigned dev_addr, int state) |
| { |
| if (CONFIG_SYS_I2C_EEPROM_ADDR != dev_addr) { |
| return -1; |
| } else { |
| switch (state) { |
| case 1: |
| /* Enable write access, clear bit GPIO0. */ |
| out_be32((void*)GPIO0_OR, |
| in_be32((void*)GPIO0_OR) & |
| ~CONFIG_SYS_EEPROM_WP); |
| state = 0; |
| break; |
| case 0: |
| /* Disable write access, set bit GPIO0. */ |
| out_be32((void*)GPIO0_OR, |
| in_be32((void*)GPIO0_OR) | |
| CONFIG_SYS_EEPROM_WP); |
| state = 0; |
| break; |
| default: |
| /* Read current status back. */ |
| state = ((in_be32((void*)GPIO0_OR) & |
| CONFIG_SYS_EEPROM_WP) == 0); |
| break; |
| } |
| } |
| return state; |
| } |
| |
| int do_eep_wren(cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) |
| { |
| int query = argc == 1; |
| int state = 0; |
| |
| if (query) { |
| /* Query write access state. */ |
| state = eeprom_write_enable(CONFIG_SYS_I2C_EEPROM_ADDR, -1); |
| if (state < 0) { |
| puts("Query of write access state failed.\n"); |
| } else { |
| printf("Write access for device 0x%0x is %sabled.\n", |
| CONFIG_SYS_I2C_EEPROM_ADDR, |
| state ? "en" : "dis"); |
| state = 0; |
| } |
| } else { |
| if (argv[1][0] == '0') { |
| /* Disable write access. */ |
| state = eeprom_write_enable(CONFIG_SYS_I2C_EEPROM_ADDR, |
| 0); |
| } else { |
| /* Enable write access. */ |
| state = eeprom_write_enable(CONFIG_SYS_I2C_EEPROM_ADDR, |
| 1); |
| } |
| if (state < 0) |
| puts("Setup of write access state failed.\n"); |
| } |
| |
| return state; |
| } |
| |
| U_BOOT_CMD(eepwren, 2, 0, do_eep_wren, |
| "Enable / disable / query EEPROM write access", |
| "" |
| ); |
| #endif /* #if defined(CONFIG_SYS_EEPROM_WREN) */ |