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 #if defined(CFG_ENV_IS_IN_FLASH) /* Environment is in Flash */
34 #include <environment.h>
35 #include <linux/stddef.h>
38 DECLARE_GLOBAL_DATA_PTR
;
40 #if ((CONFIG_COMMANDS&(CFG_CMD_ENV|CFG_CMD_FLASH)) == (CFG_CMD_ENV|CFG_CMD_FLASH))
42 #elif defined(CFG_ENV_ADDR_REDUND)
43 #error Cannot use CFG_ENV_ADDR_REDUND without CFG_CMD_ENV & CFG_CMD_FLASH
46 #if defined(CFG_ENV_SIZE_REDUND) && (CFG_ENV_SIZE_REDUND < CFG_ENV_SIZE)
47 #error CFG_ENV_SIZE_REDUND should not be less then CFG_ENV_SIZE
51 # ifdef CFG_ENV_ADDR_REDUND
52 #error CFG_ENV_ADDR_REDUND is not implemented for CONFIG_INFERNO
56 char * env_name_spec
= "Flash";
58 #ifdef ENV_IS_EMBEDDED
60 extern uchar environment
[];
61 env_t
*env_ptr
= (env_t
*)(&environment
[0]);
64 /* static env_t *flash_addr = (env_t *)(&environment[0]);-broken on ARM-wd-*/
65 static env_t
*flash_addr
= (env_t
*)CFG_ENV_ADDR
;
68 #else /* ! ENV_IS_EMBEDDED */
70 env_t
*env_ptr
= (env_t
*)CFG_ENV_ADDR
;
72 static env_t
*flash_addr
= (env_t
*)CFG_ENV_ADDR
;
75 #endif /* ENV_IS_EMBEDDED */
77 #ifdef CFG_ENV_ADDR_REDUND
78 static env_t
*flash_addr_new
= (env_t
*)CFG_ENV_ADDR_REDUND
;
80 /* CFG_ENV_ADDR is supposed to be on sector boundary */
81 static ulong end_addr
= CFG_ENV_ADDR
+ CFG_ENV_SECT_SIZE
- 1;
82 static ulong end_addr_new
= CFG_ENV_ADDR_REDUND
+ CFG_ENV_SECT_SIZE
- 1;
85 #define OBSOLETE_FLAG 0
86 #endif /* CFG_ENV_ADDR_REDUND */
88 extern uchar default_environment
[];
89 extern int default_environment_size
;
92 uchar
env_get_char_spec (int index
)
94 return ( *((uchar
*)(gd
->env_addr
+ index
)) );
97 #ifdef CFG_ENV_ADDR_REDUND
101 int crc1_ok
= 0, crc2_ok
= 0;
103 uchar flag1
= flash_addr
->flags
;
104 uchar flag2
= flash_addr_new
->flags
;
106 ulong addr_default
= (ulong
)&default_environment
[0];
107 ulong addr1
= (ulong
)&(flash_addr
->data
);
108 ulong addr2
= (ulong
)&(flash_addr_new
->data
);
110 #ifdef CONFIG_OMAP2420H4
111 int flash_probe(void);
113 if(flash_probe() == 0)
117 crc1_ok
= (crc32(0, flash_addr
->data
, ENV_SIZE
) == flash_addr
->crc
);
118 crc2_ok
= (crc32(0, flash_addr_new
->data
, ENV_SIZE
) == flash_addr_new
->crc
);
120 if (crc1_ok
&& ! crc2_ok
) {
121 gd
->env_addr
= addr1
;
123 } else if (! crc1_ok
&& crc2_ok
) {
124 gd
->env_addr
= addr2
;
126 } else if (! crc1_ok
&& ! crc2_ok
) {
127 gd
->env_addr
= addr_default
;
129 } else if (flag1
== ACTIVE_FLAG
&& flag2
== OBSOLETE_FLAG
) {
130 gd
->env_addr
= addr1
;
132 } else if (flag1
== OBSOLETE_FLAG
&& flag2
== ACTIVE_FLAG
) {
133 gd
->env_addr
= addr2
;
135 } else if (flag1
== flag2
) {
136 gd
->env_addr
= addr1
;
138 } else if (flag1
== 0xFF) {
139 gd
->env_addr
= addr1
;
141 } else if (flag2
== 0xFF) {
142 gd
->env_addr
= addr2
;
146 #ifdef CONFIG_OMAP2420H4
155 char *saved_data
= NULL
;
157 char flag
= OBSOLETE_FLAG
, new_flag
= ACTIVE_FLAG
;
158 #if CFG_ENV_SECT_SIZE > CFG_ENV_SIZE
162 debug ("Protect off %08lX ... %08lX\n",
163 (ulong
)flash_addr
, end_addr
);
165 if (flash_sect_protect (0, (ulong
)flash_addr
, end_addr
)) {
169 debug ("Protect off %08lX ... %08lX\n",
170 (ulong
)flash_addr_new
, end_addr_new
);
172 if (flash_sect_protect (0, (ulong
)flash_addr_new
, end_addr_new
)) {
176 #if CFG_ENV_SECT_SIZE > CFG_ENV_SIZE
177 up_data
= (end_addr_new
+ 1 - ((long)flash_addr_new
+ CFG_ENV_SIZE
));
178 debug ("Data to save 0x%x\n", up_data
);
180 if ((saved_data
= malloc(up_data
)) == NULL
) {
181 printf("Unable to save the rest of sector (%ld)\n",
186 (void *)((long)flash_addr_new
+ CFG_ENV_SIZE
), up_data
);
187 debug ("Data (start 0x%x, len 0x%x) saved at 0x%x\n",
188 (long)flash_addr_new
+ CFG_ENV_SIZE
,
189 up_data
, saved_data
);
192 puts ("Erasing Flash...");
193 debug (" %08lX ... %08lX ...",
194 (ulong
)flash_addr_new
, end_addr_new
);
196 if (flash_sect_erase ((ulong
)flash_addr_new
, end_addr_new
)) {
200 puts ("Writing to Flash... ");
201 debug (" %08lX ... %08lX ...",
202 (ulong
)&(flash_addr_new
->data
),
203 sizeof(env_ptr
->data
)+(ulong
)&(flash_addr_new
->data
));
204 if ((rc
= flash_write((char *)env_ptr
->data
,
205 (ulong
)&(flash_addr_new
->data
),
206 sizeof(env_ptr
->data
))) ||
207 (rc
= flash_write((char *)&(env_ptr
->crc
),
208 (ulong
)&(flash_addr_new
->crc
),
209 sizeof(env_ptr
->crc
))) ||
210 (rc
= flash_write(&flag
,
211 (ulong
)&(flash_addr
->flags
),
212 sizeof(flash_addr
->flags
))) ||
213 (rc
= flash_write(&new_flag
,
214 (ulong
)&(flash_addr_new
->flags
),
215 sizeof(flash_addr_new
->flags
))))
222 #if CFG_ENV_SECT_SIZE > CFG_ENV_SIZE
223 if (up_data
) { /* restore the rest of sector */
224 debug ("Restoring the rest of data to 0x%x len 0x%x\n",
225 (long)flash_addr_new
+ CFG_ENV_SIZE
, up_data
);
226 if (flash_write(saved_data
,
227 (long)flash_addr_new
+ CFG_ENV_SIZE
,
235 env_t
* etmp
= flash_addr
;
236 ulong ltmp
= end_addr
;
238 flash_addr
= flash_addr_new
;
239 flash_addr_new
= etmp
;
241 end_addr
= end_addr_new
;
250 /* try to re-protect */
251 (void) flash_sect_protect (1, (ulong
)flash_addr
, end_addr
);
252 (void) flash_sect_protect (1, (ulong
)flash_addr_new
, end_addr_new
);
256 #endif /* CMD_SAVEENV */
258 #else /* ! CFG_ENV_ADDR_REDUND */
262 #ifdef CONFIG_OMAP2420H4
263 int flash_probe(void);
265 if(flash_probe() == 0)
268 if (crc32(0, env_ptr
->data
, ENV_SIZE
) == env_ptr
->crc
) {
269 gd
->env_addr
= (ulong
)&(env_ptr
->data
);
273 #ifdef CONFIG_OMAP2420H4
276 gd
->env_addr
= (ulong
)&default_environment
[0];
287 ulong flash_sect_addr
;
288 #if defined(CFG_ENV_SECT_SIZE) && (CFG_ENV_SECT_SIZE > CFG_ENV_SIZE)
290 uchar env_buffer
[CFG_ENV_SECT_SIZE
];
292 uchar
*env_buffer
= (uchar
*)env_ptr
;
293 #endif /* CFG_ENV_SECT_SIZE */
296 #if defined(CFG_ENV_SECT_SIZE) && (CFG_ENV_SECT_SIZE > CFG_ENV_SIZE)
298 flash_offset
= ((ulong
)flash_addr
) & (CFG_ENV_SECT_SIZE
-1);
299 flash_sect_addr
= ((ulong
)flash_addr
) & ~(CFG_ENV_SECT_SIZE
-1);
301 debug ( "copy old content: "
302 "sect_addr: %08lX env_addr: %08lX offset: %08lX\n",
303 flash_sect_addr
, (ulong
)flash_addr
, flash_offset
);
305 /* copy old contents to temporary buffer */
306 memcpy (env_buffer
, (void *)flash_sect_addr
, CFG_ENV_SECT_SIZE
);
308 /* copy current environment to temporary buffer */
309 memcpy ((uchar
*)((unsigned long)env_buffer
+ flash_offset
),
313 len
= CFG_ENV_SECT_SIZE
;
315 flash_sect_addr
= (ulong
)flash_addr
;
317 #endif /* CFG_ENV_SECT_SIZE */
319 #ifndef CONFIG_INFERNO
320 end_addr
= flash_sect_addr
+ len
- 1;
322 /* this is the last sector, and the size is hardcoded here */
323 /* otherwise we will get stack problems on loading 128 KB environment */
324 end_addr
= flash_sect_addr
+ 0x20000 - 1;
327 debug ("Protect off %08lX ... %08lX\n",
328 (ulong
)flash_sect_addr
, end_addr
);
330 if (flash_sect_protect (0, flash_sect_addr
, end_addr
))
333 puts ("Erasing Flash...");
334 if (flash_sect_erase (flash_sect_addr
, end_addr
))
337 puts ("Writing to Flash... ");
338 rc
= flash_write((char *)env_buffer
, flash_sect_addr
, len
);
346 /* try to re-protect */
347 (void) flash_sect_protect (1, flash_sect_addr
, end_addr
);
351 #endif /* CMD_SAVEENV */
353 #endif /* CFG_ENV_ADDR_REDUND */
355 void env_relocate_spec (void)
357 #if !defined(ENV_IS_EMBEDDED) || defined(CFG_ENV_ADDR_REDUND)
358 #ifdef CFG_ENV_ADDR_REDUND
359 if (gd
->env_addr
!= (ulong
)&(flash_addr
->data
)) {
360 env_t
* etmp
= flash_addr
;
361 ulong ltmp
= end_addr
;
363 flash_addr
= flash_addr_new
;
364 flash_addr_new
= etmp
;
366 end_addr
= end_addr_new
;
370 if (flash_addr_new
->flags
!= OBSOLETE_FLAG
&&
371 crc32(0, flash_addr_new
->data
, ENV_SIZE
) ==
372 flash_addr_new
->crc
) {
373 char flag
= OBSOLETE_FLAG
;
376 flash_sect_protect (0, (ulong
)flash_addr_new
, end_addr_new
);
378 (ulong
)&(flash_addr_new
->flags
),
379 sizeof(flash_addr_new
->flags
));
380 flash_sect_protect (1, (ulong
)flash_addr_new
, end_addr_new
);
383 if (flash_addr
->flags
!= ACTIVE_FLAG
&&
384 (flash_addr
->flags
& ACTIVE_FLAG
) == ACTIVE_FLAG
) {
385 char flag
= ACTIVE_FLAG
;
388 flash_sect_protect (0, (ulong
)flash_addr
, end_addr
);
390 (ulong
)&(flash_addr
->flags
),
391 sizeof(flash_addr
->flags
));
392 flash_sect_protect (1, (ulong
)flash_addr
, end_addr
);
395 if (gd
->env_valid
== 2)
396 puts ("*** Warning - some problems detected "
397 "reading environment; recovered successfully\n\n");
398 #endif /* CFG_ENV_ADDR_REDUND */
399 memcpy (env_ptr
, (void*)flash_addr
, CFG_ENV_SIZE
);
400 #endif /* ! ENV_IS_EMBEDDED || CFG_ENV_ADDR_REDUND */
403 #endif /* CFG_ENV_IS_IN_FLASH */