xref: /openbmc/u-boot/common/spl/spl.c (revision 344c8376)
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 <i2c.h>
17 #include <image.h>
18 #include <malloc.h>
19 #include <dm/root.h>
20 #include <linux/compiler.h>
21 
22 DECLARE_GLOBAL_DATA_PTR;
23 
24 #ifndef CONFIG_SYS_UBOOT_START
25 #define CONFIG_SYS_UBOOT_START	CONFIG_SYS_TEXT_BASE
26 #endif
27 #ifndef CONFIG_SYS_MONITOR_LEN
28 /* Unknown U-Boot size, let's assume it will not be more than 200 KB */
29 #define CONFIG_SYS_MONITOR_LEN	(200 * 1024)
30 #endif
31 
32 u32 *boot_params_ptr = NULL;
33 struct spl_image_info spl_image;
34 
35 /* Define board data structure */
36 static bd_t bdata __attribute__ ((section(".data")));
37 
38 /*
39  * Default function to determine if u-boot or the OS should
40  * be started. This implementation always returns 1.
41  *
42  * Please implement your own board specific funcion to do this.
43  *
44  * RETURN
45  * 0 to not start u-boot
46  * positive if u-boot should start
47  */
48 #ifdef CONFIG_SPL_OS_BOOT
49 __weak int spl_start_uboot(void)
50 {
51 	puts("SPL: Please implement spl_start_uboot() for your board\n");
52 	puts("SPL: Direct Linux boot not active!\n");
53 	return 1;
54 }
55 #endif
56 
57 /*
58  * Weak default function for board specific cleanup/preparation before
59  * Linux boot. Some boards/platforms might not need it, so just provide
60  * an empty stub here.
61  */
62 __weak void spl_board_prepare_for_linux(void)
63 {
64 	/* Nothing to do! */
65 }
66 
67 void spl_set_header_raw_uboot(void)
68 {
69 	spl_image.size = CONFIG_SYS_MONITOR_LEN;
70 	spl_image.entry_point = CONFIG_SYS_UBOOT_START;
71 	spl_image.load_addr = CONFIG_SYS_TEXT_BASE;
72 	spl_image.os = IH_OS_U_BOOT;
73 	spl_image.name = "U-Boot";
74 }
75 
76 void spl_parse_image_header(const struct image_header *header)
77 {
78 	u32 header_size = sizeof(struct image_header);
79 
80 	if (image_get_magic(header) == IH_MAGIC) {
81 		if (spl_image.flags & SPL_COPY_PAYLOAD_ONLY) {
82 			/*
83 			 * On some system (e.g. powerpc), the load-address and
84 			 * entry-point is located at address 0. We can't load
85 			 * to 0-0x40. So skip header in this case.
86 			 */
87 			spl_image.load_addr = image_get_load(header);
88 			spl_image.entry_point = image_get_ep(header);
89 			spl_image.size = image_get_data_size(header);
90 		} else {
91 			spl_image.entry_point = image_get_load(header);
92 			/* Load including the header */
93 			spl_image.load_addr = spl_image.entry_point -
94 				header_size;
95 			spl_image.size = image_get_data_size(header) +
96 				header_size;
97 		}
98 		spl_image.os = image_get_os(header);
99 		spl_image.name = image_get_name(header);
100 		debug("spl: payload image: %.*s load addr: 0x%x size: %d\n",
101 			(int)sizeof(spl_image.name), spl_image.name,
102 			spl_image.load_addr, spl_image.size);
103 	} else {
104 #ifdef CONFIG_SPL_PANIC_ON_RAW_IMAGE
105 		/*
106 		 * CONFIG_SPL_PANIC_ON_RAW_IMAGE is defined when the
107 		 * code which loads images in SPL cannot guarantee that
108 		 * absolutely all read errors will be reported.
109 		 * An example is the LPC32XX MLC NAND driver, which
110 		 * will consider that a completely unreadable NAND block
111 		 * is bad, and thus should be skipped silently.
112 		 */
113 		panic("** no mkimage signature but raw image not supported");
114 #else
115 		/* Signature not found - assume u-boot.bin */
116 		debug("mkimage signature not found - ih_magic = %x\n",
117 			header->ih_magic);
118 		spl_set_header_raw_uboot();
119 #endif
120 	}
121 }
122 
123 __weak void __noreturn jump_to_image_no_args(struct spl_image_info *spl_image)
124 {
125 	typedef void __noreturn (*image_entry_noargs_t)(void);
126 
127 	image_entry_noargs_t image_entry =
128 		(image_entry_noargs_t)(unsigned long)spl_image->entry_point;
129 
130 	debug("image entry point: 0x%X\n", spl_image->entry_point);
131 	image_entry();
132 }
133 
134 #ifdef CONFIG_SPL_RAM_DEVICE
135 static void spl_ram_load_image(void)
136 {
137 	const struct image_header *header;
138 
139 	/*
140 	 * Get the header.  It will point to an address defined by handoff
141 	 * which will tell where the image located inside the flash. For
142 	 * now, it will temporary fixed to address pointed by U-Boot.
143 	 */
144 	header = (struct image_header *)
145 		(CONFIG_SYS_TEXT_BASE -	sizeof(struct image_header));
146 
147 	spl_parse_image_header(header);
148 }
149 #endif
150 
151 int spl_init(void)
152 {
153 	int ret;
154 
155 	debug("spl_init()\n");
156 #if defined(CONFIG_SYS_MALLOC_F_LEN)
157 	gd->malloc_limit = CONFIG_SYS_MALLOC_F_LEN;
158 	gd->malloc_ptr = 0;
159 #endif
160 	if (CONFIG_IS_ENABLED(OF_CONTROL)) {
161 		ret = fdtdec_setup();
162 		if (ret) {
163 			debug("fdtdec_setup() returned error %d\n", ret);
164 			return ret;
165 		}
166 	}
167 	if (IS_ENABLED(CONFIG_SPL_DM)) {
168 		ret = dm_init_and_scan(true);
169 		if (ret) {
170 			debug("dm_init_and_scan() returned error %d\n", ret);
171 			return ret;
172 		}
173 	}
174 	gd->flags |= GD_FLG_SPL_INIT;
175 
176 	return 0;
177 }
178 
179 void board_init_r(gd_t *dummy1, ulong dummy2)
180 {
181 	u32 boot_device;
182 
183 	debug(">>spl:board_init_r()\n");
184 
185 #if defined(CONFIG_SYS_SPL_MALLOC_START)
186 	mem_malloc_init(CONFIG_SYS_SPL_MALLOC_START,
187 			CONFIG_SYS_SPL_MALLOC_SIZE);
188 	gd->flags |= GD_FLG_FULL_MALLOC_INIT;
189 #endif
190 	if (!(gd->flags & GD_FLG_SPL_INIT)) {
191 		if (spl_init())
192 			hang();
193 	}
194 #ifndef CONFIG_PPC
195 	/*
196 	 * timer_init() does not exist on PPC systems. The timer is initialized
197 	 * and enabled (decrementer) in interrupt_init() here.
198 	 */
199 	timer_init();
200 #endif
201 
202 #ifdef CONFIG_SPL_BOARD_INIT
203 	spl_board_init();
204 #endif
205 
206 	boot_device = spl_boot_device();
207 	debug("boot device - %d\n", boot_device);
208 	switch (boot_device) {
209 #ifdef CONFIG_SPL_RAM_DEVICE
210 	case BOOT_DEVICE_RAM:
211 		spl_ram_load_image();
212 		break;
213 #endif
214 #ifdef CONFIG_SPL_MMC_SUPPORT
215 	case BOOT_DEVICE_MMC1:
216 	case BOOT_DEVICE_MMC2:
217 	case BOOT_DEVICE_MMC2_2:
218 		spl_mmc_load_image();
219 		break;
220 #endif
221 #ifdef CONFIG_SPL_NAND_SUPPORT
222 	case BOOT_DEVICE_NAND:
223 		spl_nand_load_image();
224 		break;
225 #endif
226 #ifdef CONFIG_SPL_ONENAND_SUPPORT
227 	case BOOT_DEVICE_ONENAND:
228 		spl_onenand_load_image();
229 		break;
230 #endif
231 #ifdef CONFIG_SPL_NOR_SUPPORT
232 	case BOOT_DEVICE_NOR:
233 		spl_nor_load_image();
234 		break;
235 #endif
236 #ifdef CONFIG_SPL_YMODEM_SUPPORT
237 	case BOOT_DEVICE_UART:
238 		spl_ymodem_load_image();
239 		break;
240 #endif
241 #ifdef CONFIG_SPL_SPI_SUPPORT
242 	case BOOT_DEVICE_SPI:
243 		spl_spi_load_image();
244 		break;
245 #endif
246 #ifdef CONFIG_SPL_ETH_SUPPORT
247 	case BOOT_DEVICE_CPGMAC:
248 #ifdef CONFIG_SPL_ETH_DEVICE
249 		spl_net_load_image(CONFIG_SPL_ETH_DEVICE);
250 #else
251 		spl_net_load_image(NULL);
252 #endif
253 		break;
254 #endif
255 #ifdef CONFIG_SPL_USBETH_SUPPORT
256 	case BOOT_DEVICE_USBETH:
257 		spl_net_load_image("usb_ether");
258 		break;
259 #endif
260 #ifdef CONFIG_SPL_USB_SUPPORT
261 	case BOOT_DEVICE_USB:
262 		spl_usb_load_image();
263 		break;
264 #endif
265 #ifdef CONFIG_SPL_SATA_SUPPORT
266 	case BOOT_DEVICE_SATA:
267 		spl_sata_load_image();
268 		break;
269 #endif
270 #ifdef CONFIG_SPL_BOARD_LOAD_IMAGE
271 	case BOOT_DEVICE_BOARD:
272 		spl_board_load_image();
273 		break;
274 #endif
275 	default:
276 #if defined(CONFIG_SPL_SERIAL_SUPPORT) && defined(CONFIG_SPL_LIBCOMMON_SUPPORT)
277 		puts("SPL: Unsupported Boot Device!\n");
278 #endif
279 		hang();
280 	}
281 
282 	switch (spl_image.os) {
283 	case IH_OS_U_BOOT:
284 		debug("Jumping to U-Boot\n");
285 		break;
286 #ifdef CONFIG_SPL_OS_BOOT
287 	case IH_OS_LINUX:
288 		debug("Jumping to Linux\n");
289 		spl_board_prepare_for_linux();
290 		jump_to_image_linux((void *)CONFIG_SYS_SPL_ARGS_ADDR);
291 #endif
292 	default:
293 		debug("Unsupported OS image.. Jumping nevertheless..\n");
294 	}
295 #if defined(CONFIG_SYS_MALLOC_F_LEN) && !defined(CONFIG_SYS_SPL_MALLOC_SIZE)
296 	debug("SPL malloc() used %#lx bytes (%ld KB)\n", gd->malloc_ptr,
297 	      gd->malloc_ptr / 1024);
298 #endif
299 
300 	debug("loaded - jumping to U-Boot...");
301 	jump_to_image_no_args(&spl_image);
302 }
303 
304 /*
305  * This requires UART clocks to be enabled.  In order for this to work the
306  * caller must ensure that the gd pointer is valid.
307  */
308 void preloader_console_init(void)
309 {
310 	gd->bd = &bdata;
311 	gd->baudrate = CONFIG_BAUDRATE;
312 
313 	serial_init();		/* serial communications setup */
314 
315 	gd->have_console = 1;
316 
317 	puts("\nU-Boot SPL " PLAIN_VERSION " (" U_BOOT_DATE " - " \
318 			U_BOOT_TIME ")\n");
319 #ifdef CONFIG_SPL_DISPLAY_PRINT
320 	spl_display_print();
321 #endif
322 }
323 
324 /**
325  * spl_relocate_stack_gd() - Relocate stack ready for board_init_r() execution
326  *
327  * Sometimes board_init_f() runs with a stack in SRAM but we want to use SDRAM
328  * for the main board_init_r() execution. This is typically because we need
329  * more stack space for things like the MMC sub-system.
330  *
331  * This function calculates the stack position, copies the global_data into
332  * place and returns the new stack position. The caller is responsible for
333  * setting up the sp register.
334  *
335  * @return new stack location, or 0 to use the same stack
336  */
337 ulong spl_relocate_stack_gd(void)
338 {
339 #ifdef CONFIG_SPL_STACK_R
340 	gd_t *new_gd;
341 	ulong ptr;
342 
343 	/* Get stack position: use 8-byte alignment for ABI compliance */
344 	ptr = CONFIG_SPL_STACK_R_ADDR - sizeof(gd_t);
345 	ptr &= ~7;
346 	new_gd = (gd_t *)ptr;
347 	memcpy(new_gd, (void *)gd, sizeof(gd_t));
348 	gd = new_gd;
349 
350 	/* Clear the BSS. */
351 	memset(__bss_start, 0, __bss_end - __bss_start);
352 
353 	return ptr;
354 #else
355 	return 0;
356 #endif
357 }
358