From: Rabeeh Khoury <rabeeh@marvell.com>
Date: Fri, 9 Oct 2009 00:10:52 +0000 (-0700)
Subject: Function to flash SheevaPlug u-boot sectors
X-Git-Url: https://git.gag.com/?a=commitdiff_plain;h=7b650a6abefbede7beffff32ef38518b026ea060;p=fw%2Fopenocd

Function to flash SheevaPlug u-boot sectors

This function is used by the SheevaPlug installer to flash the
erase and re-flash the U-Boot environment in the NAND Flash.
---

diff --git a/tcl/board/sheevaplug.cfg b/tcl/board/sheevaplug.cfg
index 1a3f61b88..62b78ee19 100644
--- 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