lib_nios/board.c

   1 /*
   2  * (C) Copyright 2003, Psyent Corporation <www.psyent.com>
   3  * Scott McNutt <smcnutt@psyent.com>
   4  *
   5  * (C) Copyright 2000-2002
   6  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
   7  *
   8  * See file CREDITS for list of people who contributed to this
   9  * project.
  10  *
  11  * This program is free software; you can redistribute it and/or
  12  * modify it under the terms of the GNU General Public License as
  13  * published by the Free Software Foundation; either version 2 of
  14  * the License, or (at your option) any later version.
  15  *
  16  * This program is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  * GNU General Public License for more details.
  20  *
  21  * You should have received a copy of the GNU General Public License
  22  * along with this program; if not, write to the Free Software
  23  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  24  * MA 02111-1307 USA
  25  */
  26
  27 #include <common.h>
  28 #include <devices.h>
  29 #include <watchdog.h>
  30 #include <net.h>
  31 #ifdef CONFIG_STATUS_LED
  32 #include <status_led.h>
  33 #endif
  34
  35 DECLARE_GLOBAL_DATA_PTR;
  36
  37 /*
  38  * All attempts to come up with a "common" initialization sequence
  39  * that works for all boards and architectures failed: some of the
  40  * requirements are just _too_ different. To get rid of the resulting
  41  * mess of board dependend #ifdef'ed code we now make the whole
  42  * initialization sequence configurable to the user.
  43  *
  44  * The requirements for any new initalization function is simple: it
  45  * receives a pointer to the "global data" structure as it's only
  46  * argument, and returns an integer return code, where 0 means
  47  * "continue" and != 0 means "fatal error, hang the system".
  48  */
  49
  50
  51 extern void malloc_bin_reloc (void);
  52 typedef int (init_fnc_t) (void);
  53
  54 /*
  55  * Begin and End of memory area for malloc(), and current "brk"
  56  */
  57 static  ulong   mem_malloc_start = 0;
  58 static  ulong   mem_malloc_end   = 0;
  59 static  ulong   mem_malloc_brk   = 0;
  60
  61 /*
  62  * The Malloc area is immediately below the monitor copy in RAM
  63  */
  64 static void mem_malloc_init (void)
  65 {
  66         mem_malloc_start = CONFIG_SYS_MALLOC_BASE;
  67         mem_malloc_end = mem_malloc_start + CONFIG_SYS_MALLOC_LEN;
  68         mem_malloc_brk = mem_malloc_start;
  69         memset ((void *) mem_malloc_start,
  70                 0,
  71                 mem_malloc_end - mem_malloc_start);
  72 }
  73
  74 void *sbrk (ptrdiff_t increment)
  75 {
  76         ulong old = mem_malloc_brk;
  77         ulong new = old + increment;
  78
  79         if ((new < mem_malloc_start) || (new > mem_malloc_end)) {
  80                 return (NULL);
  81         }
  82         mem_malloc_brk = new;
  83         return ((void *) old);
  84 }
  85
  86
  87 /************************************************************************
  88  * Initialization sequence                                              *
  89  ***********************************************************************/
  90
  91 init_fnc_t *init_sequence[] = {
  92
  93 #if defined(CONFIG_BOARD_EARLY_INIT_F)
  94         board_early_init_f,     /* Call board-specific init code early.*/
  95 #endif
  96
  97         env_init,
  98         serial_init,
  99         console_init_f,
 100         display_options,
 101         checkcpu,
 102         checkboard,
 103         NULL,                   /* Terminate this list */
 104 };
 105
 106
 107 /***********************************************************************/
 108 void board_init (void)
 109 {
 110         bd_t *bd;
 111         init_fnc_t **init_fnc_ptr;
 112         char *s, *e;
 113         int i;
 114
 115         /* Pointer is writable since we allocated a register for it.
 116          * Nios treats CONFIG_SYS_GBL_DATA_OFFSET as an address.
 117          */
 118         gd = (gd_t *)CONFIG_SYS_GBL_DATA_OFFSET;
 119         /* compiler optimization barrier needed for GCC >= 3.4 */
 120         __asm__ __volatile__("": : :"memory");
 121
 122         memset( gd, 0, CONFIG_SYS_GBL_DATA_SIZE );
 123
 124         gd->bd = (bd_t *)(gd+1);        /* At end of global data */
 125         gd->baudrate = CONFIG_BAUDRATE;
 126         gd->cpu_clk = CONFIG_SYS_CLK_FREQ;
 127
 128         bd = gd->bd;
 129         bd->bi_memstart = CONFIG_SYS_SDRAM_BASE;
 130         bd->bi_memsize = CONFIG_SYS_SDRAM_SIZE;
 131         bd->bi_flashstart = CONFIG_SYS_FLASH_BASE;
 132 #if     defined(CONFIG_SYS_SRAM_BASE) && defined(CONFIG_SYS_SRAM_SIZE)
 133         bd->bi_sramstart= CONFIG_SYS_SRAM_BASE;
 134         bd->bi_sramsize = CONFIG_SYS_SRAM_SIZE;
 135 #endif
 136         bd->bi_baudrate = CONFIG_BAUDRATE;
 137
 138         for (init_fnc_ptr = init_sequence; *init_fnc_ptr; ++init_fnc_ptr) {
 139                 WATCHDOG_RESET ();
 140                 if ((*init_fnc_ptr) () != 0) {
 141                         hang ();
 142                 }
 143         }
 144
 145         WATCHDOG_RESET ();
 146         bd->bi_flashsize = flash_init();
 147
 148         WATCHDOG_RESET ();
 149         mem_malloc_init();
 150         malloc_bin_reloc();
 151         env_relocate();
 152
 153         bd->bi_ip_addr = getenv_IPaddr ("ipaddr");
 154         s = getenv ("ethaddr");
 155         for (i = 0; i < 6; ++i) {
 156                 bd->bi_enetaddr[i] = s ? simple_strtoul (s, &e, 16) : 0;
 157                 if (s) s = (*e) ? e + 1 : e;
 158         }
 159
 160         WATCHDOG_RESET ();
 161         devices_init();
 162         jumptable_init();
 163         console_init_r();
 164         /*
 165          */
 166
 167         WATCHDOG_RESET ();
 168         interrupt_init ();
 169
 170 #ifdef CONFIG_STATUS_LED
 171         status_led_set(STATUS_LED_BOOT, STATUS_LED_BLINKING);
 172 #endif
 173
 174         /* main_loop */
 175         for (;;) {
 176                 WATCHDOG_RESET ();
 177                 main_loop ();
 178         }
 179 }
 180
 181
 182 /***********************************************************************/
 183
 184 void hang (void)
 185 {
 186 #ifdef CONFIG_STATUS_LED
 187         status_led_set(STATUS_LED_BOOT, STATUS_LED_OFF);
 188         status_led_set(STATUS_LED_RED, STATUS_LED_BLINKING);
 189 #endif
 190         puts("### ERROR ### Please reset board ###\n");
 191         for (;;);
 192 }
 193
 194 unsigned long do_go_exec (ulong (*entry)(int, char *[]), int argc, char *argv[])
 195 {
 196         /*
 197          * x86 does not use a dedicated register to pass the pointer
 198          * to the global_data
 199          */
 200         argv[-1] = (char *)gd;
 201         return entry (argc, argv);
 202 }