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 */