Kevin
68d74d3181
submodule of avionic design uboot bootloader and with included tools to get you started , read readme.md and readme-tk1-loader.md
41 lines
967 B
Tcl
41 lines
967 B
Tcl
#
|
|
# Copyright (C) 2013 Imagination Technologies
|
|
#
|
|
# Programs a MIPS Malta boot flash with a flat binary image.
|
|
#
|
|
# SPDX-License-Identifier: GPL-2.0+
|
|
#
|
|
|
|
proc flash-boot { binfile } {
|
|
puts "flash monitor binary $binfile"
|
|
config Coherent on
|
|
config CoherencyDuringLoad on
|
|
|
|
if {[endian]=="big"} {
|
|
puts "CPU in BE mode"
|
|
flash device sharp_16x32_be;
|
|
} else {
|
|
puts "CPU in LE mode"
|
|
flash device sharp_16x32;
|
|
}
|
|
|
|
flash clear all;
|
|
flash set 0xBE000000..0xBE0FFFFF
|
|
flash erase sector 0xbe000000;
|
|
flash erase sector 0xbe020000;
|
|
flash erase sector 0xbe040000;
|
|
flash erase sector 0xbe060000;
|
|
flash erase sector 0xbe080000;
|
|
flash erase sector 0xbe0a0000;
|
|
flash erase sector 0xbe0c0000;
|
|
flash erase sector 0xbe0e0000;
|
|
puts "finished erasing boot flash";
|
|
|
|
puts "programming flash, please be patient"
|
|
load bin 0xbe000000 $binfile size4
|
|
|
|
flash clear all
|
|
config CoherencyDuringLoad off
|
|
puts "finished programming boot flash";
|
|
}
|