xref: /openbmc/u-boot/common/spl/spl.c (revision ebe621d5fb2f5c15aff50e0610372f2751fd152f)
1 /*
2  * (C) Copyright 2010
3  * Texas Instruments, <www.ti.com>
4  *
5  * Aneesh V <aneesh@ti.com>
6  *
7  * SPDX-License-Identifier:	GPL-2.0+
8  */
9 #include <common.h>
10 #include <dm.h>
11 #include <spl.h>
12 #include <asm/u-boot.h>
13 #include <nand.h>
14 #include <fat.h>
15 #include <version.h>
16 #include <image.h>
17 #include <malloc.h>
18 #include <dm/root.h>
19 #include <linux/compiler.h>
20 
21 DECLARE_GLOBAL_DATA_PTR;
22 
23 #ifndef CONFIG_SYS_UBOOT_START
24 #define CONFIG_SYS_UBOOT_START	CONFIG_SYS_TEXT_BASE
25 #endif
26 #ifndef CONFIG_SYS_MONITOR_LEN
27 /* Unknown U-Boot size, let's assume it will not be more than 200 KB */
28 #define CONFIG_SYS_MONITOR_LEN	(200 * 1024)
29 #endif
30 
31 u32 *boot_params_ptr = NULL;
32 struct spl_image_info spl_image;
33 
34 /* Define board data structure */
35 static bd_t bdata __attribute__ ((section(".data")));
36 
37 /*
38  * Board-specific Platform code can reimplement show_boot_progress () if needed
39  */
40 __weak void show_boot_progress(int val) {}
41 
42 /*
43  * Default function to determine if u-boot or the OS should
44  * be started. This implementation always returns 1.
45  *
46  * Please implement your own board specific funcion to do this.
47  *
48  * RETURN
49  * 0 to not start u-boot
50  * positive if u-boot should start
51  */
52 #ifdef CONFIG_SPL_OS_BOOT
53 __weak int spl_start_uboot(void)
54 {
55 	puts("SPL: Please implement spl_start_uboot() for your board\n");
56 	puts("SPL: Direct Linux boot not active!\n");
57 	return 1;
58 }
59 #endif
60 
61 /*
62  * Weak default function for board specific cleanup/preparation before
63  * Linux boot. Some boards/platforms might not need it, so just provide
64  * an empty stub here.
65  */
66 __weak void spl_board_prepare_for_linux(void)
67 {
68 	/* Nothing to do! */
69 }
70 
71 __weak void spl_board_prepare_for_boot(void)
72 {
73 	/* Nothing to do! */
74 }
75 
76 void spl_set_header_raw_uboot(void)
77 {
78 	spl_image.size = CONFIG_SYS_MONITOR_LEN;
79 	spl_image.entry_point = CONFIG_SYS_UBOOT_START;
80 	spl_image.load_addr = CONFIG_SYS_TEXT_BASE;
81 	spl_image.os = IH_OS_U_BOOT;
82 	spl_image.name = "U-Boot";
83 }
84 
85 int spl_parse_image_header(const struct image_header *header)
86 {
87 	u32 header_size = sizeof(struct image_header);
88 
89 	if (image_get_magic(header) == IH_MAGIC) {
90 		if (spl_image.flags & SPL_COPY_PAYLOAD_ONLY) {
91 			/*
92 			 * On some system (e.g. powerpc), the load-address and
93 			 * entry-point is located at address 0. We can't load
94 			 * to 0-0x40. So skip header in this case.
95 			 */
96 			spl_image.load_addr = image_get_load(header);
97 			spl_image.entry_point = image_get_ep(header);
98 			spl_image.size = image_get_data_size(header);
99 		} else {
100 			spl_image.entry_point = image_get_load(header);
101 			/* Load including the header */
102 			spl_image.load_addr = spl_image.entry_point -
103 				header_size;
104 			spl_image.size = image_get_data_size(header) +
105 				header_size;
106 		}
107 		spl_image.os = image_get_os(header);
108 		spl_image.name = image_get_name(header);
109 		debug("spl: payload image: %.*s load addr: 0x%x size: %d\n",
110 			(int)sizeof(spl_image.name), spl_image.name,
111 			spl_image.load_addr, spl_image.size);
112 	} else {
113 #ifdef CONFIG_SPL_PANIC_ON_RAW_IMAGE
114 		/*
115 		 * CONFIG_SPL_PANIC_ON_RAW_IMAGE is defined when the
116 		 * code which loads images in SPL cannot guarantee that
117 		 * absolutely all read errors will be reported.
118 		 * An example is the LPC32XX MLC NAND driver, which
119 		 * will consider that a completely unreadable NAND block
120 		 * is bad, and thus should be skipped silently.
121 		 */
122 		panic("** no mkimage signature but raw image not supported");
123 #elif defined(CONFIG_SPL_ABORT_ON_RAW_IMAGE)
124 		/* Signature not found, proceed to other boot methods. */
125 		return -EINVAL;
126 #else
127 		/* Signature not found - assume u-boot.bin */
128 		debug("mkimage signature not found - ih_magic = %x\n",
129 			header->ih_magic);
130 		spl_set_header_raw_uboot();
131 #endif
132 	}
133 	return 0;
134 }
135 
136 __weak void __noreturn jump_to_image_no_args(struct spl_image_info *spl_image)
137 {
138 	typedef void __noreturn (*image_entry_noargs_t)(void);
139 
140 	image_entry_noargs_t image_entry =
141 		(image_entry_noargs_t)(unsigned long)spl_image->entry_point;
142 
143 	debug("image entry point: 0x%X\n", spl_image->entry_point);
144 	image_entry();
145 }
146 
147 #ifndef CONFIG_SPL_LOAD_FIT_ADDRESS
148 # define CONFIG_SPL_LOAD_FIT_ADDRESS	0
149 #endif
150 
151 #ifdef CONFIG_SPL_RAM_DEVICE
152 static ulong spl_ram_load_read(struct spl_load_info *load, ulong sector,
153 			       ulong count, void *buf)
154 {
155 	debug("%s: sector %lx, count %lx, buf %lx\n",
156 	      __func__, sector, count, (ulong)buf);
157 	memcpy(buf, (void *)(CONFIG_SPL_LOAD_FIT_ADDRESS + sector), count);
158 	return count;
159 }
160 
161 static int spl_ram_load_image(void)
162 {
163 	struct image_header *header;
164 
165 	header = (struct image_header *)CONFIG_SPL_LOAD_FIT_ADDRESS;
166 
167 	if (IS_ENABLED(CONFIG_SPL_LOAD_FIT) &&
168 	    image_get_magic(header) == FDT_MAGIC) {
169 		struct spl_load_info load;
170 
171 		debug("Found FIT\n");
172 		load.bl_len = 1;
173 		load.read = spl_ram_load_read;
174 		spl_load_simple_fit(&load, 0, header);
175 	} else {
176 		debug("Legacy image\n");
177 		/*
178 		 * Get the header.  It will point to an address defined by
179 		 * handoff which will tell where the image located inside
180 		 * the flash. For now, it will temporary fixed to address
181 		 * pointed by U-Boot.
182 		 */
183 		header = (struct image_header *)
184 			(CONFIG_SYS_TEXT_BASE -	sizeof(struct image_header));
185 
186 		spl_parse_image_header(header);
187 	}
188 
189 	return 0;
190 }
191 #endif
192 
193 int spl_init(void)
194 {
195 	int ret;
196 
197 	debug("spl_init()\n");
198 #if defined(CONFIG_SYS_MALLOC_F_LEN)
199 #ifdef CONFIG_MALLOC_F_ADDR
200 	gd->malloc_base = CONFIG_MALLOC_F_ADDR;
201 #endif
202 	gd->malloc_limit = CONFIG_SYS_MALLOC_F_LEN;
203 	gd->malloc_ptr = 0;
204 #endif
205 	if (CONFIG_IS_ENABLED(OF_CONTROL) && !CONFIG_IS_ENABLED(OF_PLATDATA)) {
206 		ret = fdtdec_setup();
207 		if (ret) {
208 			debug("fdtdec_setup() returned error %d\n", ret);
209 			return ret;
210 		}
211 	}
212 	if (IS_ENABLED(CONFIG_SPL_DM)) {
213 		/* With CONFIG_OF_PLATDATA, bring in all devices */
214 		ret = dm_init_and_scan(!CONFIG_IS_ENABLED(OF_PLATDATA));
215 		if (ret) {
216 			debug("dm_init_and_scan() returned error %d\n", ret);
217 			return ret;
218 		}
219 	}
220 	gd->flags |= GD_FLG_SPL_INIT;
221 
222 	return 0;
223 }
224 
225 #ifndef BOOT_DEVICE_NONE
226 #define BOOT_DEVICE_NONE 0xdeadbeef
227 #endif
228 
229 static u32 spl_boot_list[] = {
230 	BOOT_DEVICE_NONE,
231 	BOOT_DEVICE_NONE,
232 	BOOT_DEVICE_NONE,
233 	BOOT_DEVICE_NONE,
234 	BOOT_DEVICE_NONE,
235 };
236 
237 __weak void board_boot_order(u32 *spl_boot_list)
238 {
239 	spl_boot_list[0] = spl_boot_device();
240 }
241 
242 #ifdef CONFIG_SPL_BOARD_LOAD_IMAGE
243 __weak void spl_board_announce_boot_device(void) { }
244 #endif
245 
246 #ifdef CONFIG_SPL_LIBCOMMON_SUPPORT
247 struct boot_device_name {
248 	u32 boot_dev;
249 	const char *name;
250 };
251 
252 struct boot_device_name boot_name_table[] = {
253 #ifdef CONFIG_SPL_RAM_DEVICE
254 	{ BOOT_DEVICE_RAM, "RAM" },
255 #endif
256 #ifdef CONFIG_SPL_MMC_SUPPORT
257 	{ BOOT_DEVICE_MMC1, "MMC1" },
258 	{ BOOT_DEVICE_MMC2, "MMC2" },
259 	{ BOOT_DEVICE_MMC2_2, "MMC2_2" },
260 #endif
261 #ifdef CONFIG_SPL_NAND_SUPPORT
262 	{ BOOT_DEVICE_NAND, "NAND" },
263 #endif
264 #ifdef CONFIG_SPL_ONENAND_SUPPORT
265 	{ BOOT_DEVICE_ONENAND, "OneNAND" },
266 #endif
267 #ifdef CONFIG_SPL_NOR_SUPPORT
268 	{ BOOT_DEVICE_NOR, "NOR" },
269 #endif
270 #ifdef CONFIG_SPL_YMODEM_SUPPORT
271 	{ BOOT_DEVICE_UART, "UART" },
272 #endif
273 #ifdef CONFIG_SPL_SPI_SUPPORT
274 	{ BOOT_DEVICE_SPI, "SPI" },
275 #endif
276 #ifdef CONFIG_SPL_ETH_SUPPORT
277 #ifdef CONFIG_SPL_ETH_DEVICE
278 	{ BOOT_DEVICE_CPGMAC, "eth device" },
279 #else
280 	{ BOOT_DEVICE_CPGMAC, "net" },
281 #endif
282 #endif
283 #ifdef CONFIG_SPL_USBETH_SUPPORT
284 	{ BOOT_DEVICE_USBETH, "USB eth" },
285 #endif
286 #ifdef CONFIG_SPL_USB_SUPPORT
287 	{ BOOT_DEVICE_USB, "USB" },
288 #endif
289 #ifdef CONFIG_SPL_SATA_SUPPORT
290 	{ BOOT_DEVICE_SATA, "SATA" },
291 #endif
292 	/* Keep this entry last */
293 	{ BOOT_DEVICE_NONE, "unknown boot device" },
294 };
295 
296 static void announce_boot_device(u32 boot_device)
297 {
298 	int i;
299 
300 	puts("Trying to boot from ");
301 
302 #ifdef CONFIG_SPL_BOARD_LOAD_IMAGE
303 	if (boot_device == BOOT_DEVICE_BOARD) {
304 		spl_board_announce_boot_device();
305 		puts("\n");
306 		return;
307 	}
308 #endif
309 	for (i = 0; i < ARRAY_SIZE(boot_name_table) - 1; i++) {
310 		if (boot_name_table[i].boot_dev == boot_device)
311 			break;
312 	}
313 
314 	printf("%s\n", boot_name_table[i].name);
315 }
316 #else
317 static inline void announce_boot_device(u32 boot_device) { }
318 #endif
319 
320 static int spl_load_image(u32 boot_device)
321 {
322 	switch (boot_device) {
323 #ifdef CONFIG_SPL_RAM_DEVICE
324 	case BOOT_DEVICE_RAM:
325 		return spl_ram_load_image();
326 #endif
327 #ifdef CONFIG_SPL_MMC_SUPPORT
328 	case BOOT_DEVICE_MMC1:
329 	case BOOT_DEVICE_MMC2:
330 	case BOOT_DEVICE_MMC2_2:
331 		return spl_mmc_load_image(boot_device);
332 #endif
333 #ifdef CONFIG_SPL_NAND_SUPPORT
334 	case BOOT_DEVICE_NAND:
335 		return spl_nand_load_image();
336 #endif
337 #ifdef CONFIG_SPL_ONENAND_SUPPORT
338 	case BOOT_DEVICE_ONENAND:
339 		return spl_onenand_load_image();
340 #endif
341 #ifdef CONFIG_SPL_NOR_SUPPORT
342 	case BOOT_DEVICE_NOR:
343 		return spl_nor_load_image();
344 #endif
345 #ifdef CONFIG_SPL_YMODEM_SUPPORT
346 	case BOOT_DEVICE_UART:
347 		return spl_ymodem_load_image();
348 #endif
349 #ifdef CONFIG_SPL_SPI_SUPPORT
350 	case BOOT_DEVICE_SPI:
351 		return spl_spi_load_image();
352 #endif
353 #ifdef CONFIG_SPL_ETH_SUPPORT
354 	case BOOT_DEVICE_CPGMAC:
355 #ifdef CONFIG_SPL_ETH_DEVICE
356 		return spl_net_load_image(CONFIG_SPL_ETH_DEVICE);
357 #else
358 		return spl_net_load_image(NULL);
359 #endif
360 #endif
361 #ifdef CONFIG_SPL_USBETH_SUPPORT
362 	case BOOT_DEVICE_USBETH:
363 		return spl_net_load_image("usb_ether");
364 #endif
365 #ifdef CONFIG_SPL_USB_SUPPORT
366 	case BOOT_DEVICE_USB:
367 		return spl_usb_load_image();
368 #endif
369 #ifdef CONFIG_SPL_SATA_SUPPORT
370 	case BOOT_DEVICE_SATA:
371 		return spl_sata_load_image();
372 #endif
373 #ifdef CONFIG_SPL_BOARD_LOAD_IMAGE
374 	case BOOT_DEVICE_BOARD:
375 		return spl_board_load_image();
376 #endif
377 	default:
378 #if defined(CONFIG_SPL_SERIAL_SUPPORT) && defined(CONFIG_SPL_LIBCOMMON_SUPPORT)
379 		puts("SPL: Unsupported Boot Device!\n");
380 #endif
381 		return -ENODEV;
382 	}
383 
384 	return -EINVAL;
385 }
386 
387 void board_init_r(gd_t *dummy1, ulong dummy2)
388 {
389 	int i;
390 
391 	debug(">>spl:board_init_r()\n");
392 
393 #if defined(CONFIG_SYS_SPL_MALLOC_START)
394 	mem_malloc_init(CONFIG_SYS_SPL_MALLOC_START,
395 			CONFIG_SYS_SPL_MALLOC_SIZE);
396 	gd->flags |= GD_FLG_FULL_MALLOC_INIT;
397 #endif
398 	if (!(gd->flags & GD_FLG_SPL_INIT)) {
399 		if (spl_init())
400 			hang();
401 	}
402 #ifndef CONFIG_PPC
403 	/*
404 	 * timer_init() does not exist on PPC systems. The timer is initialized
405 	 * and enabled (decrementer) in interrupt_init() here.
406 	 */
407 	timer_init();
408 #endif
409 
410 #ifdef CONFIG_SPL_BOARD_INIT
411 	spl_board_init();
412 #endif
413 
414 	board_boot_order(spl_boot_list);
415 	for (i = 0; i < ARRAY_SIZE(spl_boot_list) &&
416 			spl_boot_list[i] != BOOT_DEVICE_NONE; i++) {
417 		announce_boot_device(spl_boot_list[i]);
418 		if (!spl_load_image(spl_boot_list[i]))
419 			break;
420 	}
421 
422 	if (i == ARRAY_SIZE(spl_boot_list) ||
423 	    spl_boot_list[i] == BOOT_DEVICE_NONE) {
424 		puts("SPL: failed to boot from all boot devices\n");
425 		hang();
426 	}
427 
428 	switch (spl_image.os) {
429 	case IH_OS_U_BOOT:
430 		debug("Jumping to U-Boot\n");
431 		break;
432 #ifdef CONFIG_SPL_OS_BOOT
433 	case IH_OS_LINUX:
434 		debug("Jumping to Linux\n");
435 		spl_board_prepare_for_linux();
436 		jump_to_image_linux((void *)CONFIG_SYS_SPL_ARGS_ADDR);
437 #endif
438 	default:
439 		debug("Unsupported OS image.. Jumping nevertheless..\n");
440 	}
441 #if defined(CONFIG_SYS_MALLOC_F_LEN) && !defined(CONFIG_SYS_SPL_MALLOC_SIZE)
442 	debug("SPL malloc() used %#lx bytes (%ld KB)\n", gd->malloc_ptr,
443 	      gd->malloc_ptr / 1024);
444 #endif
445 
446 	debug("loaded - jumping to U-Boot...");
447 	spl_board_prepare_for_boot();
448 	jump_to_image_no_args(&spl_image);
449 }
450 
451 /*
452  * This requires UART clocks to be enabled.  In order for this to work the
453  * caller must ensure that the gd pointer is valid.
454  */
455 void preloader_console_init(void)
456 {
457 	gd->bd = &bdata;
458 	gd->baudrate = CONFIG_BAUDRATE;
459 
460 	serial_init();		/* serial communications setup */
461 
462 	gd->have_console = 1;
463 
464 	puts("\nU-Boot SPL " PLAIN_VERSION " (" U_BOOT_DATE " - " \
465 			U_BOOT_TIME ")\n");
466 #ifdef CONFIG_SPL_DISPLAY_PRINT
467 	spl_display_print();
468 #endif
469 }
470 
471 /**
472  * spl_relocate_stack_gd() - Relocate stack ready for board_init_r() execution
473  *
474  * Sometimes board_init_f() runs with a stack in SRAM but we want to use SDRAM
475  * for the main board_init_r() execution. This is typically because we need
476  * more stack space for things like the MMC sub-system.
477  *
478  * This function calculates the stack position, copies the global_data into
479  * place, sets the new gd (except for ARM, for which setting GD within a C
480  * function may not always work) and returns the new stack position. The
481  * caller is responsible for setting up the sp register and, in the case
482  * of ARM, setting up gd.
483  *
484  * All of this is done using the same layout and alignments as done in
485  * board_init_f_init_reserve() / board_init_f_alloc_reserve().
486  *
487  * @return new stack location, or 0 to use the same stack
488  */
489 ulong spl_relocate_stack_gd(void)
490 {
491 #ifdef CONFIG_SPL_STACK_R
492 	gd_t *new_gd;
493 	ulong ptr = CONFIG_SPL_STACK_R_ADDR;
494 
495 #ifdef CONFIG_SPL_SYS_MALLOC_SIMPLE
496 	if (CONFIG_SPL_STACK_R_MALLOC_SIMPLE_LEN) {
497 		ptr -= CONFIG_SPL_STACK_R_MALLOC_SIMPLE_LEN;
498 		gd->malloc_base = ptr;
499 		gd->malloc_limit = CONFIG_SPL_STACK_R_MALLOC_SIMPLE_LEN;
500 		gd->malloc_ptr = 0;
501 	}
502 #endif
503 	/* Get stack position: use 8-byte alignment for ABI compliance */
504 	ptr = CONFIG_SPL_STACK_R_ADDR - roundup(sizeof(gd_t),16);
505 	new_gd = (gd_t *)ptr;
506 	memcpy(new_gd, (void *)gd, sizeof(gd_t));
507 #if !defined(CONFIG_ARM)
508 	gd = new_gd;
509 #endif
510 	return ptr;
511 #else
512 	return 0;
513 #endif
514 }
515