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