Author: wmb Date: 2008-12-04 10:17:55 +0100 (Thu, 04 Dec 2008) New Revision: 1015
Modified: dev/olpc/spiflash/spiui.fth Log: Erase SPI FLASH blocks just before writing them, as weak protection against bricking.
Modified: dev/olpc/spiflash/spiui.fth =================================================================== --- dev/olpc/spiflash/spiui.fth 2008-12-04 09:17:50 UTC (rev 1014) +++ dev/olpc/spiflash/spiui.fth 2008-12-04 09:17:55 UTC (rev 1015) @@ -16,15 +16,10 @@ mfg-data-offset /flash-block + constant mfg-data-end-offset
: write-flash-range ( adr end-offset start-offset -- ) - ." Erasing" cr - 2dup ?do - i .x (cr i flash-erase-block - /flash-block +loop ( adr end start ) - cr ( adr end start ) - ." Writing" cr ?do ( adr ) i .x (cr ( adr ) + i /flash-block mod 0= if i flash-erase-block then dup /chunk i flash-write ( adr ) /chunk + ( adr' ) /chunk +loop ( adr )