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