| /* |
| * (C) Copyright 2002 |
| * Wolfgang Denk, DENX Software Engineering, wd@denx.de. |
| * |
| * (C) Copyright 2002 |
| * Sysgo Real-Time Solutions, GmbH <www.elinos.com> |
| * Marius Groeger <mgroeger@sysgo.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 |
| */ |
| |
| #include <common.h> |
| #include <command.h> |
| #include <devices.h> |
| #include <version.h> |
| #include <net.h> |
| |
| #if (CONFIG_COMMANDS & CFG_CMD_NAND) |
| void nand_init (void); |
| #endif |
| |
| const char version_string[] = |
| U_BOOT_VERSION" (" __DATE__ " - " __TIME__ ")"; |
| |
| #ifdef CONFIG_DRIVER_CS8900 |
| extern void cs8900_get_enetaddr (uchar * addr); |
| #endif |
| |
| /* |
| * Begin and End of memory area for malloc(), and current "brk" |
| */ |
| static ulong mem_malloc_start = 0; |
| static ulong mem_malloc_end = 0; |
| static ulong mem_malloc_brk = 0; |
| |
| static |
| void mem_malloc_init (ulong dest_addr) |
| { |
| mem_malloc_start = dest_addr; |
| mem_malloc_end = dest_addr + CFG_MALLOC_LEN; |
| mem_malloc_brk = mem_malloc_start; |
| |
| memset ((void *) mem_malloc_start, 0, |
| mem_malloc_end - mem_malloc_start); |
| } |
| |
| void *sbrk (ptrdiff_t increment) |
| { |
| ulong old = mem_malloc_brk; |
| ulong new = old + increment; |
| |
| if ((new < mem_malloc_start) || (new > mem_malloc_end)) { |
| return (NULL); |
| } |
| mem_malloc_brk = new; |
| |
| return ((void *) old); |
| } |
| |
| /************************************************************************ |
| * Init Utilities * |
| ************************************************************************ |
| * Some of this code should be moved into the core functions, |
| * or dropped completely, |
| * but let's get it working (again) first... |
| */ |
| |
| static int init_baudrate (void) |
| { |
| DECLARE_GLOBAL_DATA_PTR; |
| |
| uchar tmp[64]; /* long enough for environment variables */ |
| int i = getenv_r ("baudrate", tmp, sizeof (tmp)); |
| |
| gd->baudrate = (i > 0) |
| ? (int) simple_strtoul (tmp, NULL, 10) |
| : CONFIG_BAUDRATE; |
| |
| return (0); |
| } |
| |
| static int display_banner (void) |
| { |
| |
| printf ("\n\n%s\n\n", version_string); |
| printf ("U-Boot code: %08lX -> %08lX BSS: -> %08lX\n", |
| _armboot_start, _armboot_end_data, _armboot_end); |
| #ifdef CONFIG_MODEM_SUPPORT |
| puts ("Modem Support enabled\n"); |
| #endif |
| #ifdef CONFIG_USE_IRQ |
| printf ("IRQ Stack: %08lx\n", IRQ_STACK_START); |
| printf ("FIQ Stack: %08lx\n", FIQ_STACK_START); |
| #endif |
| return (0); |
| } |
| |
| /* |
| * WARNING: this code looks "cleaner" than the PowerPC version, but |
| * has the disadvantage that you either get nothing, or everything. |
| * On PowerPC, you might see "DRAM: " before the system hangs - which |
| * gives a simple yet clear indication which part of the |
| * initialization if failing. |
| */ |
| static int display_dram_config (void) |
| { |
| DECLARE_GLOBAL_DATA_PTR; |
| int i; |
| |
| puts ("DRAM Configuration:\n"); |
| |
| for(i=0; i<CONFIG_NR_DRAM_BANKS; i++) { |
| printf ("Bank #%d: %08lx ", i, gd->bd->bi_dram[i].start); |
| print_size (gd->bd->bi_dram[i].size, "\n"); |
| } |
| |
| return (0); |
| } |
| |
| static void display_flash_config (ulong size) |
| { |
| puts ("Flash: "); |
| print_size (size, "\n"); |
| } |
| |
| |
| |
| /* |
| * Breath some life into the board... |
| * |
| * Initialize an SMC for serial comms, and carry out some hardware |
| * tests. |
| * |
| * The first part of initialization is running from Flash memory; |
| * its main purpose is to initialize the RAM so that we |
| * can relocate the monitor code to RAM. |
| */ |
| |
| /* |
| * All attempts to come up with a "common" initialization sequence |
| * that works for all boards and architectures failed: some of the |
| * requirements are just _too_ different. To get rid of the resulting |
| * mess of board dependend #ifdef'ed code we now make the whole |
| * initialization sequence configurable to the user. |
| * |
| * The requirements for any new initalization function is simple: it |
| * receives a pointer to the "global data" structure as it's only |
| * argument, and returns an integer return code, where 0 means |
| * "continue" and != 0 means "fatal error, hang the system". |
| */ |
| typedef int (init_fnc_t) (void); |
| |
| init_fnc_t *init_sequence[] = { |
| cpu_init, /* basic cpu dependent setup */ |
| board_init, /* basic board dependent setup */ |
| interrupt_init, /* set up exceptions */ |
| env_init, /* initialize environment */ |
| init_baudrate, /* initialze baudrate settings */ |
| serial_init, /* serial communications setup */ |
| display_banner, /* say that we are here */ |
| dram_init, /* configure available RAM banks */ |
| display_dram_config, |
| #if defined(CONFIG_VCMA9) |
| checkboard, |
| #endif |
| NULL, |
| }; |
| |
| void start_armboot (void) |
| { |
| DECLARE_GLOBAL_DATA_PTR; |
| |
| ulong size; |
| gd_t gd_data; |
| bd_t bd_data; |
| init_fnc_t **init_fnc_ptr; |
| char *s; |
| #if defined(CONFIG_VFD) |
| unsigned long addr; |
| #endif |
| |
| /* Pointer is writable since we allocated a register for it */ |
| gd = &gd_data; |
| memset (gd, 0, sizeof (gd_t)); |
| gd->bd = &bd_data; |
| memset (gd->bd, 0, sizeof (bd_t)); |
| |
| for (init_fnc_ptr = init_sequence; *init_fnc_ptr; ++init_fnc_ptr) { |
| if ((*init_fnc_ptr)() != 0) { |
| hang (); |
| } |
| } |
| |
| /* configure available FLASH banks */ |
| size = flash_init (); |
| display_flash_config (size); |
| |
| #ifdef CONFIG_VFD |
| # ifndef PAGE_SIZE |
| # define PAGE_SIZE 4096 |
| # endif |
| /* |
| * reserve memory for VFD display (always full pages) |
| */ |
| /* armboot_real_end is defined in the board-specific linker script */ |
| addr = (_armboot_real_end + (PAGE_SIZE - 1)) & ~(PAGE_SIZE - 1); |
| size = vfd_setmem (addr); |
| gd->fb_base = addr; |
| /* round to the next page boundary */ |
| addr += size; |
| addr = (addr + (PAGE_SIZE - 1)) & ~(PAGE_SIZE - 1); |
| mem_malloc_init (addr); |
| #else |
| /* armboot_real_end is defined in the board-specific linker script */ |
| mem_malloc_init (_armboot_real_end); |
| #endif /* CONFIG_VFD */ |
| |
| #if (CONFIG_COMMANDS & CFG_CMD_NAND) |
| nand_init(); /* go init the NAND */ |
| #endif |
| |
| /* initialize environment */ |
| env_relocate (); |
| |
| #ifdef CONFIG_VFD |
| /* must do this after the framebuffer is allocated */ |
| drv_vfd_init(); |
| #endif |
| |
| /* IP Address */ |
| bd_data.bi_ip_addr = getenv_IPaddr ("ipaddr"); |
| |
| /* MAC Address */ |
| { |
| int i; |
| ulong reg; |
| char *s, *e; |
| uchar tmp[64]; |
| |
| i = getenv_r ("ethaddr", tmp, sizeof (tmp)); |
| s = (i > 0) ? tmp : NULL; |
| |
| for (reg = 0; reg < 6; ++reg) { |
| bd_data.bi_enetaddr[reg] = s ? simple_strtoul (s, &e, 16) : 0; |
| if (s) |
| s = (*e) ? e + 1 : e; |
| } |
| } |
| |
| #if defined(CONFIG_MISC_INIT_R) |
| /* miscellaneous platform dependent initialisations */ |
| misc_init_r (); |
| #endif |
| |
| /* enable exceptions */ |
| enable_interrupts (); |
| |
| #ifdef CONFIG_DRIVER_CS8900 |
| cs8900_get_enetaddr (gd->bd->bi_enetaddr); |
| #endif |
| |
| /* Initialize from environment */ |
| if ((s = getenv ("loadaddr")) != NULL) { |
| load_addr = simple_strtoul (s, NULL, 16); |
| } |
| #if (CONFIG_COMMANDS & CFG_CMD_NET) |
| if ((s = getenv ("bootfile")) != NULL) { |
| copy_filename (BootFile, s, sizeof (BootFile)); |
| } |
| #endif /* CFG_CMD_NET */ |
| |
| #ifdef BOARD_POST_INIT |
| board_post_init (); |
| #endif |
| |
| /* main_loop() can return to retry autoboot, if so just run it again. */ |
| for (;;) { |
| main_loop (); |
| } |
| |
| /* NOTREACHED - no way out of command loop except booting */ |
| } |
| |
| void hang (void) |
| { |
| puts ("### ERROR ### Please RESET the board ###\n"); |
| for (;;); |
| } |
| |
| #ifdef CONFIG_MODEM_SUPPORT |
| /* called from main loop (common/main.c) */ |
| extern void dbg(const char *fmt, ...); |
| int mdm_init (void) |
| { |
| char env_str[16]; |
| char *init_str; |
| int i; |
| extern char console_buffer[]; |
| static inline void mdm_readline(char *buf, int bufsiz); |
| extern void enable_putc(void); |
| extern int hwflow_onoff(int); |
| |
| enable_putc(); /* enable serial_putc() */ |
| |
| #ifdef CONFIG_HWFLOW |
| init_str = getenv("mdm_flow_control"); |
| if (init_str && (strcmp(init_str, "rts/cts") == 0)) |
| hwflow_onoff (1); |
| else |
| hwflow_onoff(-1); |
| #endif |
| |
| for (i = 1;;i++) { |
| sprintf(env_str, "mdm_init%d", i); |
| if ((init_str = getenv(env_str)) != NULL) { |
| serial_puts(init_str); |
| serial_puts("\n"); |
| for(;;) { |
| mdm_readline(console_buffer, CFG_CBSIZE); |
| dbg("ini%d: [%s]", i, console_buffer); |
| |
| if ((strcmp(console_buffer, "OK") == 0) || |
| (strcmp(console_buffer, "ERROR") == 0)) { |
| dbg("ini%d: cmd done", i); |
| break; |
| } else /* in case we are originating call ... */ |
| if (strncmp(console_buffer, "CONNECT", 7) == 0) { |
| dbg("ini%d: connect", i); |
| return 0; |
| } |
| } |
| } else |
| break; /* no init string - stop modem init */ |
| |
| udelay(100000); |
| } |
| |
| udelay(100000); |
| |
| /* final stage - wait for connect */ |
| for(;i > 1;) { /* if 'i' > 1 - wait for connection |
| message from modem */ |
| mdm_readline(console_buffer, CFG_CBSIZE); |
| dbg("ini_f: [%s]", console_buffer); |
| if (strncmp(console_buffer, "CONNECT", 7) == 0) { |
| dbg("ini_f: connected"); |
| return 0; |
| } |
| } |
| |
| return 0; |
| } |
| |
| /* 'inline' - We have to do it fast */ |
| static inline void mdm_readline(char *buf, int bufsiz) |
| { |
| char c; |
| char *p; |
| int n; |
| |
| n = 0; |
| p = buf; |
| for(;;) { |
| c = serial_getc(); |
| |
| /* dbg("(%c)", c); */ |
| |
| switch(c) { |
| case '\r': |
| break; |
| case '\n': |
| *p = '\0'; |
| return; |
| |
| default: |
| if(n++ > bufsiz) { |
| *p = '\0'; |
| return; /* sanity check */ |
| } |
| *p = c; |
| p++; |
| break; |
| } |
| } |
| } |
| #endif /* CONFIG_MODEM_SUPPORT */ |