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