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