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