2 * (C) Copyright 2008-2011 Freescale Semiconductor, Inc.
4 * SPDX-License-Identifier: GPL-2.0+
12 #include <environment.h>
14 #include <linux/stddef.h>
21 #if defined(CONFIG_ENV_SIZE_REDUND) && \
22 (CONFIG_ENV_SIZE_REDUND != CONFIG_ENV_SIZE)
23 #error CONFIG_ENV_SIZE_REDUND should be the same as CONFIG_ENV_SIZE
26 char *env_name_spec = "MMC";
28 #ifdef ENV_IS_EMBEDDED
29 env_t *env_ptr = &environment;
30 #else /* ! ENV_IS_EMBEDDED */
32 #endif /* ENV_IS_EMBEDDED */
34 DECLARE_GLOBAL_DATA_PTR;
36 #if !defined(CONFIG_ENV_OFFSET)
37 #define CONFIG_ENV_OFFSET 0
40 #if CONFIG_IS_ENABLED(OF_CONTROL)
41 static inline s64 mmc_offset(int copy)
43 const char *propname = "u-boot,mmc-env-offset";
44 s64 defvalue = CONFIG_ENV_OFFSET;
46 #if defined(CONFIG_ENV_OFFSET_REDUND)
48 propname = "u-boot,mmc-env-offset-redundant";
49 defvalue = CONFIG_ENV_OFFSET_REDUND;
53 return fdtdec_get_config_int(gd->fdt_blob, propname, defvalue);
56 static inline s64 mmc_offset(int copy)
58 s64 offset = CONFIG_ENV_OFFSET;
60 #if defined(CONFIG_ENV_OFFSET_REDUND)
62 offset = CONFIG_ENV_OFFSET_REDUND;
68 __weak int mmc_get_env_addr(struct mmc *mmc, int copy, u32 *env_addr)
70 s64 offset = mmc_offset(copy);
73 offset += mmc->capacity;
80 __weak int mmc_get_env_dev(void)
82 return CONFIG_SYS_MMC_ENV_DEV;
88 gd->env_addr = (ulong)&default_environment[0];
94 #ifdef CONFIG_SYS_MMC_ENV_PART
95 __weak uint mmc_get_env_part(struct mmc *mmc)
97 return CONFIG_SYS_MMC_ENV_PART;
100 static unsigned char env_mmc_orig_hwpart;
102 static int mmc_set_env_part(struct mmc *mmc)
104 uint part = mmc_get_env_part(mmc);
105 int dev = mmc_get_env_dev();
108 env_mmc_orig_hwpart = mmc_get_blk_desc(mmc)->hwpart;
109 ret = blk_select_hwpart_devnum(IF_TYPE_MMC, dev, part);
111 puts("MMC partition switch failed\n");
116 static inline int mmc_set_env_part(struct mmc *mmc) {return 0; };
119 static const char *init_mmc_for_env(struct mmc *mmc)
122 return "!No MMC card found";
127 if (blk_get_from_parent(mmc->dev, &dev))
128 return "!No block device";
131 return "!MMC init failed";
133 if (mmc_set_env_part(mmc))
134 return "!MMC partition switch failed";
139 static void fini_mmc_for_env(struct mmc *mmc)
141 #ifdef CONFIG_SYS_MMC_ENV_PART
142 int dev = mmc_get_env_dev();
144 blk_select_hwpart_devnum(IF_TYPE_MMC, dev, env_mmc_orig_hwpart);
148 #ifdef CONFIG_CMD_SAVEENV
149 static inline int write_env(struct mmc *mmc, unsigned long size,
150 unsigned long offset, const void *buffer)
152 uint blk_start, blk_cnt, n;
153 struct blk_desc *desc = mmc_get_blk_desc(mmc);
155 blk_start = ALIGN(offset, mmc->write_bl_len) / mmc->write_bl_len;
156 blk_cnt = ALIGN(size, mmc->write_bl_len) / mmc->write_bl_len;
158 n = blk_dwrite(desc, blk_start, blk_cnt, (u_char *)buffer);
160 return (n == blk_cnt) ? 0 : -1;
163 #ifdef CONFIG_ENV_OFFSET_REDUND
164 static unsigned char env_flags;
169 ALLOC_CACHE_ALIGN_BUFFER(env_t, env_new, 1);
170 int dev = mmc_get_env_dev();
171 struct mmc *mmc = find_mmc_device(dev);
176 errmsg = init_mmc_for_env(mmc);
178 printf("%s\n", errmsg);
182 ret = env_export(env_new);
186 #ifdef CONFIG_ENV_OFFSET_REDUND
187 env_new->flags = ++env_flags; /* increase the serial */
189 if (gd->env_valid == 1)
193 if (mmc_get_env_addr(mmc, copy, &offset)) {
198 printf("Writing to %sMMC(%d)... ", copy ? "redundant " : "", dev);
199 if (write_env(mmc, CONFIG_ENV_SIZE, offset, (u_char *)env_new)) {
208 #ifdef CONFIG_ENV_OFFSET_REDUND
209 gd->env_valid = gd->env_valid == 2 ? 1 : 2;
213 fini_mmc_for_env(mmc);
216 #endif /* CONFIG_CMD_SAVEENV */
218 static inline int read_env(struct mmc *mmc, unsigned long size,
219 unsigned long offset, const void *buffer)
221 uint blk_start, blk_cnt, n;
222 struct blk_desc *desc = mmc_get_blk_desc(mmc);
224 blk_start = ALIGN(offset, mmc->read_bl_len) / mmc->read_bl_len;
225 blk_cnt = ALIGN(size, mmc->read_bl_len) / mmc->read_bl_len;
227 n = blk_dread(desc, blk_start, blk_cnt, (uchar *)buffer);
229 return (n == blk_cnt) ? 0 : -1;
232 #ifdef CONFIG_ENV_OFFSET_REDUND
233 void env_relocate_spec(void)
235 #if !defined(ENV_IS_EMBEDDED)
237 u32 offset1, offset2;
238 int read1_fail = 0, read2_fail = 0;
239 int crc1_ok = 0, crc2_ok = 0;
242 int dev = mmc_get_env_dev();
243 const char *errmsg = NULL;
245 ALLOC_CACHE_ALIGN_BUFFER(env_t, tmp_env1, 1);
246 ALLOC_CACHE_ALIGN_BUFFER(env_t, tmp_env2, 1);
248 mmc = find_mmc_device(dev);
250 errmsg = init_mmc_for_env(mmc);
256 if (mmc_get_env_addr(mmc, 0, &offset1) ||
257 mmc_get_env_addr(mmc, 1, &offset2)) {
262 read1_fail = read_env(mmc, CONFIG_ENV_SIZE, offset1, tmp_env1);
263 read2_fail = read_env(mmc, CONFIG_ENV_SIZE, offset2, tmp_env2);
265 if (read1_fail && read2_fail)
266 puts("*** Error - No Valid Environment Area found\n");
267 else if (read1_fail || read2_fail)
268 puts("*** Warning - some problems detected "
269 "reading environment; recovered successfully\n");
271 crc1_ok = !read1_fail &&
272 (crc32(0, tmp_env1->data, ENV_SIZE) == tmp_env1->crc);
273 crc2_ok = !read2_fail &&
274 (crc32(0, tmp_env2->data, ENV_SIZE) == tmp_env2->crc);
276 if (!crc1_ok && !crc2_ok) {
280 } else if (crc1_ok && !crc2_ok) {
282 } else if (!crc1_ok && crc2_ok) {
285 /* both ok - check serial */
286 if (tmp_env1->flags == 255 && tmp_env2->flags == 0)
288 else if (tmp_env2->flags == 255 && tmp_env1->flags == 0)
290 else if (tmp_env1->flags > tmp_env2->flags)
292 else if (tmp_env2->flags > tmp_env1->flags)
294 else /* flags are equal - almost impossible */
300 if (gd->env_valid == 1)
305 env_flags = ep->flags;
306 env_import((char *)ep, 0);
310 fini_mmc_for_env(mmc);
313 set_default_env(errmsg);
316 #else /* ! CONFIG_ENV_OFFSET_REDUND */
317 void env_relocate_spec(void)
319 #if !defined(ENV_IS_EMBEDDED)
320 ALLOC_CACHE_ALIGN_BUFFER(char, buf, CONFIG_ENV_SIZE);
324 int dev = mmc_get_env_dev();
327 mmc = find_mmc_device(dev);
329 errmsg = init_mmc_for_env(mmc);
335 if (mmc_get_env_addr(mmc, 0, &offset)) {
340 if (read_env(mmc, CONFIG_ENV_SIZE, offset, buf)) {
341 errmsg = "!read failed";
350 fini_mmc_for_env(mmc);
353 set_default_env(errmsg);
356 #endif /* CONFIG_ENV_OFFSET_REDUND */