mirror of
https://github.com/marqs85/ossc.git
synced 2024-06-02 08:41:28 +00:00
86c3f744ed
* do not generate .map file for .jic * wait for USB Blaster if needed when reprogramming SW * set correct bit to halt pulpino core before writing image
34 lines
848 B
Tcl
34 lines
848 B
Tcl
#Select the master service type and check for available service paths.
|
|
while 1 {
|
|
set service_paths [get_service_paths master]
|
|
if {[llength $service_paths] > 0} {
|
|
break
|
|
}
|
|
puts "Refreshing connections..."
|
|
refresh_connections
|
|
after 100
|
|
}
|
|
|
|
#Set the master service path.
|
|
set master_service_path [lindex $service_paths 0]
|
|
|
|
#Open the master service.
|
|
set claim_path [claim_service master $master_service_path mylib]
|
|
|
|
puts "Halting CPU"
|
|
master_write_32 $claim_path 0x0 0x10000
|
|
|
|
puts "Writing block RAM"
|
|
master_write_from_file $claim_path mem_init/sys_onchip_memory2_0.bin 0x10000
|
|
|
|
close_service master $claim_path
|
|
|
|
|
|
set jtag_debug_list [get_service_paths jtag_debug]
|
|
set jd [ lindex $jtag_debug_list 0 ]
|
|
open_service jtag_debug $jd
|
|
puts "Resetting system"
|
|
jtag_debug_reset_system $jd
|
|
close_service jtag_debug $jd
|
|
puts "Done"
|