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";
126 return "!MMC init failed";
128 if (mmc_set_env_part(mmc))
129 return "!MMC partition switch failed";
134 static void fini_mmc_for_env(struct mmc *mmc)
136 #ifdef CONFIG_SYS_MMC_ENV_PART
137 int dev = mmc_get_env_dev();
139 blk_select_hwpart_devnum(IF_TYPE_MMC, dev, env_mmc_orig_hwpart);
143 #ifdef CONFIG_CMD_SAVEENV
144 static inline int write_env(struct mmc *mmc, unsigned long size,
145 unsigned long offset, const void *buffer)
147 uint blk_start, blk_cnt, n;
148 struct blk_desc *desc = mmc_get_blk_desc(mmc);
150 blk_start = ALIGN(offset, mmc->write_bl_len) / mmc->write_bl_len;
151 blk_cnt = ALIGN(size, mmc->write_bl_len) / mmc->write_bl_len;
153 n = blk_dwrite(desc, blk_start, blk_cnt, (u_char *)buffer);
155 return (n == blk_cnt) ? 0 : -1;
158 #ifdef CONFIG_ENV_OFFSET_REDUND
159 static unsigned char env_flags;
164 ALLOC_CACHE_ALIGN_BUFFER(env_t, env_new, 1);
165 int dev = mmc_get_env_dev();
166 struct mmc *mmc = find_mmc_device(dev);
171 errmsg = init_mmc_for_env(mmc);
173 printf("%s\n", errmsg);
177 ret = env_export(env_new);
181 #ifdef CONFIG_ENV_OFFSET_REDUND
182 env_new->flags = ++env_flags; /* increase the serial */
184 if (gd->env_valid == 1)
188 if (mmc_get_env_addr(mmc, copy, &offset)) {
193 printf("Writing to %sMMC(%d)... ", copy ? "redundant " : "", dev);
194 if (write_env(mmc, CONFIG_ENV_SIZE, offset, (u_char *)env_new)) {
203 #ifdef CONFIG_ENV_OFFSET_REDUND
204 gd->env_valid = gd->env_valid == 2 ? 1 : 2;
208 fini_mmc_for_env(mmc);
211 #endif /* CONFIG_CMD_SAVEENV */
213 static inline int read_env(struct mmc *mmc, unsigned long size,
214 unsigned long offset, const void *buffer)
216 uint blk_start, blk_cnt, n;
217 struct blk_desc *desc = mmc_get_blk_desc(mmc);
219 blk_start = ALIGN(offset, mmc->read_bl_len) / mmc->read_bl_len;
220 blk_cnt = ALIGN(size, mmc->read_bl_len) / mmc->read_bl_len;
222 n = blk_dread(desc, blk_start, blk_cnt, (uchar *)buffer);
224 return (n == blk_cnt) ? 0 : -1;
227 #ifdef CONFIG_ENV_OFFSET_REDUND
228 void env_relocate_spec(void)
230 #if !defined(ENV_IS_EMBEDDED)
232 u32 offset1, offset2;
233 int read1_fail = 0, read2_fail = 0;
234 int crc1_ok = 0, crc2_ok = 0;
237 int dev = mmc_get_env_dev();
238 const char *errmsg = NULL;
240 ALLOC_CACHE_ALIGN_BUFFER(env_t, tmp_env1, 1);
241 ALLOC_CACHE_ALIGN_BUFFER(env_t, tmp_env2, 1);
243 mmc = find_mmc_device(dev);
245 errmsg = init_mmc_for_env(mmc);
251 if (mmc_get_env_addr(mmc, 0, &offset1) ||
252 mmc_get_env_addr(mmc, 1, &offset2)) {
257 read1_fail = read_env(mmc, CONFIG_ENV_SIZE, offset1, tmp_env1);
258 read2_fail = read_env(mmc, CONFIG_ENV_SIZE, offset2, tmp_env2);
260 if (read1_fail && read2_fail)
261 puts("*** Error - No Valid Environment Area found\n");
262 else if (read1_fail || read2_fail)
263 puts("*** Warning - some problems detected "
264 "reading environment; recovered successfully\n");
266 crc1_ok = !read1_fail &&
267 (crc32(0, tmp_env1->data, ENV_SIZE) == tmp_env1->crc);
268 crc2_ok = !read2_fail &&
269 (crc32(0, tmp_env2->data, ENV_SIZE) == tmp_env2->crc);
271 if (!crc1_ok && !crc2_ok) {
275 } else if (crc1_ok && !crc2_ok) {
277 } else if (!crc1_ok && crc2_ok) {
280 /* both ok - check serial */
281 if (tmp_env1->flags == 255 && tmp_env2->flags == 0)
283 else if (tmp_env2->flags == 255 && tmp_env1->flags == 0)
285 else if (tmp_env1->flags > tmp_env2->flags)
287 else if (tmp_env2->flags > tmp_env1->flags)
289 else /* flags are equal - almost impossible */
295 if (gd->env_valid == 1)
300 env_flags = ep->flags;
301 env_import((char *)ep, 0);
305 fini_mmc_for_env(mmc);
308 set_default_env(errmsg);
311 #else /* ! CONFIG_ENV_OFFSET_REDUND */
312 void env_relocate_spec(void)
314 #if !defined(ENV_IS_EMBEDDED)
315 ALLOC_CACHE_ALIGN_BUFFER(char, buf, CONFIG_ENV_SIZE);
319 int dev = mmc_get_env_dev();
322 mmc = find_mmc_device(dev);
324 errmsg = init_mmc_for_env(mmc);
330 if (mmc_get_env_addr(mmc, 0, &offset)) {
335 if (read_env(mmc, CONFIG_ENV_SIZE, offset, buf)) {
336 errmsg = "!read failed";
345 fini_mmc_for_env(mmc);
348 set_default_env(errmsg);
351 #endif /* CONFIG_ENV_OFFSET_REDUND */