lib_avr32/board.c

   1 /*
   2  * Copyright (C) 2004-2006 Atmel Corporation
   3  *
   4  * See file CREDITS for list of people who contributed to this
   5  * project.
   6  *
   7  * This program is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU General Public License as
   9  * published by the Free Software Foundation; either version 2 of
  10  * the License, or (at your option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with this program; if not, write to the Free Software
  19  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  20  * MA 02111-1307 USA
  21  */
  22 #include <common.h>
  23 #include <command.h>
  24 #include <malloc.h>
  25 #include <stdio_dev.h>
  26 #include <timestamp.h>
  27 #include <version.h>
  28 #include <net.h>
  29
  30 #include <asm/initcalls.h>
  31 #include <asm/sections.h>
  32
  33 #ifndef CONFIG_IDENT_STRING
  34 #define CONFIG_IDENT_STRING ""
  35 #endif
  36
  37 DECLARE_GLOBAL_DATA_PTR;
  38
  39 const char version_string[] =
  40         U_BOOT_VERSION " ("U_BOOT_DATE" - "U_BOOT_TIME") " CONFIG_IDENT_STRING;
  41
  42 unsigned long monitor_flash_len;
  43
  44 /* Weak aliases for optional board functions */
  45 static int __do_nothing(void)
  46 {
  47         return 0;
  48 }
  49 int board_postclk_init(void) __attribute__((weak, alias("__do_nothing")));
  50 int board_early_init_r(void) __attribute__((weak, alias("__do_nothing")));
  51
  52 /* The malloc area is right below the monitor image in RAM */
  53 static void mem_malloc_init(void)
  54 {
  55         unsigned long monitor_addr;
  56
  57         monitor_addr = CONFIG_SYS_MONITOR_BASE + gd->reloc_off;
  58         mem_malloc_end = monitor_addr;
  59         mem_malloc_start = mem_malloc_end - CONFIG_SYS_MALLOC_LEN;
  60         mem_malloc_brk = mem_malloc_start;
  61
  62         printf("malloc: Using memory from 0x%08lx to 0x%08lx\n",
  63                mem_malloc_start, mem_malloc_end);
  64
  65         memset ((void *)mem_malloc_start, 0,
  66                 mem_malloc_end - mem_malloc_start);
  67 }
  68
  69 #ifdef CONFIG_SYS_DMA_ALLOC_LEN
  70 #include <asm/arch/cacheflush.h>
  71 #include <asm/io.h>
  72
  73 static unsigned long dma_alloc_start;
  74 static unsigned long dma_alloc_end;
  75 static unsigned long dma_alloc_brk;
  76
  77 static void dma_alloc_init(void)
  78 {
  79         unsigned long monitor_addr;
  80
  81         monitor_addr = CONFIG_SYS_MONITOR_BASE + gd->reloc_off;
  82         dma_alloc_end = monitor_addr - CONFIG_SYS_MALLOC_LEN;
  83         dma_alloc_start = dma_alloc_end - CONFIG_SYS_DMA_ALLOC_LEN;
  84         dma_alloc_brk = dma_alloc_start;
  85
  86         printf("DMA: Using memory from 0x%08lx to 0x%08lx\n",
  87                dma_alloc_start, dma_alloc_end);
  88
  89         dcache_invalidate_range(cached(dma_alloc_start),
  90                                 dma_alloc_end - dma_alloc_start);
  91 }
  92
  93 void *dma_alloc_coherent(size_t len, unsigned long *handle)
  94 {
  95         unsigned long paddr = dma_alloc_brk;
  96
  97         if (dma_alloc_brk + len > dma_alloc_end)
  98                 return NULL;
  99
 100         dma_alloc_brk = ((paddr + len + CONFIG_SYS_DCACHE_LINESZ - 1)
 101                          & ~(CONFIG_SYS_DCACHE_LINESZ - 1));
 102
 103         *handle = paddr;
 104         return uncached(paddr);
 105 }
 106 #else
 107 static inline void dma_alloc_init(void)
 108 {
 109
 110 }
 111 #endif
 112
 113 static int init_baudrate(void)
 114 {
 115         char tmp[64];
 116         int i;
 117
 118         i = getenv_r("baudrate", tmp, sizeof(tmp));
 119         if (i > 0) {
 120                 gd->baudrate = simple_strtoul(tmp, NULL, 10);
 121         } else {
 122                 gd->baudrate = CONFIG_BAUDRATE;
 123         }
 124         return 0;
 125 }
 126
 127
 128 static int display_banner (void)
 129 {
 130         printf ("\n\n%s\n\n", version_string);
 131         printf ("U-Boot code: %p -> %p  data: %p -> %p\n",
 132                 _text, _etext, _data, _end);
 133         return 0;
 134 }
 135
 136 void hang(void)
 137 {
 138         for (;;) ;
 139 }
 140
 141 static int display_dram_config (void)
 142 {
 143         int i;
 144
 145         puts ("DRAM Configuration:\n");
 146
 147         for (i = 0; i < CONFIG_NR_DRAM_BANKS; i++) {
 148                 printf ("Bank #%d: %08lx ", i, gd->bd->bi_dram[i].start);
 149                 print_size (gd->bd->bi_dram[i].size, "\n");
 150         }
 151
 152         return 0;
 153 }
 154
 155 static void display_flash_config (void)
 156 {
 157         puts ("Flash: ");
 158         print_size(gd->bd->bi_flashsize, " ");
 159         printf("at address 0x%08lx\n", gd->bd->bi_flashstart);
 160 }
 161
 162 void board_init_f(ulong board_type)
 163 {
 164         gd_t gd_data;
 165         gd_t *new_gd;
 166         bd_t *bd;
 167         unsigned long *new_sp;
 168         unsigned long monitor_len;
 169         unsigned long monitor_addr;
 170         unsigned long addr;
 171         long sdram_size;
 172
 173         /* Initialize the global data pointer */
 174         memset(&gd_data, 0, sizeof(gd_data));
 175         gd = &gd_data;
 176
 177         /* Perform initialization sequence */
 178         board_early_init_f();
 179         cpu_init();
 180         board_postclk_init();
 181         env_init();
 182         init_baudrate();
 183         serial_init();
 184         console_init_f();
 185         display_banner();
 186         sdram_size = initdram(board_type);
 187
 188         /* If we have no SDRAM, we can't go on */
 189         if (sdram_size <= 0)
 190                 panic("No working SDRAM available\n");
 191
 192         /*
 193          * Now that we have DRAM mapped and working, we can
 194          * relocate the code and continue running from DRAM.
 195          *
 196          * Reserve memory at end of RAM for (top down in that order):
 197          *  - u-boot image
 198          *  - heap for malloc()
 199          *  - board info struct
 200          *  - global data struct
 201          *  - stack
 202          */
 203         addr = CONFIG_SYS_SDRAM_BASE + sdram_size;
 204         monitor_len = _end - _text;
 205
 206         /*
 207          * Reserve memory for u-boot code, data and bss.
 208          * Round down to next 4 kB limit.
 209          */
 210         addr -= monitor_len;
 211         addr &= ~(4096UL - 1);
 212         monitor_addr = addr;
 213
 214         /* Reserve memory for malloc() */
 215         addr -= CONFIG_SYS_MALLOC_LEN;
 216
 217 #ifdef CONFIG_SYS_DMA_ALLOC_LEN
 218         /* Reserve DMA memory (must be cache aligned) */
 219         addr &= ~(CONFIG_SYS_DCACHE_LINESZ - 1);
 220         addr -= CONFIG_SYS_DMA_ALLOC_LEN;
 221 #endif
 222
 223 #ifdef CONFIG_LCD
 224 #ifdef CONFIG_FB_ADDR
 225         printf("LCD: Frame buffer allocated at preset 0x%08x\n",
 226                CONFIG_FB_ADDR);
 227         gd->fb_base = (void *)CONFIG_FB_ADDR;
 228 #else
 229         addr = lcd_setmem(addr);
 230         printf("LCD: Frame buffer allocated at 0x%08lx\n", addr);
 231         gd->fb_base = (void *)addr;
 232 #endif /* CONFIG_FB_ADDR */
 233 #endif /* CONFIG_LCD */
 234
 235         /* Allocate a Board Info struct on a word boundary */
 236         addr -= sizeof(bd_t);
 237         addr &= ~3UL;
 238         gd->bd = bd = (bd_t *)addr;
 239
 240         /* Allocate a new global data copy on a 8-byte boundary. */
 241         addr -= sizeof(gd_t);
 242         addr &= ~7UL;
 243         new_gd = (gd_t *)addr;
 244
 245         /* And finally, a new, bigger stack. */
 246         new_sp = (unsigned long *)addr;
 247         gd->stack_end = addr;
 248         *(--new_sp) = 0;
 249         *(--new_sp) = 0;
 250
 251         /*
 252          * Initialize the board information struct with the
 253          * information we have.
 254          */
 255         bd->bi_dram[0].start = CONFIG_SYS_SDRAM_BASE;
 256         bd->bi_dram[0].size = sdram_size;
 257         bd->bi_baudrate = gd->baudrate;
 258
 259         memcpy(new_gd, gd, sizeof(gd_t));
 260
 261         relocate_code((unsigned long)new_sp, new_gd, monitor_addr);
 262 }
 263
 264 void board_init_r(gd_t *new_gd, ulong dest_addr)
 265 {
 266         extern void malloc_bin_reloc (void);
 267 #ifndef CONFIG_ENV_IS_NOWHERE
 268         extern char * env_name_spec;
 269 #endif
 270         char *s;
 271         cmd_tbl_t *cmdtp;
 272         bd_t *bd;
 273
 274         gd = new_gd;
 275         bd = gd->bd;
 276
 277         gd->flags |= GD_FLG_RELOC;
 278         gd->reloc_off = dest_addr - CONFIG_SYS_MONITOR_BASE;
 279
 280         board_early_init_r();
 281
 282         monitor_flash_len = _edata - _text;
 283
 284         /*
 285          * We have to relocate the command table manually
 286          */
 287         for (cmdtp = &__u_boot_cmd_start;
 288              cmdtp !=  &__u_boot_cmd_end; cmdtp++) {
 289                 unsigned long addr;
 290
 291                 addr = (unsigned long)cmdtp->cmd + gd->reloc_off;
 292                 cmdtp->cmd = (typeof(cmdtp->cmd))addr;
 293
 294                 addr = (unsigned long)cmdtp->name + gd->reloc_off;
 295                 cmdtp->name = (typeof(cmdtp->name))addr;
 296
 297                 if (cmdtp->usage) {
 298                         addr = (unsigned long)cmdtp->usage + gd->reloc_off;
 299                         cmdtp->usage = (typeof(cmdtp->usage))addr;
 300                 }
 301 #ifdef CONFIG_SYS_LONGHELP
 302                 if (cmdtp->help) {
 303                         addr = (unsigned long)cmdtp->help + gd->reloc_off;
 304                         cmdtp->help = (typeof(cmdtp->help))addr;
 305                 }
 306 #endif
 307         }
 308
 309         /* there are some other pointer constants we must deal with */
 310 #ifndef CONFIG_ENV_IS_NOWHERE
 311         env_name_spec += gd->reloc_off;
 312 #endif
 313
 314         timer_init();
 315         mem_malloc_init();
 316         malloc_bin_reloc();
 317         dma_alloc_init();
 318
 319         enable_interrupts();
 320
 321         bd->bi_flashstart = 0;
 322         bd->bi_flashsize = 0;
 323         bd->bi_flashoffset = 0;
 324
 325 #ifndef CONFIG_SYS_NO_FLASH
 326         bd->bi_flashstart = CONFIG_SYS_FLASH_BASE;
 327         bd->bi_flashsize = flash_init();
 328         bd->bi_flashoffset = (unsigned long)_edata - (unsigned long)_text;
 329
 330         if (bd->bi_flashsize)
 331                 display_flash_config();
 332 #endif
 333
 334         if (bd->bi_dram[0].size)
 335                 display_dram_config();
 336
 337         gd->bd->bi_boot_params = malloc(CONFIG_SYS_BOOTPARAMS_LEN);
 338         if (!gd->bd->bi_boot_params)
 339                 puts("WARNING: Cannot allocate space for boot parameters\n");
 340
 341         /* initialize environment */
 342         env_relocate();
 343
 344         bd->bi_ip_addr = getenv_IPaddr ("ipaddr");
 345
 346         stdio_init();
 347         jumptable_init();
 348         console_init_r();
 349
 350         s = getenv("loadaddr");
 351         if (s)
 352                 load_addr = simple_strtoul(s, NULL, 16);
 353
 354 #if defined(CONFIG_CMD_NET)
 355         s = getenv("bootfile");
 356         if (s)
 357                 copy_filename(BootFile, s, sizeof(BootFile));
 358 #if defined(CONFIG_NET_MULTI)
 359         puts("Net:   ");
 360 #endif
 361         eth_initialize(gd->bd);
 362 #endif
 363
 364         for (;;) {
 365                 main_loop();
 366         }
 367 }