2 * (C) Copyright 2000-2002
3 * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
5 * (C) Copyright 2001 Sysgo Real-Time Solutions, GmbH <www.elinos.com>
6 * Andreas Heppel <aheppel@sysgo.de>
8 * See file CREDITS for list of people who contributed to this
11 * This program is free software; you can redistribute it and/or
12 * modify it under the terms of the GNU General Public License as
13 * published by the Free Software Foundation; either version 2 of
14 * the License, or (at your option) any later version.
16 * This program is distributed in the hope that it will be useful,
17 * but WITHOUT ANY WARRANTY; without even the implied warranty of
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 * GNU General Public License for more details.
21 * You should have received a copy of the GNU General Public License
22 * along with this program; if not, write to the Free Software
23 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
31 #include <environment.h>
32 #include <linux/stddef.h>
35 DECLARE_GLOBAL_DATA_PTR;
37 #if defined(CONFIG_CMD_SAVEENV) && defined(CONFIG_CMD_FLASH)
39 #elif defined(CONFIG_ENV_ADDR_REDUND)
40 #error Cannot use CONFIG_ENV_ADDR_REDUND without CONFIG_CMD_SAVEENV & CONFIG_CMD_FLASH
43 #if defined(CONFIG_ENV_SIZE_REDUND) && (CONFIG_ENV_SIZE_REDUND < CONFIG_ENV_SIZE)
44 #error CONFIG_ENV_SIZE_REDUND should not be less then CONFIG_ENV_SIZE
48 # ifdef CONFIG_ENV_ADDR_REDUND
49 #error CONFIG_ENV_ADDR_REDUND is not implemented for CONFIG_INFERNO
53 char * env_name_spec = "Flash";
55 #ifdef ENV_IS_EMBEDDED
57 extern uchar environment[];
58 env_t *env_ptr = (env_t *)(&environment[0]);
61 /* static env_t *flash_addr = (env_t *)(&environment[0]);-broken on ARM-wd-*/
62 static env_t *flash_addr = (env_t *)CONFIG_ENV_ADDR;
65 #else /* ! ENV_IS_EMBEDDED */
67 env_t *env_ptr = (env_t *)CONFIG_ENV_ADDR;
69 static env_t *flash_addr = (env_t *)CONFIG_ENV_ADDR;
72 #endif /* ENV_IS_EMBEDDED */
74 #ifdef CONFIG_ENV_ADDR_REDUND
75 static env_t *flash_addr_new = (env_t *)CONFIG_ENV_ADDR_REDUND;
77 /* CONFIG_ENV_ADDR is supposed to be on sector boundary */
78 static ulong end_addr = CONFIG_ENV_ADDR + CONFIG_ENV_SECT_SIZE - 1;
79 static ulong end_addr_new = CONFIG_ENV_ADDR_REDUND + CONFIG_ENV_SECT_SIZE - 1;
82 #define OBSOLETE_FLAG 0
83 #endif /* CONFIG_ENV_ADDR_REDUND */
85 extern uchar default_environment[];
88 uchar env_get_char_spec (int index)
90 return ( *((uchar *)(gd->env_addr + index)) );
93 #ifdef CONFIG_ENV_ADDR_REDUND
97 int crc1_ok = 0, crc2_ok = 0;
99 uchar flag1 = flash_addr->flags;
100 uchar flag2 = flash_addr_new->flags;
102 ulong addr_default = (ulong)&default_environment[0];
103 ulong addr1 = (ulong)&(flash_addr->data);
104 ulong addr2 = (ulong)&(flash_addr_new->data);
106 crc1_ok = (crc32(0, flash_addr->data, ENV_SIZE) == flash_addr->crc);
107 crc2_ok = (crc32(0, flash_addr_new->data, ENV_SIZE) == flash_addr_new->crc);
109 if (crc1_ok && ! crc2_ok) {
110 gd->env_addr = addr1;
112 } else if (! crc1_ok && crc2_ok) {
113 gd->env_addr = addr2;
115 } else if (! crc1_ok && ! crc2_ok) {
116 gd->env_addr = addr_default;
118 } else if (flag1 == ACTIVE_FLAG && flag2 == OBSOLETE_FLAG) {
119 gd->env_addr = addr1;
121 } else if (flag1 == OBSOLETE_FLAG && flag2 == ACTIVE_FLAG) {
122 gd->env_addr = addr2;
124 } else if (flag1 == flag2) {
125 gd->env_addr = addr1;
127 } else if (flag1 == 0xFF) {
128 gd->env_addr = addr1;
130 } else if (flag2 == 0xFF) {
131 gd->env_addr = addr2;
141 char *saved_data = NULL;
143 char flag = OBSOLETE_FLAG, new_flag = ACTIVE_FLAG;
144 #if CONFIG_ENV_SECT_SIZE > CONFIG_ENV_SIZE
148 debug ("Protect off %08lX ... %08lX\n",
149 (ulong)flash_addr, end_addr);
151 if (flash_sect_protect (0, (ulong)flash_addr, end_addr)) {
155 debug ("Protect off %08lX ... %08lX\n",
156 (ulong)flash_addr_new, end_addr_new);
158 if (flash_sect_protect (0, (ulong)flash_addr_new, end_addr_new)) {
162 #if CONFIG_ENV_SECT_SIZE > CONFIG_ENV_SIZE
163 up_data = (end_addr_new + 1 - ((long)flash_addr_new + CONFIG_ENV_SIZE));
164 debug ("Data to save 0x%x\n", up_data);
166 if ((saved_data = malloc(up_data)) == NULL) {
167 printf("Unable to save the rest of sector (%ld)\n",
172 (void *)((long)flash_addr_new + CONFIG_ENV_SIZE), up_data);
173 debug ("Data (start 0x%x, len 0x%x) saved at 0x%x\n",
174 (long)flash_addr_new + CONFIG_ENV_SIZE,
175 up_data, saved_data);
178 puts ("Erasing Flash...");
179 debug (" %08lX ... %08lX ...",
180 (ulong)flash_addr_new, end_addr_new);
182 if (flash_sect_erase ((ulong)flash_addr_new, end_addr_new)) {
186 puts ("Writing to Flash... ");
187 debug (" %08lX ... %08lX ...",
188 (ulong)&(flash_addr_new->data),
189 sizeof(env_ptr->data)+(ulong)&(flash_addr_new->data));
190 if ((rc = flash_write((char *)env_ptr->data,
191 (ulong)&(flash_addr_new->data),
192 sizeof(env_ptr->data))) ||
193 (rc = flash_write((char *)&(env_ptr->crc),
194 (ulong)&(flash_addr_new->crc),
195 sizeof(env_ptr->crc))) ||
196 (rc = flash_write(&flag,
197 (ulong)&(flash_addr->flags),
198 sizeof(flash_addr->flags))) ||
199 (rc = flash_write(&new_flag,
200 (ulong)&(flash_addr_new->flags),
201 sizeof(flash_addr_new->flags))))
208 #if CONFIG_ENV_SECT_SIZE > CONFIG_ENV_SIZE
209 if (up_data) { /* restore the rest of sector */
210 debug ("Restoring the rest of data to 0x%x len 0x%x\n",
211 (long)flash_addr_new + CONFIG_ENV_SIZE, up_data);
212 if (flash_write(saved_data,
213 (long)flash_addr_new + CONFIG_ENV_SIZE,
221 env_t * etmp = flash_addr;
222 ulong ltmp = end_addr;
224 flash_addr = flash_addr_new;
225 flash_addr_new = etmp;
227 end_addr = end_addr_new;
236 /* try to re-protect */
237 (void) flash_sect_protect (1, (ulong)flash_addr, end_addr);
238 (void) flash_sect_protect (1, (ulong)flash_addr_new, end_addr_new);
242 #endif /* CMD_SAVEENV */
244 #else /* ! CONFIG_ENV_ADDR_REDUND */
248 if (crc32(0, env_ptr->data, ENV_SIZE) == env_ptr->crc) {
249 gd->env_addr = (ulong)&(env_ptr->data);
254 gd->env_addr = (ulong)&default_environment[0];
265 ulong flash_sect_addr;
266 #if defined(CONFIG_ENV_SECT_SIZE) && (CONFIG_ENV_SECT_SIZE > CONFIG_ENV_SIZE)
268 uchar env_buffer[CONFIG_ENV_SECT_SIZE];
270 uchar *env_buffer = (uchar *)env_ptr;
271 #endif /* CONFIG_ENV_SECT_SIZE */
274 #if defined(CONFIG_ENV_SECT_SIZE) && (CONFIG_ENV_SECT_SIZE > CONFIG_ENV_SIZE)
276 flash_offset = ((ulong)flash_addr) & (CONFIG_ENV_SECT_SIZE-1);
277 flash_sect_addr = ((ulong)flash_addr) & ~(CONFIG_ENV_SECT_SIZE-1);
279 debug ( "copy old content: "
280 "sect_addr: %08lX env_addr: %08lX offset: %08lX\n",
281 flash_sect_addr, (ulong)flash_addr, flash_offset);
283 /* copy old contents to temporary buffer */
284 memcpy (env_buffer, (void *)flash_sect_addr, CONFIG_ENV_SECT_SIZE);
286 /* copy current environment to temporary buffer */
287 memcpy ((uchar *)((unsigned long)env_buffer + flash_offset),
291 len = CONFIG_ENV_SECT_SIZE;
293 flash_sect_addr = (ulong)flash_addr;
294 len = CONFIG_ENV_SIZE;
295 #endif /* CONFIG_ENV_SECT_SIZE */
297 #ifndef CONFIG_INFERNO
298 end_addr = flash_sect_addr + len - 1;
300 /* this is the last sector, and the size is hardcoded here */
301 /* otherwise we will get stack problems on loading 128 KB environment */
302 end_addr = flash_sect_addr + 0x20000 - 1;
305 debug ("Protect off %08lX ... %08lX\n",
306 (ulong)flash_sect_addr, end_addr);
308 if (flash_sect_protect (0, flash_sect_addr, end_addr))
311 puts ("Erasing Flash...");
312 if (flash_sect_erase (flash_sect_addr, end_addr))
315 puts ("Writing to Flash... ");
316 rc = flash_write((char *)env_buffer, flash_sect_addr, len);
324 /* try to re-protect */
325 (void) flash_sect_protect (1, flash_sect_addr, end_addr);
329 #endif /* CMD_SAVEENV */
331 #endif /* CONFIG_ENV_ADDR_REDUND */
333 void env_relocate_spec (void)
335 #if !defined(ENV_IS_EMBEDDED) || defined(CONFIG_ENV_ADDR_REDUND)
336 #ifdef CONFIG_ENV_ADDR_REDUND
337 if (gd->env_addr != (ulong)&(flash_addr->data)) {
338 env_t * etmp = flash_addr;
339 ulong ltmp = end_addr;
341 flash_addr = flash_addr_new;
342 flash_addr_new = etmp;
344 end_addr = end_addr_new;
348 if (flash_addr_new->flags != OBSOLETE_FLAG &&
349 crc32(0, flash_addr_new->data, ENV_SIZE) ==
350 flash_addr_new->crc) {
351 char flag = OBSOLETE_FLAG;
354 flash_sect_protect (0, (ulong)flash_addr_new, end_addr_new);
356 (ulong)&(flash_addr_new->flags),
357 sizeof(flash_addr_new->flags));
358 flash_sect_protect (1, (ulong)flash_addr_new, end_addr_new);
361 if (flash_addr->flags != ACTIVE_FLAG &&
362 (flash_addr->flags & ACTIVE_FLAG) == ACTIVE_FLAG) {
363 char flag = ACTIVE_FLAG;
366 flash_sect_protect (0, (ulong)flash_addr, end_addr);
368 (ulong)&(flash_addr->flags),
369 sizeof(flash_addr->flags));
370 flash_sect_protect (1, (ulong)flash_addr, end_addr);
373 if (gd->env_valid == 2)
374 puts ("*** Warning - some problems detected "
375 "reading environment; recovered successfully\n\n");
376 #endif /* CONFIG_ENV_ADDR_REDUND */
378 memcpy (env_ptr, (void*)flash_addr, CONFIG_ENV_SIZE);
380 #endif /* ! ENV_IS_EMBEDDED || CONFIG_ENV_ADDR_REDUND */