xref: /openbmc/u-boot/common/spl/spl_mmc.c (revision 3ba98ed8)
1 // SPDX-License-Identifier: GPL-2.0+
2 /*
3  * (C) Copyright 2010
4  * Texas Instruments, <www.ti.com>
5  *
6  * Aneesh V <aneesh@ti.com>
7  */
8 #include <common.h>
9 #include <dm.h>
10 #include <spl.h>
11 #include <linux/compiler.h>
12 #include <errno.h>
13 #include <asm/u-boot.h>
14 #include <errno.h>
15 #include <mmc.h>
16 #include <image.h>
17 
18 static int mmc_load_legacy(struct spl_image_info *spl_image, struct mmc *mmc,
19 			   ulong sector, struct image_header *header)
20 {
21 	u32 image_size_sectors;
22 	unsigned long count;
23 	int ret;
24 
25 	ret = spl_parse_image_header(spl_image, header);
26 	if (ret)
27 		return ret;
28 
29 	/* convert size to sectors - round up */
30 	image_size_sectors = (spl_image->size + mmc->read_bl_len - 1) /
31 			     mmc->read_bl_len;
32 
33 	/* Read the header too to avoid extra memcpy */
34 	count = blk_dread(mmc_get_blk_desc(mmc), sector, image_size_sectors,
35 			  (void *)(ulong)spl_image->load_addr);
36 	debug("read %x sectors to %lx\n", image_size_sectors,
37 	      spl_image->load_addr);
38 	if (count != image_size_sectors)
39 		return -EIO;
40 
41 	return 0;
42 }
43 
44 static ulong h_spl_load_read(struct spl_load_info *load, ulong sector,
45 			     ulong count, void *buf)
46 {
47 	struct mmc *mmc = load->dev;
48 
49 	return blk_dread(mmc_get_blk_desc(mmc), sector, count, buf);
50 }
51 
52 static __maybe_unused
53 int mmc_load_image_raw_sector(struct spl_image_info *spl_image,
54 			      struct mmc *mmc, unsigned long sector)
55 {
56 	unsigned long count;
57 	struct image_header *header;
58 	struct blk_desc *bd = mmc_get_blk_desc(mmc);
59 	int ret = 0;
60 
61 	header = spl_get_load_buffer(-sizeof(*header), bd->blksz);
62 
63 	/* read image header to find the image size & load address */
64 	count = blk_dread(bd, sector, 1, header);
65 	debug("hdr read sector %lx, count=%lu\n", sector, count);
66 	if (count == 0) {
67 		ret = -EIO;
68 		goto end;
69 	}
70 
71 	if (IS_ENABLED(CONFIG_SPL_LOAD_FIT) &&
72 	    image_get_magic(header) == FDT_MAGIC) {
73 		struct spl_load_info load;
74 
75 		debug("Found FIT\n");
76 		load.dev = mmc;
77 		load.priv = NULL;
78 		load.filename = NULL;
79 		load.bl_len = mmc->read_bl_len;
80 		load.read = h_spl_load_read;
81 		ret = spl_load_simple_fit(spl_image, &load, sector, header);
82 	} else {
83 		ret = mmc_load_legacy(spl_image, mmc, sector, header);
84 	}
85 
86 end:
87 	if (ret) {
88 #ifdef CONFIG_SPL_LIBCOMMON_SUPPORT
89 		puts("mmc_load_image_raw_sector: mmc block read error\n");
90 #endif
91 		return -1;
92 	}
93 
94 	return 0;
95 }
96 
97 static int spl_mmc_get_device_index(u32 boot_device)
98 {
99 	switch (boot_device) {
100 	case BOOT_DEVICE_MMC1:
101 		return 0;
102 	case BOOT_DEVICE_MMC2:
103 	case BOOT_DEVICE_MMC2_2:
104 		return 1;
105 	}
106 
107 #ifdef CONFIG_SPL_LIBCOMMON_SUPPORT
108 	printf("spl: unsupported mmc boot device.\n");
109 #endif
110 
111 	return -ENODEV;
112 }
113 
114 static int spl_mmc_find_device(struct mmc **mmcp, u32 boot_device)
115 {
116 #if CONFIG_IS_ENABLED(DM_MMC)
117 	struct udevice *dev;
118 #endif
119 	int err, mmc_dev;
120 
121 	mmc_dev = spl_mmc_get_device_index(boot_device);
122 	if (mmc_dev < 0)
123 		return mmc_dev;
124 
125 	err = mmc_initialize(NULL);
126 	if (err) {
127 #ifdef CONFIG_SPL_LIBCOMMON_SUPPORT
128 		printf("spl: could not initialize mmc. error: %d\n", err);
129 #endif
130 		return err;
131 	}
132 
133 #if CONFIG_IS_ENABLED(DM_MMC)
134 	err = uclass_get_device(UCLASS_MMC, mmc_dev, &dev);
135 	if (!err)
136 		*mmcp = mmc_get_mmc_dev(dev);
137 #else
138 	*mmcp = find_mmc_device(mmc_dev);
139 	err = *mmcp ? 0 : -ENODEV;
140 #endif
141 	if (err) {
142 #ifdef CONFIG_SPL_LIBCOMMON_SUPPORT
143 		printf("spl: could not find mmc device %d. error: %d\n",
144 		       mmc_dev, err);
145 #endif
146 		return err;
147 	}
148 
149 	return 0;
150 }
151 
152 #ifdef CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_USE_PARTITION
153 static int mmc_load_image_raw_partition(struct spl_image_info *spl_image,
154 					struct mmc *mmc, int partition,
155 					unsigned long sector)
156 {
157 	disk_partition_t info;
158 	int err;
159 
160 #ifdef CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_USE_PARTITION_TYPE
161 	int type_part;
162 	/* Only support MBR so DOS_ENTRY_NUMBERS */
163 	for (type_part = 1; type_part <= DOS_ENTRY_NUMBERS; type_part++) {
164 		err = part_get_info(mmc_get_blk_desc(mmc), type_part, &info);
165 		if (err)
166 			continue;
167 		if (info.sys_ind ==
168 			CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_PARTITION_TYPE) {
169 			partition = type_part;
170 			break;
171 		}
172 	}
173 #endif
174 
175 	err = part_get_info(mmc_get_blk_desc(mmc), partition, &info);
176 	if (err) {
177 #ifdef CONFIG_SPL_LIBCOMMON_SUPPORT
178 		puts("spl: partition error\n");
179 #endif
180 		return -1;
181 	}
182 
183 #ifdef CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_USE_SECTOR
184 	return mmc_load_image_raw_sector(spl_image, mmc, info.start + sector);
185 #else
186 	return mmc_load_image_raw_sector(spl_image, mmc, info.start);
187 #endif
188 }
189 #endif
190 
191 #ifdef CONFIG_SPL_OS_BOOT
192 static int mmc_load_image_raw_os(struct spl_image_info *spl_image,
193 				 struct mmc *mmc)
194 {
195 	int ret;
196 
197 #if defined(CONFIG_SYS_MMCSD_RAW_MODE_ARGS_SECTOR)
198 	unsigned long count;
199 
200 	count = blk_dread(mmc_get_blk_desc(mmc),
201 		CONFIG_SYS_MMCSD_RAW_MODE_ARGS_SECTOR,
202 		CONFIG_SYS_MMCSD_RAW_MODE_ARGS_SECTORS,
203 		(void *) CONFIG_SYS_SPL_ARGS_ADDR);
204 	if (count != CONFIG_SYS_MMCSD_RAW_MODE_ARGS_SECTORS) {
205 #ifdef CONFIG_SPL_LIBCOMMON_SUPPORT
206 		puts("mmc_load_image_raw_os: mmc block read error\n");
207 #endif
208 		return -1;
209 	}
210 #endif	/* CONFIG_SYS_MMCSD_RAW_MODE_ARGS_SECTOR */
211 
212 	ret = mmc_load_image_raw_sector(spl_image, mmc,
213 		CONFIG_SYS_MMCSD_RAW_MODE_KERNEL_SECTOR);
214 	if (ret)
215 		return ret;
216 
217 	if (spl_image->os != IH_OS_LINUX) {
218 		puts("Expected Linux image is not found. Trying to start U-boot\n");
219 		return -ENOENT;
220 	}
221 
222 	return 0;
223 }
224 #else
225 int spl_start_uboot(void)
226 {
227 	return 1;
228 }
229 static int mmc_load_image_raw_os(struct spl_image_info *spl_image,
230 				 struct mmc *mmc)
231 {
232 	return -ENOSYS;
233 }
234 #endif
235 
236 #ifdef CONFIG_SYS_MMCSD_FS_BOOT_PARTITION
237 static int spl_mmc_do_fs_boot(struct spl_image_info *spl_image, struct mmc *mmc,
238 			      const char *filename)
239 {
240 	int err = -ENOSYS;
241 
242 #ifdef CONFIG_SPL_FS_FAT
243 	if (!spl_start_uboot()) {
244 		err = spl_load_image_fat_os(spl_image, mmc_get_blk_desc(mmc),
245 			CONFIG_SYS_MMCSD_FS_BOOT_PARTITION);
246 		if (!err)
247 			return err;
248 	}
249 #ifdef CONFIG_SPL_FS_LOAD_PAYLOAD_NAME
250 	err = spl_load_image_fat(spl_image, mmc_get_blk_desc(mmc),
251 				 CONFIG_SYS_MMCSD_FS_BOOT_PARTITION,
252 				 filename);
253 	if (!err)
254 		return err;
255 #endif
256 #endif
257 #ifdef CONFIG_SPL_FS_EXT4
258 	if (!spl_start_uboot()) {
259 		err = spl_load_image_ext_os(spl_image, mmc_get_blk_desc(mmc),
260 			CONFIG_SYS_MMCSD_FS_BOOT_PARTITION);
261 		if (!err)
262 			return err;
263 	}
264 #ifdef CONFIG_SPL_FS_LOAD_PAYLOAD_NAME
265 	err = spl_load_image_ext(spl_image, mmc_get_blk_desc(mmc),
266 				 CONFIG_SYS_MMCSD_FS_BOOT_PARTITION,
267 				 filename);
268 	if (!err)
269 		return err;
270 #endif
271 #endif
272 
273 #if defined(CONFIG_SPL_FS_FAT) || defined(CONFIG_SPL_FS_EXT4)
274 	err = -ENOENT;
275 #endif
276 
277 	return err;
278 }
279 #else
280 static int spl_mmc_do_fs_boot(struct spl_image_info *spl_image, struct mmc *mmc,
281 			      const char *filename)
282 {
283 	return -ENOSYS;
284 }
285 #endif
286 
287 u32 __weak spl_boot_mode(const u32 boot_device)
288 {
289 #if defined(CONFIG_SPL_FS_FAT) || defined(CONFIG_SPL_FS_EXT4)
290 	return MMCSD_MODE_FS;
291 #elif defined(CONFIG_SUPPORT_EMMC_BOOT)
292 	return MMCSD_MODE_EMMCBOOT;
293 #else
294 	return MMCSD_MODE_RAW;
295 #endif
296 }
297 
298 #ifdef CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_USE_PARTITION
299 __weak
300 int spl_boot_partition(const u32 boot_device)
301 {
302 	return CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_PARTITION;
303 }
304 #endif
305 
306 int spl_mmc_load(struct spl_image_info *spl_image,
307 		 struct spl_boot_device *bootdev,
308 		 const char *filename,
309 		 int raw_part,
310 		 unsigned long raw_sect)
311 {
312 	static struct mmc *mmc;
313 	u32 boot_mode;
314 	int err = 0;
315 	__maybe_unused int part;
316 
317 	/* Perform peripheral init only once */
318 	if (!mmc) {
319 		err = spl_mmc_find_device(&mmc, bootdev->boot_device);
320 		if (err)
321 			return err;
322 
323 		err = mmc_init(mmc);
324 		if (err) {
325 			mmc = NULL;
326 #ifdef CONFIG_SPL_LIBCOMMON_SUPPORT
327 			printf("spl: mmc init failed with error: %d\n", err);
328 #endif
329 			return err;
330 		}
331 	}
332 
333 	boot_mode = spl_boot_mode(bootdev->boot_device);
334 	err = -EINVAL;
335 	switch (boot_mode) {
336 	case MMCSD_MODE_EMMCBOOT:
337 			/*
338 			 * We need to check what the partition is configured to.
339 			 * 1 and 2 match up to boot0 / boot1 and 7 is user data
340 			 * which is the first physical partition (0).
341 			 */
342 			part = (mmc->part_config >> 3) & PART_ACCESS_MASK;
343 
344 			if (part == 7)
345 				part = 0;
346 
347 			if (CONFIG_IS_ENABLED(MMC_TINY))
348 				err = mmc_switch_part(mmc, part);
349 			else
350 				err = blk_dselect_hwpart(mmc_get_blk_desc(mmc), part);
351 
352 			if (err) {
353 #ifdef CONFIG_SPL_LIBCOMMON_SUPPORT
354 				puts("spl: mmc partition switch failed\n");
355 #endif
356 				return err;
357 			}
358 			/* Fall through */
359 	case MMCSD_MODE_RAW:
360 		debug("spl: mmc boot mode: raw\n");
361 
362 		if (!spl_start_uboot()) {
363 			err = mmc_load_image_raw_os(spl_image, mmc);
364 			if (!err)
365 				return err;
366 		}
367 #ifdef CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_USE_PARTITION
368 		err = mmc_load_image_raw_partition(spl_image, mmc, raw_part,
369 						   raw_sect);
370 		if (!err)
371 			return err;
372 #endif
373 #ifdef CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_USE_SECTOR
374 		err = mmc_load_image_raw_sector(spl_image, mmc, raw_sect);
375 		if (!err)
376 			return err;
377 #endif
378 		/* If RAW mode fails, try FS mode. */
379 	case MMCSD_MODE_FS:
380 		debug("spl: mmc boot mode: fs\n");
381 
382 		err = spl_mmc_do_fs_boot(spl_image, mmc, filename);
383 		if (!err)
384 			return err;
385 
386 		break;
387 #ifdef CONFIG_SPL_LIBCOMMON_SUPPORT
388 	default:
389 		puts("spl: mmc: wrong boot mode\n");
390 #endif
391 	}
392 
393 	return err;
394 }
395 
396 int spl_mmc_load_image(struct spl_image_info *spl_image,
397 		       struct spl_boot_device *bootdev)
398 {
399 	return spl_mmc_load(spl_image, bootdev,
400 #ifdef CONFIG_SPL_FS_LOAD_PAYLOAD_NAME
401 			    CONFIG_SPL_FS_LOAD_PAYLOAD_NAME,
402 #else
403 			    NULL,
404 #endif
405 #ifdef CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_PARTITION
406 			    spl_boot_partition(bootdev->boot_device),
407 #else
408 			    0,
409 #endif
410 #ifdef CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_SECTOR
411 			    CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_SECTOR);
412 #else
413 			    0);
414 #endif
415 }
416 
417 SPL_LOAD_IMAGE_METHOD("MMC1", 0, BOOT_DEVICE_MMC1, spl_mmc_load_image);
418 SPL_LOAD_IMAGE_METHOD("MMC2", 0, BOOT_DEVICE_MMC2, spl_mmc_load_image);
419 SPL_LOAD_IMAGE_METHOD("MMC2_2", 0, BOOT_DEVICE_MMC2_2, spl_mmc_load_image);
420