Function to flash SheevaPlug u-boot sectors

[fw/openocd] / tcl / board / sheevaplug.cfg

diff --git a/tcl/board/sheevaplug.cfg b/tcl/board/sheevaplug.cfg
index 1a3f61b885bb0549c0dbae52cc39043e629dfef5..62b78ee19e5071c0506cbc6650a1acd04d6df2f6 100644 (file)
--- a/tcl/board/sheevaplug.cfg
+++ b/tcl/board/sheevaplug.cfg
@@ -110,6 +110,17 @@ proc sheevaplug_reflash_uboot { } {
 
 }
 
+proc sheevaplug_reflash_uboot_env { } {
+
+       # reflash the u-Boot environment variables area
+       sheevaplug_init
+       nand probe 0
+       nand erase 0 0xa0000 0x40000
+       nand write 0 uboot-env.bin 0xa0000 oob_softecc_kw
+       resume
+
+}
+
 proc sheevaplug_load_uboot { } {
 
        # load u-Boot into RAM and execute it