1 /* 2 * (C) Copyright 2008 Semihalf 3 * 4 * (C) Copyright 2000-2006 5 * Wolfgang Denk, DENX Software Engineering, wd@denx.de. 6 * 7 * See file CREDITS for list of people who contributed to this 8 * project. 9 * 10 * This program is free software; you can redistribute it and/or 11 * modify it under the terms of the GNU General Public License as 12 * published by the Free Software Foundation; either version 2 of 13 * the License, or (at your option) any later version. 14 * 15 * This program is distributed in the hope that it will be useful, 16 * but WITHOUT ANY WARRANTY; without even the implied warranty of 17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 18 * GNU General Public License for more details. 19 * 20 * You should have received a copy of the GNU General Public License 21 * along with this program; if not, write to the Free Software 22 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, 23 * MA 02111-1307 USA 24 */ 25 26 27 #include <common.h> 28 #include <watchdog.h> 29 #include <command.h> 30 #include <image.h> 31 #include <malloc.h> 32 #include <u-boot/zlib.h> 33 #include <bzlib.h> 34 #include <environment.h> 35 #include <asm/byteorder.h> 36 #include <asm/mp.h> 37 38 #if defined(CONFIG_OF_LIBFDT) 39 #include <libfdt.h> 40 #include <fdt_support.h> 41 #endif 42 43 #ifdef CONFIG_SYS_INIT_RAM_LOCK 44 #include <asm/cache.h> 45 #endif 46 47 DECLARE_GLOBAL_DATA_PTR; 48 49 extern ulong get_effective_memsize(void); 50 static ulong get_sp (void); 51 static void set_clocks_in_mhz (bd_t *kbd); 52 53 #ifndef CONFIG_SYS_LINUX_LOWMEM_MAX_SIZE 54 #define CONFIG_SYS_LINUX_LOWMEM_MAX_SIZE (768*1024*1024) 55 #endif 56 57 static void boot_jump_linux(bootm_headers_t *images) 58 { 59 void (*kernel)(bd_t *, ulong r4, ulong r5, ulong r6, 60 ulong r7, ulong r8, ulong r9); 61 #ifdef CONFIG_OF_LIBFDT 62 char *of_flat_tree = images->ft_addr; 63 #endif 64 65 kernel = (void (*)(bd_t *, ulong, ulong, ulong, 66 ulong, ulong, ulong))images->ep; 67 debug ("## Transferring control to Linux (at address %08lx) ...\n", 68 (ulong)kernel); 69 70 bootstage_mark(BOOTSTAGE_ID_RUN_OS); 71 72 #if defined(CONFIG_SYS_INIT_RAM_LOCK) && !defined(CONFIG_E500) 73 unlock_ram_in_cache(); 74 #endif 75 76 #if defined(CONFIG_OF_LIBFDT) 77 if (of_flat_tree) { /* device tree; boot new style */ 78 /* 79 * Linux Kernel Parameters (passing device tree): 80 * r3: pointer to the fdt 81 * r4: 0 82 * r5: 0 83 * r6: epapr magic 84 * r7: size of IMA in bytes 85 * r8: 0 86 * r9: 0 87 */ 88 debug (" Booting using OF flat tree...\n"); 89 WATCHDOG_RESET (); 90 (*kernel) ((bd_t *)of_flat_tree, 0, 0, EPAPR_MAGIC, 91 getenv_bootm_mapsize(), 0, 0); 92 /* does not return */ 93 } else 94 #endif 95 { 96 /* 97 * Linux Kernel Parameters (passing board info data): 98 * r3: ptr to board info data 99 * r4: initrd_start or 0 if no initrd 100 * r5: initrd_end - unused if r4 is 0 101 * r6: Start of command line string 102 * r7: End of command line string 103 * r8: 0 104 * r9: 0 105 */ 106 ulong cmd_start = images->cmdline_start; 107 ulong cmd_end = images->cmdline_end; 108 ulong initrd_start = images->initrd_start; 109 ulong initrd_end = images->initrd_end; 110 bd_t *kbd = images->kbd; 111 112 debug (" Booting using board info...\n"); 113 WATCHDOG_RESET (); 114 (*kernel) (kbd, initrd_start, initrd_end, 115 cmd_start, cmd_end, 0, 0); 116 /* does not return */ 117 } 118 return ; 119 } 120 121 void arch_lmb_reserve(struct lmb *lmb) 122 { 123 phys_size_t bootm_size; 124 ulong size, sp, bootmap_base; 125 126 bootmap_base = getenv_bootm_low(); 127 bootm_size = getenv_bootm_size(); 128 129 #ifdef DEBUG 130 if (((u64)bootmap_base + bootm_size) > 131 (CONFIG_SYS_SDRAM_BASE + (u64)gd->ram_size)) 132 puts("WARNING: bootm_low + bootm_size exceed total memory\n"); 133 if ((bootmap_base + bootm_size) > get_effective_memsize()) 134 puts("WARNING: bootm_low + bootm_size exceed eff. memory\n"); 135 #endif 136 137 size = min(bootm_size, get_effective_memsize()); 138 size = min(size, CONFIG_SYS_LINUX_LOWMEM_MAX_SIZE); 139 140 if (size < bootm_size) { 141 ulong base = bootmap_base + size; 142 printf("WARNING: adjusting available memory to %lx\n", size); 143 lmb_reserve(lmb, base, bootm_size - size); 144 } 145 146 /* 147 * Booting a (Linux) kernel image 148 * 149 * Allocate space for command line and board info - the 150 * address should be as high as possible within the reach of 151 * the kernel (see CONFIG_SYS_BOOTMAPSZ settings), but in unused 152 * memory, which means far enough below the current stack 153 * pointer. 154 */ 155 sp = get_sp(); 156 debug ("## Current stack ends at 0x%08lx\n", sp); 157 158 /* adjust sp by 4K to be safe */ 159 sp -= 4096; 160 lmb_reserve(lmb, sp, (CONFIG_SYS_SDRAM_BASE + get_effective_memsize() - sp)); 161 162 #ifdef CONFIG_MP 163 cpu_mp_lmb_reserve(lmb); 164 #endif 165 166 return ; 167 } 168 169 static void boot_prep_linux(bootm_headers_t *images) 170 { 171 #ifdef CONFIG_MP 172 /* 173 * if we are MP make sure to flush the device tree so any changes are 174 * made visibile to all other cores. In AMP boot scenarios the cores 175 * might not be HW cache coherent with each other. 176 */ 177 flush_cache((unsigned long)images->ft_addr, images->ft_len); 178 #endif 179 } 180 181 static int boot_cmdline_linux(bootm_headers_t *images) 182 { 183 ulong of_size = images->ft_len; 184 struct lmb *lmb = &images->lmb; 185 ulong *cmd_start = &images->cmdline_start; 186 ulong *cmd_end = &images->cmdline_end; 187 188 int ret = 0; 189 190 if (!of_size) { 191 /* allocate space and init command line */ 192 ret = boot_get_cmdline (lmb, cmd_start, cmd_end); 193 if (ret) { 194 puts("ERROR with allocation of cmdline\n"); 195 return ret; 196 } 197 } 198 199 return ret; 200 } 201 202 static int boot_bd_t_linux(bootm_headers_t *images) 203 { 204 ulong of_size = images->ft_len; 205 struct lmb *lmb = &images->lmb; 206 bd_t **kbd = &images->kbd; 207 208 int ret = 0; 209 210 if (!of_size) { 211 /* allocate space for kernel copy of board info */ 212 ret = boot_get_kbd (lmb, kbd); 213 if (ret) { 214 puts("ERROR with allocation of kernel bd\n"); 215 return ret; 216 } 217 set_clocks_in_mhz(*kbd); 218 } 219 220 return ret; 221 } 222 223 static int boot_body_linux(bootm_headers_t *images) 224 { 225 int ret; 226 227 /* allocate space for kernel copy of board info */ 228 ret = boot_bd_t_linux(images); 229 if (ret) 230 return ret; 231 232 ret = image_setup_linux(images); 233 if (ret) 234 return ret; 235 236 return 0; 237 } 238 239 noinline 240 int do_bootm_linux(int flag, int argc, char * const argv[], bootm_headers_t *images) 241 { 242 int ret; 243 244 if (flag & BOOTM_STATE_OS_CMDLINE) { 245 boot_cmdline_linux(images); 246 return 0; 247 } 248 249 if (flag & BOOTM_STATE_OS_BD_T) { 250 boot_bd_t_linux(images); 251 return 0; 252 } 253 254 if (flag & BOOTM_STATE_OS_PREP) { 255 boot_prep_linux(images); 256 return 0; 257 } 258 259 if (flag & BOOTM_STATE_OS_GO) { 260 boot_jump_linux(images); 261 return 0; 262 } 263 264 boot_prep_linux(images); 265 ret = boot_body_linux(images); 266 if (ret) 267 return ret; 268 boot_jump_linux(images); 269 270 return 0; 271 } 272 273 static ulong get_sp (void) 274 { 275 ulong sp; 276 277 asm( "mr %0,1": "=r"(sp) : ); 278 return sp; 279 } 280 281 static void set_clocks_in_mhz (bd_t *kbd) 282 { 283 char *s; 284 285 if ((s = getenv ("clocks_in_mhz")) != NULL) { 286 /* convert all clock information to MHz */ 287 kbd->bi_intfreq /= 1000000L; 288 kbd->bi_busfreq /= 1000000L; 289 #if defined(CONFIG_CPM2) 290 kbd->bi_cpmfreq /= 1000000L; 291 kbd->bi_brgfreq /= 1000000L; 292 kbd->bi_sccfreq /= 1000000L; 293 kbd->bi_vco /= 1000000L; 294 #endif 295 #if defined(CONFIG_MPC5xxx) 296 kbd->bi_ipbfreq /= 1000000L; 297 kbd->bi_pcifreq /= 1000000L; 298 #endif /* CONFIG_MPC5xxx */ 299 } 300 } 301