xref: /openbmc/u-boot/common/spl/spl_mmc.c (revision 42f8ebfd)
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 <linux/compiler.h>
13 #include <errno.h>
14 #include <asm/u-boot.h>
15 #include <errno.h>
16 #include <mmc.h>
17 #include <image.h>
18 
19 DECLARE_GLOBAL_DATA_PTR;
20 
21 static int mmc_load_legacy(struct mmc *mmc, ulong sector,
22 			   struct image_header *header)
23 {
24 	u32 image_size_sectors;
25 	unsigned long count;
26 	int ret;
27 
28 	ret = spl_parse_image_header(header);
29 	if (ret)
30 		return ret;
31 
32 	/* convert size to sectors - round up */
33 	image_size_sectors = (spl_image.size + mmc->read_bl_len - 1) /
34 			     mmc->read_bl_len;
35 
36 	/* Read the header too to avoid extra memcpy */
37 	count = mmc->block_dev.block_read(&mmc->block_dev, sector,
38 					  image_size_sectors,
39 					  (void *)(ulong)spl_image.load_addr);
40 	debug("read %x sectors to %x\n", image_size_sectors,
41 	      spl_image.load_addr);
42 	if (count != image_size_sectors)
43 		return -EIO;
44 
45 	return 0;
46 }
47 
48 static ulong h_spl_load_read(struct spl_load_info *load, ulong sector,
49 			     ulong count, void *buf)
50 {
51 	struct mmc *mmc = load->dev;
52 
53 	return mmc->block_dev.block_read(&mmc->block_dev, sector, count, buf);
54 }
55 
56 static int mmc_load_image_raw_sector(struct mmc *mmc, unsigned long sector)
57 {
58 	unsigned long count;
59 	struct image_header *header;
60 	int ret = 0;
61 
62 	header = (struct image_header *)(CONFIG_SYS_TEXT_BASE -
63 					 sizeof(struct image_header));
64 
65 	/* read image header to find the image size & load address */
66 	count = mmc->block_dev.block_read(&mmc->block_dev, sector, 1, header);
67 	debug("hdr read sector %lx, count=%lu\n", sector, count);
68 	if (count == 0) {
69 		ret = -EIO;
70 		goto end;
71 	}
72 
73 	if (IS_ENABLED(CONFIG_SPL_LOAD_FIT) &&
74 	    image_get_magic(header) == FDT_MAGIC) {
75 		struct spl_load_info load;
76 
77 		debug("Found FIT\n");
78 		load.dev = mmc;
79 		load.priv = NULL;
80 		load.bl_len = mmc->read_bl_len;
81 		load.read = h_spl_load_read;
82 		ret = spl_load_simple_fit(&load, sector, header);
83 	} else {
84 		ret = mmc_load_legacy(mmc, sector, header);
85 	}
86 
87 end:
88 	if (ret) {
89 #ifdef CONFIG_SPL_LIBCOMMON_SUPPORT
90 		puts("mmc_load_image_raw_sector: mmc block read error\n");
91 #endif
92 		return -1;
93 	}
94 
95 	return 0;
96 }
97 
98 int spl_mmc_get_device_index(u32 boot_device)
99 {
100 	switch (boot_device) {
101 	case BOOT_DEVICE_MMC1:
102 		return 0;
103 	case BOOT_DEVICE_MMC2:
104 	case BOOT_DEVICE_MMC2_2:
105 		return 1;
106 	}
107 
108 #ifdef CONFIG_SPL_LIBCOMMON_SUPPORT
109 	printf("spl: unsupported mmc boot device.\n");
110 #endif
111 
112 	return -ENODEV;
113 }
114 
115 static int spl_mmc_find_device(struct mmc **mmcp, u32 boot_device)
116 {
117 #ifdef CONFIG_DM_MMC
118 	struct udevice *dev;
119 #endif
120 	int err, mmc_dev;
121 
122 	mmc_dev = spl_mmc_get_device_index(boot_device);
123 	if (mmc_dev < 0)
124 		return mmc_dev;
125 
126 	err = mmc_initialize(NULL);
127 	if (err) {
128 #ifdef CONFIG_SPL_LIBCOMMON_SUPPORT
129 		printf("spl: could not initialize mmc. error: %d\n", err);
130 #endif
131 		return err;
132 	}
133 
134 #ifdef CONFIG_DM_MMC
135 	err = uclass_get_device(UCLASS_MMC, mmc_dev, &dev);
136 	if (!err)
137 		*mmcp = mmc_get_mmc_dev(dev);
138 #else
139 	*mmcp = find_mmc_device(mmc_dev);
140 	err = *mmcp ? 0 : -ENODEV;
141 #endif
142 	if (err) {
143 #ifdef CONFIG_SPL_LIBCOMMON_SUPPORT
144 		printf("spl: could not find mmc device. error: %d\n", err);
145 #endif
146 		return err;
147 	}
148 
149 	return 0;
150 }
151 
152 #ifdef CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_PARTITION
153 static int mmc_load_image_raw_partition(struct mmc *mmc, int partition)
154 {
155 	disk_partition_t info;
156 	int err;
157 
158 	err = part_get_info(&mmc->block_dev, partition, &info);
159 	if (err) {
160 #ifdef CONFIG_SPL_LIBCOMMON_SUPPORT
161 		puts("spl: partition error\n");
162 #endif
163 		return -1;
164 	}
165 
166 #ifdef CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_SECTOR
167 	return mmc_load_image_raw_sector(mmc, info.start +
168 					 CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_SECTOR);
169 #else
170 	return mmc_load_image_raw_sector(mmc, info.start);
171 #endif
172 }
173 #else
174 #define CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_PARTITION -1
175 static int mmc_load_image_raw_partition(struct mmc *mmc, int partition)
176 {
177 	return -ENOSYS;
178 }
179 #endif
180 
181 #ifdef CONFIG_SPL_OS_BOOT
182 static int mmc_load_image_raw_os(struct mmc *mmc)
183 {
184 	unsigned long count;
185 	int ret;
186 
187 	count = mmc->block_dev.block_read(&mmc->block_dev,
188 		CONFIG_SYS_MMCSD_RAW_MODE_ARGS_SECTOR,
189 		CONFIG_SYS_MMCSD_RAW_MODE_ARGS_SECTORS,
190 		(void *) CONFIG_SYS_SPL_ARGS_ADDR);
191 	if (count == 0) {
192 #ifdef CONFIG_SPL_LIBCOMMON_SUPPORT
193 		puts("mmc_load_image_raw_os: mmc block read error\n");
194 #endif
195 		return -1;
196 	}
197 
198 	ret = mmc_load_image_raw_sector(mmc,
199 		CONFIG_SYS_MMCSD_RAW_MODE_KERNEL_SECTOR);
200 	if (ret)
201 		return ret;
202 
203 	if (spl_image.os != IH_OS_LINUX) {
204 		puts("Expected Linux image is not found. Trying to start U-boot\n");
205 		return -ENOENT;
206 	}
207 
208 	return 0;
209 }
210 #else
211 int spl_start_uboot(void)
212 {
213 	return 1;
214 }
215 static int mmc_load_image_raw_os(struct mmc *mmc)
216 {
217 	return -ENOSYS;
218 }
219 #endif
220 
221 #ifdef CONFIG_SYS_MMCSD_FS_BOOT_PARTITION
222 int spl_mmc_do_fs_boot(struct mmc *mmc)
223 {
224 	int err = -ENOSYS;
225 
226 #ifdef CONFIG_SPL_FAT_SUPPORT
227 	if (!spl_start_uboot()) {
228 		err = spl_load_image_fat_os(&mmc->block_dev,
229 			CONFIG_SYS_MMCSD_FS_BOOT_PARTITION);
230 		if (!err)
231 			return err;
232 	}
233 #ifdef CONFIG_SPL_FS_LOAD_PAYLOAD_NAME
234 	err = spl_load_image_fat(&mmc->block_dev,
235 				 CONFIG_SYS_MMCSD_FS_BOOT_PARTITION,
236 				 CONFIG_SPL_FS_LOAD_PAYLOAD_NAME);
237 	if (!err)
238 		return err;
239 #endif
240 #endif
241 #ifdef CONFIG_SPL_EXT_SUPPORT
242 	if (!spl_start_uboot()) {
243 		err = spl_load_image_ext_os(&mmc->block_dev,
244 			CONFIG_SYS_MMCSD_FS_BOOT_PARTITION);
245 		if (!err)
246 			return err;
247 	}
248 #ifdef CONFIG_SPL_FS_LOAD_PAYLOAD_NAME
249 	err = spl_load_image_ext(&mmc->block_dev,
250 				 CONFIG_SYS_MMCSD_FS_BOOT_PARTITION,
251 				 CONFIG_SPL_FS_LOAD_PAYLOAD_NAME);
252 	if (!err)
253 		return err;
254 #endif
255 #endif
256 
257 #if defined(CONFIG_SPL_FAT_SUPPORT) || defined(CONFIG_SPL_EXT_SUPPORT)
258 	err = -ENOENT;
259 #endif
260 
261 	return err;
262 }
263 #else
264 int spl_mmc_do_fs_boot(struct mmc *mmc)
265 {
266 	return -ENOSYS;
267 }
268 #endif
269 
270 int spl_mmc_load_image(u32 boot_device)
271 {
272 	struct mmc *mmc = NULL;
273 	u32 boot_mode;
274 	int err = 0;
275 	__maybe_unused int part;
276 
277 	err = spl_mmc_find_device(&mmc, boot_device);
278 	if (err)
279 		return err;
280 
281 	err = mmc_init(mmc);
282 	if (err) {
283 #ifdef CONFIG_SPL_LIBCOMMON_SUPPORT
284 		printf("spl: mmc init failed with error: %d\n", err);
285 #endif
286 		return err;
287 	}
288 
289 	boot_mode = spl_boot_mode();
290 	err = -EINVAL;
291 	switch (boot_mode) {
292 	case MMCSD_MODE_EMMCBOOT:
293 			/*
294 			 * We need to check what the partition is configured to.
295 			 * 1 and 2 match up to boot0 / boot1 and 7 is user data
296 			 * which is the first physical partition (0).
297 			 */
298 			part = (mmc->part_config >> 3) & PART_ACCESS_MASK;
299 
300 			if (part == 7)
301 				part = 0;
302 
303 			err = blk_dselect_hwpart(mmc_get_blk_desc(mmc), part);
304 			if (err) {
305 #ifdef CONFIG_SPL_LIBCOMMON_SUPPORT
306 				puts("spl: mmc partition switch failed\n");
307 #endif
308 				return err;
309 			}
310 			/* Fall through */
311 	case MMCSD_MODE_RAW:
312 		debug("spl: mmc boot mode: raw\n");
313 
314 		if (!spl_start_uboot()) {
315 			err = mmc_load_image_raw_os(mmc);
316 			if (!err)
317 				return err;
318 		}
319 
320 		err = mmc_load_image_raw_partition(mmc,
321 			CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_PARTITION);
322 		if (!err)
323 			return err;
324 #if defined(CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_SECTOR)
325 		err = mmc_load_image_raw_sector(mmc,
326 			CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_SECTOR);
327 		if (!err)
328 			return err;
329 #endif
330 		/* If RAW mode fails, try FS mode. */
331 	case MMCSD_MODE_FS:
332 		debug("spl: mmc boot mode: fs\n");
333 
334 		err = spl_mmc_do_fs_boot(mmc);
335 		if (!err)
336 			return err;
337 
338 		break;
339 	case MMCSD_MODE_UNDEFINED:
340 #ifdef CONFIG_SPL_LIBCOMMON_SUPPORT
341 	default:
342 		puts("spl: mmc: wrong boot mode\n");
343 #endif
344 	}
345 
346 	return err;
347 }
348